[Lotles]

Код:

var
Form1: TForm1;
p:pointer;
p1,p2:pointer;
Str:String;
implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Str:='666';
p1:=pointer(Str);
p2:=@pointer(Str);

Чем отличается содержимое p1 и p2 ?

[Lotles]

Что никто не знает?

[Aristarh Dark]

Я знаю, оба указателя, оба бессмысленные.

[Lotles]

Сообщение от Aristarh Dark

Я знаю, оба указателя, оба бессмысленные.

Может для кого то и бессмысленные, но для меня это важно, ответьте:
var

Код:

Form1: TForm1;
S:String;
p2:pointer;
implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
S:='Test'; 
p2:=pointer(S);
end;
end.

Скажите что находится в p2 ???

[Aristarh Dark]

Странный ты, видимо читать не любишь.
В дельфи строка тупо указатель, первые четые байта - смещение, потом данные #0 оканчивающиеся. А интерпритатор делает их удобными тебе (строки). Так вот в p2 у тебя указатель на указатель на строку, т.е. бессмысленный
А вот если ты сделаешь:

Код:

p2:=@s[1];

Это будет указатель на начало строки, #0 оканчивается, если забыл. Всего 2 гига, больше (семерка по крайней мере) не адресуется.

[Lotles]

Спасибо за подробное изложение
но
p2:=pointer(S) - это указатель на указатель на строку как вы сказали, а указатель в моем понимании это адрес, поэтому я запутался, когда вспомнил про p1:=@S , так и не пойму, чем отличается их содержимое ???