Sperren eines OnClick-Ereignisses beim Ersten Klick auf ein Formular

[MARGERSCH]

Wenn ich eine Komponente auf einem Formular anklicke, wird das OnClick-Ereignis
sofort ausgelöst. Ich möchte aber, dass beim Ersten Klick das Formular nur den Fokus erhält und zum Auslösen des OnClick-Ereignisses ein zweiter Klick auf die Komponente nötig ist. Welche Möglichkeiten habe ich ?

[Jumpy]

Ne boolsche Variable als eine Art "Flag" das anzeigt ob dies der erste oder zweite klick auf die Komponente (oder irgendeine Komponente?) war, ala:

Delphi-Quellcode:

procedure Button1Click(Sender:TObject);
begin
  if FirstClick then
    FirstClick:=false
  else
    begin
    //Der eigentliche Evenhandler-Code
    end;
end;

Ich überlege nur gerade wie man das wieder zurücksetzt, wenn das Formular den Fokus verliert....?

[DeddyH]

Könnte man nicht die WM_ACTIVATE-Message abfangen oder einfach nur einen Handler für OnActivate (Formular und Applikation) schreiben?