Hey, das hört sich richtig gut an
,
nur leider bin ich mit Pointern nicht vertraut, zum Testen hab ich mal das gebaut, nur leider funktionert es nicht.
Delphi-Quellcode:
procedure TForm1.Button5Click(Sender: TObject);
var
temp:^string;
begin
new(temp);
temp^ := 'lari';
treeview1.Items.Item[0].Data := temp;
memo1.Text := treeview1.Items.Item[0].data^;
end;
in der lezten Zeile kommt der Fehler:
Zitat:
Inkompatible Typen: 'String' und 'procedure, untyped pointer or untyped parameter'
Ich vermute mal der Zugriff auf den Pointer ist nicht richtig