treeview + liste abspeichern

[tuxic]

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