Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Старожил


Сообщения: 242
Благодарности: 128

Профиль | Отправить PM | Цитировать


volga163@vk может тебе сплэш нужен

читать дальше »
[Files]
Source: "Splash.png"; DestDir: {tmp}; Flags: ignoreversion dontcopy nocompression
Source: "isgsg.dll"; DestDir: {tmp}; Flags: ignoreversion dontcopy nocompression

[code]
procedure ShowSplashScreen(p1:HWND;p2:ansistring;p3,p4,p5,p6,p7:integer;p8:boolean;p9:Cardinal;p10:integer); external 'ShowSplashScreen@files:isgsg.dll stdcall delayload';

procedure InitializeWizard;
begin
ExtractTemporaryFile('Splash.png');
ShowSplashScreen(WizardForm.Handle,ExpandConstant('{tmp}')+'\Splash.png',1000,3000,1000,0,255,False, $FFFFFF,10);
end;

Последний раз редактировалось vint56, 19-07-2013 в 14:13.


Отправлено: 13:48, 19-07-2013 | #813