ListView und ProgressBar

[mumu]

also irgendwie schaff ichs nichtmal ne Node mit einem bestimmten Text hinzuzufügen.

ich habe mein record:

Delphi-Quellcode:

type
  PTreeData = ^TTreeData;
  TTreeData = record
    Caption : string;
    SubItem1: string;
  end;

dann setze ich die NodeDataSize
VST.NodeDataSize := SizeOf(TTreeData); und füge den node hinzu mit dem gewünschten text.

Delphi-Quellcode:

var
  TreeData: PTreeData;
  Node: PVirtualNode;

begin
  Node := VST.AddChild(nil);
  TreeData := VST.GetNodeData(Node);
  TreeData.Caption := 'Test';
  TreeData.SubItem1 := 'Test2';
end;

Das hinzufügen klappt. nur leider habe ich jetzt in meinen beiden Spalten den Text "Node" stehen, obwohl ich ja 'Test' und 'Test2' zugewiesen hab. Wenn ich jetzt im onclick folgendes einfüg

Delphi-Quellcode:

Node:=VST.FocusedNode;
Data:=VST.GetNodeData(Node);
Showmessage(Data.Caption);

dann zeigt er mir in der MessageBox 'Test' an.


Woran liegt das, dass 'Test' nicht in der Virtual String Tree angezeigt wird????