Text selbst zeichnen in einer TVirtualStringTree

[mimi]

Hallo,
wie kann ich das zeichnen übernhemen, in einer TVirtualStringTree ?

[Prototypjack]

Moin!
Das Text zeichnen, oder das zeichnen der einzelnen Nodes?
Gruß,
Max

[opfer.der.genauigkeit]

Hi,

dafür gibt es diverse Events.
OnAfterCellPaint
OnBeforeCellPaint
OnPaintText
...

In den meisten oder allen Fällen steht dir ein TargetCanvas Objekt zur
Verfügung.

Damit kannst du dann machen, was du magst.

OnPaintText
TargetCanvas.Font.Color := clRed; OnBeforeCellPaint

Delphi-Quellcode:

TargetCanvas.Brush.Color := clGreen;
TargetCanvas.FillRect( CellRect );

Edit:// Wenn du alles selbst zeichnen möchtest, dann empfiehlt sich wohl eher TVirtualDrawTree.

MfG
odg

[mimi]

danke werde ich mir mal überlegen. es sind auch nur "spierreien" *G*