Delphi - use TRzTrayIcon achieve WinFrm engineering Minimize to tray

RC install third-party controls

Delphi Rz browser search controls download, find download an installation file, unzip click RC3.exe a key installation.

 

 

 

 

Delphi WinFrm engineering Minimize to tray

Delphi New WinFrm project, add TRzTrayIcon, TImageList and TPopupMenu on the main form. In this case run the project, click on the minimize the effect can be realized tray.

 

 

Achieve prompt the system to minimize

Select RzTrayIcon, click F11, select Events, double-click OnMinimizeApp, write the following code:

TForm1.RzTrayIcon1MinimizeApp Procedure (Sender: TObject); 
the begin 
    RzTrayIcon1.ShowBalloonHint (Application.Title, 'You can find me here Yo!', bhiInfo); 
End;

 

 

 

running result:

 

 

 

Add the minimize icon in the right-click menu and prompt effect Hint

Select RzTrayIcon, click F11, select Properties, write "system test Hint", and bind ImageList1, PopupMenu1 in the Hint.

Double-click TImageList, add Icon icon.

Double-PopupMenu, add the following menu (settable as desired).

 

 

 

 

 

 

 

 

 

 

Guess you like

Origin www.cnblogs.com/jijm123/p/12602685.html