如何将程序缩小到任务栏？

[wshuo]

用WindowState:=wsMinimized不能将程序缩小到任务栏，只能缩小到左下角。是不是还要设置什么属性？

[hkbarton]

缩小到任务拦首先要使用shell_NotifyIcon(nim_add,@IconData);安装一个任务图标到任务拦，然后再将窗体隐藏，其中icondata是一个图标结构，一个图标结构的例子如下：
with IconData do
begin
cbsize:=sizeof(IconData);//大小
Wnd:=self.Handle;//所属的窗体句柄
uId:=0;//id
uFlags:=NIF_ICON or NIF_MESSAGE or NIF_TIP;//标志
uCallBackMessage:=WM_TrayCallBack;//图标的回调消息
hIcon:=loadIcon(hInstance,'MAINICON');//从实例句柄中载入图标
szTip:='xxx';//图标提示文字
end;
其实这方面的文章太多了，你可以搜索一下，不是你想的那么简单可以直接将程序缩小到任务栏的

[go_my_sky]

就是使用托盘技术。

[boom201]

其实楼上说的是任务栏，不是系统栏，你们不要答非所问啊


楼上的你这样写，windowstate:=wsminimized;
form1.hide;
应该可以了，如果有问题，在发帖问。

[boom201]

不好意思，楼上的我说错了，你把windowstate;=wsminimized改成application.minimize;就可以了。

[boom201]

你把windowstate:=wsminimized改成application.minimize;就可以了。