Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: ListView und ProgressBar

    Delphi
    by Manne, 6. Mär 2005
  es gibt ne procedure OnGetText, die sieht dann z.B. so aus:
  
  procedure TForm1.VirtualStringTree2GetText(Sender: TBaseVirtualTree;
  Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType;
  var CellText: WideString);
  var data : PIcoFileItem;
  begin
  data := VirtualStringTree2.GetNodeData(Node);
  case Column of
  0: CellText := data.Caption;