问题描述
- delphi7如何设置最小化托盘?
-
各位大神,问一下delphi7里怎样设置托盘?一定要外置控件吗。
解决方案
outlook最小化到托盘设置
Outlook最小化到托盘设置
如何最小化托盘
解决方案二:
Delphi 有一个控件TrayIcon,通过它可以容易地设置托盘程序了。
TrayBarIcon。
进入托盘代码:
AddIcon(handle);
hide;
解决方案三:
uses
shellapi;
var
ntida: TNotifyIcondataA;
begin
ntida.cbSize := sizeof(tnotifyicondataa);
ntida.Wnd := handle;
ntida.uID := iid;
ntida.uFlags := nif_icon + nif_tip + nif_message;
ntida.uCallbackMessage := mousemsg;
ntida.hIcon := form1.Icon.Handle;
ntida.szTip := 'TIP';
shell_notifyicona(NIM_ADD, @ntida);
end;
大致这样调用,你可以试试。
时间: 2024-12-03 08:49:29