发信人: lofe ()感激生活(), 信区: BorlandDev
标  题: .使程序保持图标状态
发信站: 哈工大紫丁香 (Mon Sep  4 16:08:30 2000), 转信

KEEPAPPICONIZED.PAS


1.先把Form1的属性WindowState设置成wsMinimized；

2.在Form1声明中的Private一节中加入如下语句:
PROCEDURE WMQueryOpen(VAR Msg : TWMQueryOpen); message WM_QUERYOPEN;

3.在实现部分，输入下列语句：
PROCEDURE TForm1.WMQueryOpen(VAR Msg : TWMQueryOpen);
begin
  Msg.Result := 0;
end;

--
※ 修改:．haojs 于 Sep  4 16:06:03 修改本文．[FROM: bbs.hit.edu.cn]
--
※ 转寄:．武汉白云黄鹤站 bbs.whnet.edu.cn．[FROM: bbs.hit.edu.cn]

--
☆ 来源:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: haojs.bbs@bbs.whnet.]