[Edison007]

No4noylis
Нужно задать Parent
Вот пример кода:

читать дальше »

[code]
var
Img:Longint;

function InitializeSetup:boolean;
begin
if not FileExists(ExpandConstant('{tmp}\botva2.dll')) then ExtractTemporaryFile('botva2.dll');
Result:=True;
end;

procedure InitializeWizard;
begin
ExtractTemporaryFile('mspaint.png');
Img:=ImgLoad(WizardForm.SelectDirPage.Handle,ExpandConstant('{tmp}\mspaint.png'),230,100,100,100,Tru e,True);
ImgApplyChanges(WizardForm.SelectDirPage.Handle);
end;

procedure DeinitializeSetup;
begin
gdipShutDown;
end;