Huhu dank euch hab ic schonmal meine halbe miete hehe, nur es stellt sich jetzt noch folgende frage
Delphi-Quellcode:
procedure TForm1.VirtualStringTree1BeforeCellPaint(
Sender: TBaseVirtualTree; TargetCanvas: TCanvas; Node: PVirtualNode;
Column: TColumnIndex; CellRect: TRect);
var ContentRect: TRect;
var d,d2:ptreedata;
begin
with TargetCanvas do
begin
d:=virtualstringtree1.getnodedata(node);
d2:=virtualstringtree1.getnodedata(node.Parent);
showmessage('d'+d^.FCaption+'...'+'d2'+d2^.FCaption);
if d^.FCaption=inttostr('diedummenummer') then
//showmessage(d.FCaption);
showmessage('ok'); TargetCanvas.Font.Color:=clred;
FillRect(CellRect);
end;
// with
end;
also erstens malt er mir es gar nicht rot
un zweitens müsste er mir ja das node.parent rot malen. jemand noch eine idee ?