Dein Ansatz ist für mein Problem auch falsch
So ein bisschen Pseudocode zur Verdeutlichung:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
ÄnderDieSchriftFarbeVomAngewähltenNode(clgreen); // Dauerhaft
ÄnderDieSchriftFarbeVonAllenAnderenNodes(clblack); // Dauerhaft. Bis halt ein anderes Node markiert ist und der Button geklickt wird. Dann soll das neue Node grün sein und die anderen schwarz
end;