разобраться с указателем

[fate]

создал процедуру

pars(p:pointer);

передаю ей параметр

pars(@Response.DataString);

Response.DataString - это html код
в самой процедуре pars написал так

list:=TstringList.Create;
list.Text:=^p;

кстати так пробовал тоже string(^p)
задумано это для того что бы не передавать string что бы сократить объем выделяемой памяти, т.к. в Response.DataString может содержаться несколько тысяч строк.

но у меня такой вариант не работает, в отладчике смотрел в list.Text записывается несколько символов типа #$10#$D#$A я так понимаю это адрес по которому и находится нужный мне текст, а как его от туда прочитать?

[mss]

procedure pars(p:PChar);
begin
..
list.Text := p;
..
end;

вызов:

pars(PChar(Response.DataString)); // где DataString объавлен как String;


И всех делов)

[Пепел Феникса]

string итак передается по указателю

[GunSmoker]

Мат-часть.

[veniside]

Сообщение от fate

задумано это для того что бы не передавать string

procedure pars(const p: string);

string итак передается по указателю

это да, но без const там добавляется LStrAddRef/LStrCrl + try/finally, как описано у Гансмокера.

[fate]

что-то я о Pchar и не подумал, а ведь тоже вариант.
Ну рас уж это тема про указатели, может скажите почему не работает мой вариант и вообще можно сделать задуманное через указатели?

[GunSmoker]

Сообщение от fate

что-то я о Pchar и не подумал, а ведь тоже вариант.

:wall:

Сообщение от fate

Ну рас уж это тема про указатели, может скажите почему не работает мой вариант?

Хотя бы потому что разыменование указателя - это p^, а не ^p. Тока это не единственная проблема.

Сообщение от fate

и вообще можно сделать задуманное через указатели

Можно:

procedure pars(const p: string);

Это и есть через указатели.