Пример работы с указателями
01.01.2007
var p1 : ^String; s1 : String; begin s1 := 'NotTest'; new (p1); p1 := @s1; p1^ := 'Test'; Label1.Caption := s1
Взято с Vingrad.ru https://forum.vingrad.ru
var p1 : ^String; s1 : String; begin s1 := 'NotTest'; new (p1); p1 := @s1; p1^ := 'Test'; Label1.Caption := s1
Взято с Vingrad.ru https://forum.vingrad.ru