Button besonderes markieren

[Delphiturbo]

Ich habe eine andere Funktion mit einer anderen farbe

Delphi-Quellcode:

procedure TForm1.Edit1Change(Sender: TObject);
begin
Highlight(Btn);
if not Assigned(btn) then
Highlight2(Btn); //mit einer anderen farben (HG-Farbe)
end;

aber ohne Erfolg