Q: How do perform something on the form's OnActivate method? (It doesn't always fire. e.g. if you ALT-TAB to it, then OnActivate doesn't fire.)
A:
procedure TForm2.FormCreate(Sender: TObject);
begin
application.OnActivate := FormActivate;
end;