Virtual TreeView, pro SubItem verschiedene Spalten

[stifflersmom]

Ich glaube, dass es dennoch möglich ist,
das gewünschte Ergebnis zu erreichen.

Für den VS legen wir zu Darstellung ja eine eigene Datenstruktur an,
und die können wir uns ja nach Belieben zusammenstellen.

Delphi-Quellcode:

 Type
    Ptreedbdata = ^TTreeDbData;
    TTreeDbdata = Record
      categories_id      : Integer;
      parent_id          : Integer;
      Caption            : String;
      report_ID          : Integer;
      Icon_Index         : Integer;
      ReportFile         : String;
      Faktura            : Integer;
    end;

Pass Dir die Struktur einfach zusammen wie es Dir gefällt.

Und im GetText-Ereignis des VS kannst Du dann dementsprechend reagieren
und die Texte anpassen

Delphi-Quellcode:

var
  Data: PTreeDBData;
begin
  Data:=ReportTree.GetNodeData(Node);
  If Data.Faktura = 1 Then Celltext := 'Rechnung'
  ... bla bla
end;

Und ähnlich könntest Du beim Zeichnen der Nodes vorgehen.

Moin