默认情况下,自定义表单在标题栏中使用与主WizardForm
(即SetupIconFile
)相同的图标。有什么方法可以在标题栏上给自定义表单一个不同的图标?
[Code]
var
CustomWindowForm: TForm;
{ Create and show the Custom window }
procedure ShowCustomWindow();
begin
CustomWindowForm := TForm.Create(WizardForm);
with CustomWindowForm do
begin
BorderStyle := bsSingle;
Position := poOwnerFormCenter;
Caption := 'Window Title';
ClientWidth := ScaleX(400);
ClientHeight := ScaleY(400);
Show;
end;
end;
我需要的是类似Icon
的{{1}}属性,但是似乎没有一个属性,而且我在任何地方都找不到任何信息。
答案 0 :(得分:2)
您必须使用WinAPI,尤其是LoadImage
function和WM_SETICON
message:
docker run -p 9090:9090 ...
(该代码适用于Inno Setup的Unicode版本)