Hallo Günter,
wo bekommst du denn deine
AV?
Ich habe mir deine
Unit zwar runter geladen, aber sie ist in meiner Umgebung leider nicht ladbar.
Dein Code enthält an vielen Stellen:
with PTreeData(Sender.GetNodeData(Node)^) do .. ;
Mein Vorschlag war:
Delphi-Quellcode:
var
ptd: PTreeData;
begin
ptd := Sender.GetNodeData(Node);
with ptd do ... ;
Du kannst aber auch so vorgehen:
with PTreeData(Sender.GetNodeData(Node))^ do .. ;
Da ist schon ein Unterschied...
marabu