Treeview: Pointer auf Query-Datensatz in .Data-Eigenschaft?

[meggles]

Hallo,
ich baue aus einer Query-Datenmenge, die eine Ordnerstruktur beschreibt, in Delphi rekursiv eine Treeview auf.
Nun ist es so, dass die Query viele Eigenschaften dieser Ordner bereithält. Ich möchte nun beim rekursiven Aufbau der TV der .Data-Eigenschaft des jeweiligen Nodes einen Zeiger auf den entsprechenden Datensatz übergeben, um alleine mit .data auf den Datensatz zugreifen zu können. Funktioniert das irgendwie?

Ich verwende Delphi 7, Interbase, IBObjects.

Vielen Dank!,
Simon

[Jens Schumann]

Hallo,
Du könntest Dir eine Klasse mit den nötigen Felder basteln. D.h. die Klasse erhält für jedes Feld aus der Datenbank eine entsprechende Eigenschaft. Der Instanz dieser Klasse kannst Du dann an die Data Eigenschaft klemmen.

Im OnDeletion Event des TTreeView kannst Du dann FreeAndNil(Node.Data) reinschreiben.