Hallo,
das Ereignis das Du suchst heist OnBeforeCellPaint. In diesem Ereignis kannst Du den Colum-Hintergrund ändern.
Delphi-Quellcode:
procedure TForm1.vtBeforeCellPaint(
Sender: TBaseVirtualTree; TargetCanvas: TCanvas; Node: PVirtualNode;
Column: TColumnIndex; CellPaintMode: TVTCellPaintMode; CellRect: TRect;
var ContentRect: TRect);
begin
with TargetCanvas do
begin
if Odd(Node^.Index) then Brush.Color:=clLightGray
else Brush.Color:=clWindow;
FillRect(CellRect);
end; // with
end;
Obiges Beispiel färbt in einem Tree jede 2. Zeile in einer alternierenden Farbe.