Virtual Tree View textfarbe einzelner Rows ändern?

[generic]

Zitat von richard_boderich:

Also ich verwende zurzeit noch Records

Ist doch nicht schlecht. In den meinsten Fällen reicht das auch.
Mein Beispiel hätte nur paar Sachen doppelt implementieren müssen.
(Die Gesamtsumme für OnCompareNodes und onGetText)

Zitat von richard_boderich:

Delphi-Quellcode:

procedure TForm1.VstPaintText(Sender: TBaseVirtualTree;
  const TargetCanvas: TCanvas; Node: PVirtualNode; Column: TColumnIndex;
  TextType: TVSTTextType);
var d: PRMeineDaten;
begin
  d:=Sender.GetNodeData(Node);
  with TargetCanvas do
  begin
    if (Column=3) then if (d^.Hidden='test') then Font.Color:=clRed;
  end; // with TargetCanvas
end;

Das sieht richtig aus.

Ich meine dein Vergleich geht nicht richtig.
Dran gedacht das Column's bei 0 anfangen zu zählen?
4. Column muss nicht Wert 3 sein.
Wenn du die Reihenfolge in der IDE verändert hast, kann das ein andere Wert sein.
(Position)

[edit]
es wird [wenn] auch nur der text der 4. Cell eingefärbt!