Du definierst dir deine eigene Eventprozedur, also oben im Interface:
Delphi-Quellcode:
TForm1=Class(TForm)
//alle möglichen Deklarationen
procedure myevent(sender:TObject);
end;
Wichtig ist, dass die Parameterliste genau einen Parameter (Der Name ist egal, aber "sender" ist Standard) vom Typ TObject hat.
In der Implementation dann:
Delphi-Quellcode:
procedure TForm1.myevent(sender:TObject);
begin
//dein Code
end;
In deine Initialisierungsroutine musst du dann nur noch Edit[x,y].onclick:=myevent schreiben.
Hoffe geholfen zu haben
Apollonius