唐 唐纳王 Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-16 #1 为何我的程序关闭后仍然会在任务栏上留下方框(有时空白,有时有微软windows的图标),而这些 方框用鼠标一点即会消失? 编程中有什么问题吗?
Y YB_unique Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-16 #4 原因是因为窗体的WindowState:=wsMaximized，而且BorderIcons中没有biMaximize属性。 解决办法： procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); begin Form1.BorderIcons := Form1.BorderIcons + [biMaximize]; end; 放在 OnCloseQuery 事件中是因为它能够在关闭之前执行，它比OnClose事件先执行，效果理论上比之好。
原因是因为窗体的WindowState:=wsMaximized，而且BorderIcons中没有biMaximize属性。 解决办法： procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); begin Form1.BorderIcons := Form1.BorderIcons + [biMaximize]; end; 放在 OnCloseQuery 事件中是因为它能够在关闭之前执行，它比OnClose事件先执行，效果理论上比之好。
唐 唐纳王 Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-19 #6 是设置了窗体的最大化属性,按YB_unique的方法做了修改,但仍未解决问题?
W wjiachun Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-26 #9 这个问题居然还没有解决？ 应该算是一个BUG，屏保运行完了也有僵尸的。 试试这么做： procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin width:=0; end; 一定可以的
这个问题居然还没有解决？ 应该算是一个BUG，屏保运行完了也有僵尸的。 试试这么做： procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin width:=0; end; 一定可以的
