So kannst du ein Ereignis mit einer Behandlungsroutine im Quelltext verknüpfen:
Delphi-Quellcode:
procedure Form1.FormActivate (Sender: TObject);
begin
Button1.Caption := IntToStr(i);
Inc (i);
end;
procedure Form1.FormCreate (Sender: TObject);
begin
Application.OnActivate := FormActivate; // <-- hier ist die Zuweisung
end;
Gruß Hawkeye