VirtualDrawTree: Bereich rechts von letzter Spalte zeichnen

[s.h.a.r.k]

Zitat von Hawkeye219:

Hallo Armin,

vielleicht geht es so:

Delphi-Quellcode:

procedure TDemoForm.VDTBeforeItemErase(Sender: TBaseVirtualTree; TargetCanvas: TCanvas;
  Node: PVirtualNode; ItemRect: TRect; var ItemColor: TColor; var EraseAction: TItemEraseAction);
begin
  ItemRect.Left := 0;
  ItemRect.Right := Sender.ClientWidth;
  {GraphUtil.}GradientFillCanvas (TargetCanvas, clAqua, clYellow, ItemRect, gdHorizontal);

  EraseAction := eaNone;
end;

Gruß Hawkeye

Naja, es funktionier nicht nur vielleicht, sondern es tut wirklich. Aber warum eigentlich?