Moin,
ich arbeite das Tutorial zu Virtualtreeview durch und habe schon auf den ersten Seiten zwei Fragen:
1) auf Seite zwei wird geschrieben wie man an einer bestimmten Stelle einen Node einfügen kann:
Node := vst.InsertNode(vst.FocusedNode, amInsertAfter);
allerdings wird bei mir das "amInsertAfter" als unbekannt markiert - fehlt mir da ein uses ?
2) auf Seite 3 werden Noites mit Beschriftung erstellt:
Delphi-Quellcode:
function AddVSTStructure(AVST: TCustomVirtualStringTree; ANode: PVirtualNode;
ARecord: TTreeData): PVirtualNode;
var
Data: PTreeData;
begin
Result:=AVST.AddChild(ANode);
Data:=AVST.GetNodeData(Result);
Avst.ValidateNode(Result, False);
Data^.FCaption:=ARecord.FCaption;
end;
procedure TForm1.Button3Click(Sender: TObject);
var
I: Integer;
TreeData: TTreeData;
begin
VST.NodeDataSize:=SizeOf(TTreeData);
VST.BeginUpdate;
for I:=0 to 100 do
begin
TreeData.FCaption:='Node-Nummer: '+IntToStr(I);
AddVSTStructure(VST,nil,TreeData);
end;
VST.EndUpdate;
end;
Ich hötte erwartet das jetzt statt "Node" immer "Node-Nummer 1..2..3..4..usw" steht - es steht aber weiterhin nur Node.
Denke ich da falsch ? Was mache ich denn wenn da nicht nur Node stehen soll.´??
Hans