Nochmal VST - Node einfärben

[Gollum]

Hallo,

der Knoten (Node) und die Spalte (Column) die gezeichnet werden sollen, werden Dir doch im Ereignis übergeben.

Ich hoffe einmal, Du weist dann, wie Du auf Deine im VT gespeicherten Infos zugreifen kannst.

[MasterTobi]

Hallo ,

meine strucktur ist ja nur

node
+'irgendwas'
---- 'irgendeine nummer'
+'irgendwas2'
---- 'irgendeine nummer2'
+'irgendwas3'
---- 'irgendeine nummer3'

so wenn nun jetzt

Delphi-Quellcode:

       n := virtualstringtree1.GetFirst;
      while assigned(n) do
       begin
       if assigned(n) then
       begin
        data:=virtualstringtree1.GetNodeData(n);
        if data^.FColumn1='irgendeinenummer' then
        begin
        found:=1;
        foundednode:=n;
        virtualstringtree1.Refresh;
        break;
        end;
        n:=virtualstringtree1.GetNext(n);
       end;

if data^.FColumn1='irgendeinenummer' then stimmig ist, sprich er fragt ab ob das subnode die nummer hat die er bekommen hat(in der abfrage)

dann

Delphi-Quellcode:

procedure TForm1.VirtualStringTree1BeforeCellPaint(
  Sender: TBaseVirtualTree; TargetCanvas: TCanvas; Node: PVirtualNode;
  Column: TColumnIndex; CellRect: TRect);
  var ContentRect: TRect;
  var d:ptreedata;
begin
   with TargetCanvas do
   begin
   d:=virtualstringtree1.GetNodeData(foundednode);
   if found <>1 then exit;
     if d.fColumn1='irgendeinenummer' then targetcanvas.Font.Color:=clred;
     FillRect(CellRect);
   end; // with
end;

sollte es doch funktionieren ? oder nicht. ich übergeb ihm ja mit d:=virtualstringtree1.GetNodeData(foundednode); die daten von der node die er unter foundednode:=n; gesaved hat.

hm ....

[DeddyH]

Wieso fragst Du nicht direkt die Daten der übergebenen Node ab?

[MasterTobi]

-.- weil ich doooof bin

kann sein das wenn der subnode ausgeblendet ist bzw so gemacht is das der nicht angezeigt wird, das er auch nicht den wert auslesen kann ?

habe grad mal

Delphi-Quellcode:

   
with TargetCanvas do
   begin
   d:=virtualstringtree1.GetNodeData(Node);
   showmessage(d.FCaption+d.FColumn1);

mir ausgegeben lassen. Showmessage zeigt mir immer nu den wert der node an, aber nicht der subnode

[DeddyH]

Du bist im BeforeCellPaint-Event? Dann dürfte das klar sein, denn wieso sollten ausgeblendete Knoten gezeichnet werden?

[MasterTobi]

hm stimmt auch wieder -.- dachte die werden zwar gezeichnet aber nur ausgeblendet

[MasterTobi]

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 ?

[DeddyH]

Zitat von MasterTobi:

un zweitens müsste er mir ja das node.parent rot malen.

Wieso denn das? AFAIK wird das Ereignis für den aktuell zu zeichnenden Knoten aufgerufen, man kann also auch nur diesen zeichnen. Und versuch einmal, nach dem Setzen der Schriftfarbe den Text noch einmal auszugeben (Canvas.Textout oder DrawText).

[Gollum]

Hallo,

das kann ja auch nicht funktionieren. Du änderst nicht den (Node-)Zellhintergrund, sondern die Textfarbe. Dazu ist dieses Ereignis nicht gedacht.
Stattdessen musst Du das Ereignis OnPaintText benutzen.

Noch einmal kurz zusammengefasst:
- Um den Hintergrund zu ändern: OnBeforeCellPaint
- Um die Textfarbe zu ändern: OnPaintText

Sollte das nicht genügen oder zu verwirrend sein, kommst Du nicht darum herum, einen TVirtualDrawTree zu nehmen. Dann musst Du aber alles im Ereignis OnDrawNode selber zeichnen.

[MasterTobi]

so ok hab es nun so das er auf das richtige zeigt, bzw das er das richtige rot malen soll.
auch canvas.textout zeigt mir die richtige caption an

nur rot macht er es nicht


edit mom glaub hab da einen kleinen fehler hab mal hintergrund rot gemacht un da macht er es mir in der rootnode rot -.-