Probiers mal etwa so was:
...
Delphi-Quellcode:
type
PData = ^TData;
TData = record
FCaption: String;
FColumn1: String;
FColumn2: String;
end;
...
Delphi-Quellcode:
procedure TForm1.BitBtn1Click(Sender: TObject);
var
Node: PVirtualNode;
Data: PData;
begin
Node:=VST.FocusedNode; // im Baum selektierter Knoten
if not Assigned(Node) then Exit;
Data:=VST.GetNodeData(Node); // Zeiger auf Daten
Data.FCaption:= Edit1.Text; // Werte zuweisen
Data.FColumn1:= Edit2.Text;
Data.FColumn2:= Edit3.Text;
VST.RepaintNode(Node);
end;
Hier werdem dem selektierten Knoten neue Werte aus Editfeldern zugewiesen wenn auf BitBtn1 gedrückt wird.
So in etwa hab ich die Frage verstanden. Steht aber alles im Tutor!!! (und so manch anderes Interessante auch)