RAD Studio VCL Reference
|
Occurs when an application is minimized.
property OnMinimize: TNotifyEvent;
__property TNotifyEvent OnMinimize;
Write an OnMinimize event handler to perform special processing when the application is minimized. The application is minimized, either because the user minimizes the main window, or because of a call to the Minimize method. The Icon property determines the icon that represents the minimized application.
C++ Examples:
/* 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. Place a TTimer object in the form and enter Timer1Timer in the OnTimer event. */ void __fastcall TForm1::FormCreate(TObject *Sender) { Application->OnMinimize = AppStartTimer; Timer1->Interval = 1000; } void __fastcall TForm1::AppStartTimer(TObject *Sender) { Timer1->Enabled = true; } //--------------------------------------------------------------------------- void __fastcall TForm1::Timer1Timer(TObject *Sender) { Application->Restore(); Timer1->Enabled = false; }
Delphi Examples:
{ 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. Place a TTimer object in the form and enter Timer1Timer in the OnTimer event. } 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;
Copyright(C) 2008 CodeGear(TM). All Rights Reserved.
|
What do you think about this topic? Send feedback!
|