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

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

Аватара для R.i.m.s.k.y.

Ветеран


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

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


Цитата Cheatkiller:
У меня не получается, чтобы установщик включал в себя две и более папок (например я хочу в игре Сталкер упаковать отдельно папку bin и gamedata) »
Код: Выделить весь код
[Files]
Source: stalcker\*; DestDir: {app}\; Flags: ignoreversion recursesubdirs createallsubdirs
Флаги "recursesubdirs createallsubdirs" обрабатывают подкаталоги и создают их соответственно.
А по второму вопросу не скажу - я не делал фоновые изображения. Могу только указать на коллекцию скриптов в шапке темы, что-то подобное там есть. Вот пример оттуда
Код: Выделить весь код
[Files] 
Source: "C:\background.bmp"; DestDir: "{tmp}"; Flags: dontcopy 

[_Code] 
function GetSystemMetrics(nIndex:Integer):Integer; 
external 'GetSystemMetrics@user32.dll stdcall'; 

procedure InitializeWizard(); 
var 
BackgroundBitmapImage: TBitmapImage; 
s:string; 
width, height:Integer; 
bitmap:TBitmap; 
begin 
ExtractTemporaryFile('background.bmp'); 
WizardForm.Position:=poScreenCenter; 
MainForm.BORDERSTYLE:=bsNone; 
width:=GetSystemMetrics(61); 
height:=GetSystemMetrics(62); 
MainForm.Width:=width; 
MainForm.Height:=height; 
width:=MainForm.ClientWidth; 
height:=MainForm.ClientHeight; 
s:=ExpandConstant('{tmp}')+'\background.bmp'; 
BackgroundBitmapImage := TBitmapImage.Create(MainForm); 
BackgroundBitmapImage.Bitmap.LoadFromFile(s); 
BackgroundBitmapImage.Align := alClient; 
BackgroundBitmapImage.Parent := MainForm; 
BackgroundBitmapImage.Stretch:=True; 
MainForm.Visible:=True; 
end;

-------
Хороший установщик тот, которого не замечаешь
Оформление в инно пустая трата времени: толку мало, головняка много, а ошибок истчо больше!

Это сообщение посчитали полезным следующие участники:

Отправлено: 14:48, 16-09-2010 | #2326