用delphi 怎样在我写的程序安装的时候向系统注册:在桌面上、开始|程序菜单中、
系统桌面工具条的右下角(有一个小喇叭的地方)我的程序的图表?
您能示列用代码吗?
--------------------
谢谢您
系统桌面工具条的右下角(有一个小喇叭的地方)我的程序的图表?
您能示列用代码吗?
--------------------
谢谢您
解决方案 »
- (100分提問)inno setup 5编绎安装后连不上 sql server服务器
- int -> str
- 求助
- 菜鸟问:Delphi中安装的控件怎么给它删除呢?
- 关于图片字节压缩的问题,救命啊!!!
- 计算字段问题,请大家帮忙 急啊~~~~
- tlink=^note; //运行时出现(Expected':' but'='found)怎样解决
- 谁有文件传送的例子?给200分!
- 在Application.Run之前可以使用Application.terminate?
- 有谁有象windows中画图里面的颜色盒那样的控件??急急急!!!
- 如何打开一个paradox表
- 问:该调用什么API获取可执行文件(.Exe,.Dll等)的版本,公司名称,程序名称等信息呢?
这个要写代码的,给点你看看好了:
flag_receive:=false;
flag_send:=false;
icnApp:=TICON.create;
icnApp.LoadFromFile(ExtractFilePath(Application.ExeName)+'hualong.ico');
ndApp.cbSize := sizeof(NotifyIconData);
ndApp.Wnd := handle;
ndApp.uID := 0;
ndApp.uFlags := NIF_MESSAGE or NIF_ICON or NIF_TIP;
ndApp.uCallbackMessage := WM_TRAYNOTIFY;
ndApp.hIcon := icnApp.Handle;
StrPLCopy(ndApp.szTip,'湖州短信专线通讯', 63); //在任务栏状态区添加图标
Shell_NotifyIcon(NIM_ADD, @ndApp);
http://www.delphiboy.com/cgi-bin/doc/datacontent.php?no=336