Ветеран
Сообщения: 510
Благодарности: 51
|
Профиль
|
Отправить PM
| Цитировать
leshcat
[Files]
Source: "C:\Users\Urban\Desktop\WizardImage.bmp"; DestDir: {tmp}; Flags: ignoreversion dontcopy nocompression
Source: "isgsg.dll"; DestDir: {tmp}; Flags: ignoreversion dontcopy nocompression
[code]
procedure ShowSplashScreen(p1:HWND;p2:string;p3,p4,p5,p6,p7:integer;p8:boolean;p9:Cardinal;p10:integer); external 'ShowSplashScreen@files:isgsg.dll stdcall delayload';
procedure InitializeWizard;
begin
ExtractTemporaryFile('WizardImage.bmp');
ShowSplashScreen(WizardForm.Handle,ExpandConstant('{tmp}')+'\WizardImage.bmp',1000,3000,1000,0,255,F alse,$FFFFFF,10);
end;
|
Отправлено: 19:48, 18-06-2011
| #1948
|