{
This example uses a timer on a form. When the application 
runs and the user minimizes the application, the timer 
starts and the application returns to its normal size when 
an OnTimer event occurs.  The timer then shuts down until the
next time the form is minimized.
Be sure to declare the AppStartTimer method as a public 
method of TForm1.
} 
procedure TForm1.FormCreate(Sender: TObject);
begin
  Application.OnMinimize := AppStartTimer;
end;
procedure TForm1.AppStartTimer(Sender: TObject);
begin
  Timer1.Enabled := True;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Application.Restore;
  Timer1.Enabled := False;
end;
