【发布时间】:2015-11-10 10:08:51
【问题描述】:
我在 Inno Setup 中创建了自己的自定义最小化按钮。
我想知道当我点击我的安装程序时如何最小化它。
最小化应该就像安装程序边框上的默认最小化按钮一样。
【问题讨论】:
我在 Inno Setup 中创建了自己的自定义最小化按钮。
我想知道当我点击我的安装程序时如何最小化它。
最小化应该就像安装程序边框上的默认最小化按钮一样。
【问题讨论】:
要模拟单击窗口标题中的最小化按钮,请使用PostMessage support function 将WM_SYSCOMMAND message 发送到安装程序向导表单:
const
WM_SYSCOMMAND = 274;
SC_MINIMIZE = $F020;
procedure MinimizeButtonClick(Sender: TObject);
begin
PostMessage(WizardForm.Handle, WM_SYSCOMMAND, SC_MINIMIZE, 0);
end;
【讨论】:
您可以使用此代码。
procedure MinimizeBtnClick(Sender: Tobject);
begin
SendMessage(WizardForm.Handle,$112,61472,0);
end;
【讨论】: