Große Probleme mit VirtualStringTree

[jaenicke]

Delphi-Quellcode:

procedure TForm2.VSTGetText(Sender: TBaseVirtualTree; Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType; var CellText: string); // CellText !!!
var
 Data: PTreeData;
begin
 Data := VST.GetNodeData(Node);
 case Column of
  0:
   Text := Data.Col1; // nicht Text !!
  1:
   Text := Data.Col2;
 end;
end;

// EDIT:
Ok, hast du selbst parallel gesehen.