Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
 
Delphi 10.4 Sydney
 
#6

Re: Komisches Problem mit Pointer

  Alt 14. Okt 2009, 10:16
Hallo,

gaaaanz schlecht.
Warum zum Teufel machst du sowas ???

Merke dir doch den Node selbst.

MS hat dem TTreeNode dazu die Data Variable (einfacher Pointer) verpasst.

Ich packe da immer eine eigene Klasse rein,
die die Node-Infos enthält.

in TTreeView.OnDeleting wird auch die Klasse wieder gelöscht.

Delphi-Quellcode:
type
  TTreeNodeInfo = class
    Tag: Integer;
  end;

var
  TreeNodeInfo: TTreeNodeInfo

TreeNode:= TV.Items.Add;
TreeNodeInfo:= TTreeNodeInfo.Create;
TreeNodeInfo,Tag:= 1;
TreeNode.Data:= TreeNodeInfo;

Heiko
Heiko
  Mit Zitat antworten Zitat