Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Программы » Inno Setup (создание инсталяционных пакетов)

Модерирует : gyra, Maz

Widok (23-11-2010 10:55): лимит страниц. продолжаем здесь  Версия для печати • ПодписатьсяДобавить в закладки
На первую страницук этому сообщениюк последнему сообщению

   

qwerqwer444

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
[Setup]
AppName=My Prog
AppVersion=1.00
CreateAppDir=no
DisableProgramGroupPage=yes
OutputDir=Output
OutputBaseFilename=Installer
Compression=lzma
SolidCompression=yes
 
[Files]
Source: ".files\vstplug.dll"; DestDir: "{code:GetDir}"; Flags: ignoreversion
Source: ".files\directXplug.dll"; DestDir: "{code:GetDir2}"; Flags: ignoreversion
 
[Code]
var
  Page: TInputDirWizardPage;
  DataDir: String;
 
procedure InitializeWizard();
begin
Page := CreateInputDirPage(wpWelcome, 'Select Data Location',
    'Data directory',
    'Please choose your folder',
    False, 'New Folder');
Page.Add('Vst plugin');
Page.Add('DirectX plugin');
Page.Values[0] := ExpandConstant('{pf}\VST');
Page.Values[1] := ExpandConstant('{pf}'\DirectX plugs);
DataDir := Page.Values[0];
end;
 
function GetDir(Param: String): String;
begin
Result := Page.Values[0];
end;
function GetDir2(Param: String): String;
begin
Result := Page.Values[1];
end;

Всего записей: 127 | Зарегистр. 22-08-2010 | Отправлено: 13:41 05-11-2010 | Исправлено: qwerqwer444, 13:45 05-11-2010
   

На первую страницук этому сообщениюк последнему сообщению

Компьютерный форум Ru.Board » Компьютеры » Программы » Inno Setup (создание инсталяционных пакетов)
Widok (23-11-2010 10:55): лимит страниц. продолжаем здесь


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru