RXTrayIcon实例
提示一个RXTrayIcon控制实例,最好有祥解...谢谢
[解决办法]
- Delphi(Pascal) code
1、设置RXTrayIcon的icon和icons2、给popupmenu关联一个右键菜单3、在它的onDblClick事件中写一下代码procedure TFormMain.RxTrayIcon1DblClick(Sender: TObject);begin ShowWindow(Application.Handle, SW_RESTORE); setwindowpos(application.handle,HWND_TOPMOST,0,0,0,0,swp_hidewindow);end;