Подскажите, почему во втором случае не нужно выделять память ?
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
p:^integer;
a:integer;
str:^String;
begin
New(str);
Str^:=Edit1.Text; //Здесь нужно выделение памяти
a:=StrToInt(Edit1.Text); //Здесь не нужно выделять память
p:=@a;
p^:=p^*2;
ShowMessage(IntToStr(p^));