Einzelnen Beitrag anzeigen

Apollonius

Registriert seit: 16. Apr 2007
2.325 Beiträge
 
Turbo Delphi für Win32
 
#2

Re: OnChange für OnActivate erstellte Komponenten

  Alt 18. Mai 2007, 15:14
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
Wer erweist der Welt einen Dienst und findet ein gutes Synonym für "Pointer"?
"An interface pointer is a pointer to a pointer. This pointer points to an array of pointers, each of which points to an interface function."
  Mit Zitat antworten Zitat