Onclick-Ereignis (!??!??)

[poterp]

Hallo Experte,
ich habe da eine Frage. Gibt es die Möglichkeit mit Onclick Ereignis folgendes zu schreiben?:

Delphi-Quellcode:

if Edit1.Onclick = true then
begin
edit1.Font.Style:= edit1.Font.Style + [fsBold];
Label30.Font.Style:= label30.Font.Style + [fsBold];
End
Else
Begin
edit1.Font.Style:= edit1.Font.Style - [fsBold];
Label30.Font.Style:= label30.Font.Style - [fsBold];
End;

Die Sachen sind die: ich habe eine Anwendung mit 30 Edit-Felder und 30 Label.
Ich möchte folgendes, wenn man zufällig in ein der Editfeld click sollte den Schrift von dem Label und dementsprechende Edit Fett angezeigt werden.
Habe ich schon das mit Vk_left, Vk_right, Vk_up und vk_down gemacht und da bin ich bei Onclick-ereignis hängengebliebn.

Danke
Poter