[архив] Скрипты Inno Setup. Помощь и советы [часть 2]

[alex2010]

YURSHAT, спасибо. только я все равно не понял где это прописывать , но просмотрел код "подсчет свободного места на ЖД"

и увидел там:



Код:

Код: Выделить всё

begin
  SelectDirText_1.Font.Color:= ClBlack;

. изменил black на green и все стало как надо

[semiono]

на 7 он не пашет

[Chelluga]

Здравствуй народ.



Кто знает, где найти такую тему (см. вложение)?

Вложения

[Расширение jpg было запрещено, вложение больше недоступно.]

[mariolast]

Подскажите пример скриптика, который бы при выборе Удаления программы вызывал бы окошко с чекбоксами,в которых можно проставлять галочки напротив компонентов или файлов, которые нужно удалить или выполнить программу какую то после нажатия кнопки Далее.

И еще подспутно поинтересуюсь, кто то пробовал обьединить скрипты по разпаковке Фриарк и 7z файлов?

[ffa]

alex2010,

будут создаваться только те ярлыки, которые можно выбрать через Tasks.. как то так.

Код:

Код: Выделить всё

[Tasks]
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked
[Icons]
Name: "{commondesktop}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Tasks: desktopicon

в этом случае можно создавать ярлыки через секцию [Сode]

[nik1967]

Есть такая проблемка. Использую скрипт распаковки FreeArc. Вот он:

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

;[English]

;Example of using unarc.dll for decompression of FreeArc archives with displaying of progress indicator in Inno Setup window.

;In order to use the script compile it and put *.arc archives to the same directory as installer executable before running it.

;The script requires Inno Setup QuickStart Pack 5.2.3 and above (

http://files.jrsoftware.org

)

;You will also need InnoCallback.dll that may be found at the

http://www.sherlocksoftware.org/page.php?id=54

;[Russian]

;Пример распаковки FreeArc архива при помощи unarc.dll, с отображением прогресса распаковки в окне Inno Setup.

;Для использования скрипта откомпилируйте его и поместите архивы *.arc в один каталог с инсталятором перед тем как запустить его.

;Скрипт совместим с Inno Setup QuickStart Pack 5.2.3 и выше (

http://files.jrsoftware.org

)

;Вам также потребуется InnoCallback.dll (

http://www.sherlocksoftware.org/page.php?id=54

)



; Версия 3.5 от Bulat Ziganshin, 21-12-2009

; - поддержка опций -ap/-ld/-cfg в FreeArcExtract()

; - ускорена распаковка при большом количестве wav-файлов (метод TTA)

; - можно передавать NULL в качестве первого параметра (callback) в FreeArcExtract()

; - исправлена ошибка: обрабатывались опции после '--'

;

; Версия 3.4 от Bulat Ziganshin, 18-11-2009

; - улучшение в unarc.dll - не создаёт временные файлы при распаковке rep:1gb и фрагментированной памяти

; - поддержка метода 4x4

;

; Версия 3.3 от Bulat Ziganshin, 13-09-2009

; - ускорение распаковки на 10%

; - FreeArcExtract() поддерживает опцию '-wPATH' для задания каталога для временных файлов

; - при прерывании распаковки стирает временные файлы

; - исправлена ошибка в unarc.dll - вылетала при распаковке с использованием временных файлов

;

; Версия 3.2 от Bulat Ziganshin, 31-07-2009

; - исправлена unarc.dll - теперь она не вылетает на сбойных архивах

;

; Версия 3.1 от Bulat Ziganshin, 29-07-2009

; - более плавный индикатор прогресса (данные из LZMA пишутся кусками по 8 мб вместо dictsize)

; - больше не грузятся всякие левые facompress.dll из PATH

;

; Версия 3.0 от Bulat Ziganshin, 29-07-2009

; - функция ArchiveOrigSize возвращает объём данных в архиве

; - наименования колбэков изменены на read и write (было progress и written)

;

; Версия 2.1 от Bulat Ziganshin, 10-07-2009

; - Кнопка 'Отмена установки' теперь по расположению, размеру и надписи точно дублирует стандартную кнопку Отмена

; - В unarc.dll исправлена ошибка, чреватая потенциальными проблемами при распаковке множества архивов

;

; Версия 2.0 от Bulat Ziganshin, 08-07-2009

; - Корректно отображает общий объём установки и сколько данных уже распаковано

; - Индикатор прогресса теперь основан на объёме распакованных и записанных на диск данных

; - Дополнительно отображается сколько осталось времени

; - FreeArcCallback вызывается не менее 100 раз в секунду, что заменяет вызов по таймеру

; - Добавлен placeholder для периодически выполняемого кода (в начале процедуры FreeArcCallback)

; - Исправлена проблема с удалением последнего распакованного файла при отмене инсталяции

; - Исправлена проблема с русскими именами/путями распаковываемых архивов

; - Кнопка 'Отменить распаковку' масштабируется в зависимости от размеров формы

; - Исправлено вычисление оставшегося времени (теперь отсчёт начинается в момент начала распаковки)

; - За пределами процесса распаковки все лишние надписи убираются с экрана

;

; Изменения от Victor_Dobrov, 02-07-2009

; - Кнопка инсталлятора в панели задач отображает время до завершения обработки всех архивов и общий процент распаковки.

; - В Unicode-версиях инсталлятора правильно отображаются имена файлов.

;

; Изменения от CTACKo & SotM'а. 01-07-2009

; - Правильно создаются папки, если в пути установки встречаются русские буквы

; - При компиляции определяется использование PAnsiChar/PChar. Можно использовать как обычную так и UNICODE версию с установленным препроцессором.

;

; Изменения от SotM'а. 23-06-2009

; - Нижний прогресс бар сместил чуть-чуть вниз, чтобы было видно имя распаковываемого файла.

; - Русские имена файлов теперь правильно отображаются.

; - При нажатии "отмены" при распаковке теперь появляется запрос на подтверждение отмены.

; - Переименовал некоторые переменные, чтобы их имена несли больше информации.

; - Немного переформатировал сам исходный код для более удобного и понятного чтения.

; - Исправил пару сообщений на английском языке.



; Изменения от Victor_Dobrov, 15-06-2009

; - Оптимизация и локализация скрипта, более подробная строка статуса, общий прогресс-бар, при неудачной распаковке выполняется откат (деинсталляция) и показывается текст ошибки.



; Bulat Ziganshin, 13-06-2009

; - Создание библиотеки unarc.dll и скрипта распаковки freearc_example.iss.



[Setup]

AppName=FreeArc Example

AppVerName=FreeArc Example 3.3

DefaultDirName={pf}\FreeArc Example

UsePreviousAppDir=false

DirExistsWarning=no

ShowLanguageDialog=auto

OutputBaseFilename=FreeArc_Example

OutputDir=.

VersionInfoCopyright=Bulat Ziganshin, Victor Dobrov, SotM, CTACKo



[Languages]

Name: eng; MessagesFile: compiler:Default.isl

Name: rus; MessagesFile: compiler:Languages\Russian.isl



[CustomMessages]

eng.ArcBreak=Installation cancelled!

eng.ExtractedInfo=Extracted %1 Mb of %2 Mb

eng.ArcInfo=Archive: %1 of %2

eng.ArcTitle=Extracting FreeArc archive

eng.ArcError=Decompression failed with error code %1

eng.ArcFail=Decompression failed!

eng.AllProgress=Overall extraction progress: %1%%

eng.ArcBroken=Archive %1 is damaged%nor not enough free space.

eng.Extracting=Extracting: %1

eng.taskbar=%1%%, %2 remains

eng.remains=Remaining time: %1

eng.LongTime=at no time

eng.ending=ending

eng.hour= hours

eng.min= mins

eng.sec= secs



rus.ArcBreak=Установка прервана!

rus.ExtractedInfo=Распаковано %1 Мб из %2 Мб

rus.ArcInfo=Архив: %1 из %2

rus.ArcTitle=Распаковка архивов FreeArc

rus.ArcError=Распаковщик FreeArc вернул код ошибки: %1

rus.ArcFail=Распаковка не завершена!

rus.AllProgress=Общий прогресс распаковки: %1%%

rus.ArcBroken=Возможно, архив %1 повреждён%nили недостаточно места на диске назначения.

rus.Extracting=Распаковывается: %1

rus.taskbar=%1%%, жди %2

rus.remains=Осталось ждать %1

rus.LongTime=вечно

rus.ending=завершение

rus.hour= часов

rus.min= мин

rus.sec= сек



[Files]

;Source: *.arc; DestDir: {app}; Flags: nocompression

Source: unarc.dll; DestDir: {tmp}; Flags: dontcopy deleteafterinstall

Source: compiler:InnoCallback.dll; DestDir: {tmp}; Flags: dontcopy



[UninstallDelete]

Type: filesandordirs; Name: {app}

Код: Выделить всё

const

    Archives = '{src}\*.arc';    // укажите расположение архивов FreeArc; для внешних файлов строку в [Files] добавлять необязательно



    PM_REMOVE = 1;

    CP_ACP = 0; CP_UTF8 = 65001;

    oneMb = 1048576;



type

#ifdef UNICODE  ; если у вас ошибка на этой строке, то установите препроцессор или исправьте скрипт для вашей версии Inno Setup

    #define A "W"

#else

    #define A "A"  ; точка входа в SetWindowText, {#A} меняется на A или W в зависимости от версии

    PAnsiChar = PChar;  // Required for Inno Setup 5.3.0 and higher. (требуется для Inno Setup версии 5.3.0 и ниже)

#endif

#if Ver < 84018176

    AnsiString = String; // There is no need for this line in Inno Setup 5.2.4 and above (для Inno Setup версий 5.2.4 и выше эта строка не нужна)

#endif



    TMyMsg = record

        hwnd: HWND;

        message: UINT;

        wParam: Longint;

        lParam: Longint;

        time: DWORD;

        pt: TPoint;

    end;



    TFreeArcCallback = function (what: PAnsiChar; int1, int2: Integer; str: PAnsiChar): Integer;

    TArc = record Path: string; OrigSize: Integer; Size: Extended; end;



var

    ExtractFile: TLabel;

    lblExtractFileName: TLabel;

    btnCancelUnpacking: TButton;

    CancelCode, n, UnPackError, StartInstall: Integer;

    Arcs: array of TArc;

    msgError: string;

    lastMb: Integer;

    baseMb: Integer;

    totalUncompressedSize: Integer;             // total uncompressed size of archive data in mb

    LastTimerEvent: DWORD;



Function MultiByteToWideChar(CodePage: UINT; dwFlags: DWORD; lpMultiByteStr: string; cbMultiByte: integer; lpWideCharStr: string; cchWideChar: integer): longint; external 'MultiByteToWideChar@kernel32.dll stdcall';

Function WideCharToMultiByte(CodePage: UINT; dwFlags: DWORD; lpWideCharStr: string; cchWideChar: integer; lpMultiByteStr: string; cbMultiByte: integer; lpDefaultChar: integer; lpUsedDefaultChar: integer): longint; external 'WideCharToMultiByte@kernel32.dll stdcall';



function PeekMessage(var lpMsg: TMyMsg; hWnd: HWND; wMsgFilterMin, wMsgFilterMax, wRemoveMsg: UINT): BOOL; external 'PeekMessageA@user32.dll stdcall';

function TranslateMessage(const lpMsg: TMyMsg): BOOL; external 'TranslateMessage@user32.dll stdcall';

function DispatchMessage(const lpMsg: TMyMsg): Longint; external 'DispatchMessageA@user32.dll stdcall';



Function OemToChar(lpszSrc, lpszDst: AnsiString): longint; external 'OemToCharA@user32.dll stdcall';

function GetWindowLong(hWnd, nIndex: Integer): Longint; external 'GetWindowLongA@user32 stdcall delayload';

function SetWindowText(hWnd: Longint; lpString: String): Longint; external 'SetWindowText{#A}@user32 stdcall delayload';



function GetTickCount: DWord; external 'GetTickCount@kernel32';

function WrapFreeArcCallback (callback: TFreeArcCallback; paramcount: integer):longword; external 'wrapcallback@files:innocallback.dll stdcall';

function FreeArcExtract (callback: longword; cmd1,cmd2,cmd3,cmd4,cmd5,cmd6,cmd7,cmd8,cmd9,cmd10: PAnsiChar): integer; external 'FreeArcExtract@files:unarc.dll cdecl';



procedure AppProcessMessage;

var

    Msg: TMyMsg;

begin

    while PeekMessage(Msg, 0, 0, 0, PM_REMOVE) do begin

        TranslateMessage(Msg);

        DispatchMessage(Msg);

    end;

end;



// Перевод числа в строку с точностью 3 знака (%.3n) с округлением дробной части, если она есть

Function NumToStr(Float: Extended): String;

Begin

    Result:= Format('%.3n', [Float]); StringChange(Result, ',', '.');

    while ((Result[Length(Result)] = '0') or (Result[Length(Result)] = '.')) and (Length(Result) > 1) do

        SetLength(Result, Length(Result)-1);

End;



function cm(Message: String): String; Begin Result:= ExpandConstant('{cm:'+ Message +'}') End;



Function Size64(Hi, Lo: Integer): Extended;

Begin

    Result:= Lo;

    if Lo= 0 then Result:= origsize;

    except

        Result:= -63;  //    ArcFail

    end;

end;



// Scans the specified folders for archives and add them to list

function FindArcs(dir: string): Extended;

var

    FSR: TFindRec;

Begin

    Result:= 0;

    if FindFirst(ExpandConstant(dir), FSR) then begin

        try

            repeat

                // Skip everything but the folders

                if FSR.Attributes and FILE_ATTRIBUTE_DIRECTORY > 0 then CONTINUE;

                n:= GetArrayLength(Arcs);

                // Expand the folder list

                SetArrayLength(Arcs, n +1);

                Arcs[n].Path:= ExtractFilePath(ExpandConstant(dir)) + FSR.Name;

                Arcs[n].Size:= Size64(FSR.SizeHigh, FSR.SizeLow);

                Result:= Result + Arcs[n].Size;

                Arcs[n].OrigSize := ArchiveOrigSize(Arcs[n].Path)

                totalUncompressedSize := totalUncompressedSize + Arcs[n].OrigSize

            until not FindNext(FSR);

        finally

            FindClose(FSR);

        end;

    end;

End;



// Sets the TaskBar title

Procedure SetTaskBarTitle(Title: String); var h: Integer;

Begin

    h:= GetWindowLong(MainForm.Handle, -8); if h  0 then SetWindowText(h, Title);

End;



// Converts milliseconds to human-readable time

// Конвертирует милисекунды в человеко-читаемое изображение времени

Function TicksToTime(Ticks: DWord; h,m,s: String; detail: Boolean): String;

Begin

    if detail                               {hh:mm:ss format} then

        Result:= PADZ(IntToStr(Ticks/3600000), 2) +':'+ PADZ(IntToStr((Ticks/1000 - Ticks/1000/3600*3600)/60), 2) +':'+ PADZ(IntToStr(Ticks/1000 - Ticks/1000/60*60), 2)

    else if Ticks/3600 >= 1000              {more than hour}  then

        Result:= IntToStr(Ticks/3600000) +h+' '+ PADZ(IntToStr((Ticks/1000 - Ticks/1000/3600*3600)/60), 2) +m

    else if Ticks/60 >= 1000                {1..60 minutes}   then

        Result:= IntToStr(Ticks/60000) +m+' '+ PADZ(IntToStr(Ticks/1000 - Ticks/1000/60*60), 2) +s

   else Result:= IntToStr(Ticks/1000) +s    {less than one minute}

End;



// The main callback function for unpacking FreeArc archives

function FreeArcCallback (what: PAnsiChar; Mb, sizeArc: Integer; str: PAnsiChar): Integer;

var

    percents, Remaining: Integer;

    s: String;

begin

    if GetTickCount - LastTimerEvent > 1000 then begin

        // This code will be executed once each 1000 ms (этот код будет выполняться раз в 1000 миллисекунд)

        //  ....

        // End of code executed by timer

        LastTimerEvent := LastTimerEvent+1000;

    end;

    

    if string(what)='filename' then begin

        // Update FileName label

        lblExtractFileName.Caption:= FmtMessage( cm( 'Extracting' ), [OemToAnsiStr( str )] )

    end else if (string(what)='write') and (totalUncompressedSize>0) and (Mb>lastMb) then begin

        // Assign to Mb *total* amount of data extracted to the moment from all archives

        lastMb := Mb;

        Mb := baseMb+Mb;

    

        // Update progress bar

        WizardForm.ProgressGauge.Position:= Mb;



        // Show how much megabytes/archives were processed up to the moment

        percents:= (Mb*1000) div totalUncompressedSize;

        s := FmtMessage(cm('ExtractedInfo'), [IntToStr(Mb), IntToStr(totalUncompressedSize)]);

        if GetArrayLength(Arcs)>1 then

            s := s + '. '+FmtMessage(cm('ArcInfo'), [IntToStr(n+1), IntToStr(GetArrayLength(Arcs))])

        ExtractFile.Caption := s



        // Calculate and show current percents

        percents:= (Mb*1000) div totalUncompressedSize;

        s:= FmtMessage(cm('AllProgress'), [Format('%.1n', [Abs(percents/10)])]);

        if Mb > 0 then Remaining:= trunc((GetTickCount - StartInstall) * Abs((totalUncompressedSize - Mb)/Mb)) else Remaining:= 0;

        if Remaining = 0 then SetTaskBarTitle(cm('ending')) else begin

            s:= s + '.  '+FmtMessage(cm('remains'), [TicksToTime(Remaining, cm('hour'), cm('min'), cm('sec'), false)])

            SetTaskBarTitle(FmtMessage(cm('taskbar'), [IntToStr(percents/10), TicksToTime(Remaining, 'h', 'm', 's', false)]))

        end;

        WizardForm.FileNameLabel.Caption := s

    end;

    AppProcessMessage;

    Result:= CancelCode;

end;



// Extracts all found archives

function UnPack(Archives: string): Integer;

var

    totalCompressedSize: Extended;

    callback: longword;

    FreeMB, TotalMB: Cardinal;

begin

    // Display 'Extracting FreeArc archive'

    lblExtractFileName.Caption:= '';

    lblExtractFileName.Show;

    ExtractFile.caption:= cm('ArcTitle');

    ExtractFile.Show;

    // Show the 'Cancel unpacking' button and set it as default button

    btnCancelUnpacking.Caption:= WizardForm.CancelButton.Caption;

    btnCancelUnpacking.Show;

    WizardForm.ActiveControl:= btnCancelUnpacking;

    WizardForm.ProgressGauge.Position:= 0;

    // Get the size of all archives

    totalUncompressedSize := 0;

    totalCompressedSize := FindArcs(Archives);

    WizardForm.ProgressGauge.Max:= totalUncompressedSize;

    // Other initializations

    callback:= WrapFreeArcCallback(@FreeArcCallback,4);   //FreeArcCallback has 4 arguments

    StartInstall:= GetTickCount;    {время начала распаковки}

    LastTimerEvent:= GetTickCount;

    baseMb:= 0



    for n:= 0 to GetArrayLength(Arcs) -1 do

    begin

        lastMb := 0

        CancelCode:= 0;

        AppProcessMessage;

        try

            // Pass the specified arguments to 'unarc.dll'

            Result:= FreeArcExtract (callback, 'x', '-o+', '-dp' + AnsiToUtf8( ExpandConstant('{app}') ), '--', AnsiToUtf8(Arcs[n].Path), '', '', '', '', '');

            if CancelCode < 0 then Result:= CancelCode;

        except

            Result:= -63;  //    ArcFail

        end;

        baseMb:= baseMb+lastMb



        // Error occured

        if Result  0 then

        begin

            msgError:= FmtMessage(cm('ArcError'), [IntToStr(Result)]);

            GetSpaceOnDisk(ExtractFileDrive(ExpandConstant('{app}')), True, FreeMB, TotalMB);

            case Result of

                -1: if FreeMB < 32 {Мб на диске} then msgError:= SetupMessage(msgDiskSpaceWarningTitle)

                    else msgError:= msgError + #13#10 + FmtMessage(cm('ArcBroken'), [ExtractFileName(Arcs[n].Path)]);

                -127:   msgError:= cm('ArcBreak');    //Cancel button

                -63:    msgError:= cm('ArcFail');

            end;

//          MsgBox(msgError, mbInformation, MB_OK);    //сообщение показывается на странице завершения

            Log(msgError);

            Break;    //прервать цикл распаковки

        end;

    end;

    // Hide labels and button

    WizardForm.FileNameLabel.Caption:= '';

    lblExtractFileName.Hide;

    ExtractFile.Hide;

    btnCancelUnpacking.Hide;

end;



procedure CurStepChanged(CurStep: TSetupStep);

begin

    if CurStep = ssPostInstall then

    begin

        UnPackError:= UnPack(Archives)

        if UnPackError = 0 then

            SetTaskBarTitle(SetupMessage(msgSetupAppTitle))

        else

        begin

            // Error occured, uninstall it then

            Exec(ExpandConstant('{uninstallexe}'), '/SILENT','', sw_Hide, ewWaitUntilTerminated, n);    //откат установки из-за ошибки unarc.dll

            SetTaskBarTitle(SetupMessage(msgErrorTitle))

            WizardForm.Caption:= SetupMessage(msgErrorTitle) +' - '+ cm('ArcBreak')

        end;

    end;

end;



//    стандартный способ отката (не нужна CurPageChanged), но архивы распаковываются до извлечения файлов инсталлятора

//    if CurStep = ssInstall then

//      if UnPack(Archives)  0 then Abort;



Procedure CurPageChanged(CurPageID: Integer);

Begin

    if (CurPageID = wpFinished) and (UnPackError  0) then

    begin // Extraction was unsuccessful (распаковщик вернул ошибку)

        // Show error message

        WizardForm.FinishedLabel.Font.Color:= $0000C0;    // red (красный)

        WizardForm.FinishedLabel.Height:= WizardForm.FinishedLabel.Height * 2;

        WizardForm.FinishedLabel.Caption:= SetupMessage(msgSetupAborted) + #13#10#13#10 + msgError;

    end;

End;



procedure InitializeWizard();

begin

    with WizardForm.ProgressGauge do

    begin

        // Create a label to show current FileName being extracted

        lblExtractFileName:= TLabel.Create(WizardForm);

        lblExtractFileName.parent:=WizardForm.InstallingPage;

        lblExtractFileName.autosize:=false;

        lblExtractFileName.Width:= Width;

        lblExtractFileName.top:=Top + ScaleY(35);

        lblExtractFileName.Caption:= '';

        lblExtractFileName.Hide;



        // Create a label to show percentage

        ExtractFile:= TLabel.Create(WizardForm);

        ExtractFile.parent:=WizardForm.InstallingPage;

        ExtractFile.autosize:=false;

        ExtractFile.Width:= Width;

        ExtractFile.top:=lblExtractFileName.Top + ScaleY(16);

        ExtractFile.caption:= '';

        ExtractFile.Hide;

    end;



    // Create a 'Cancel unpacking' button and hide it for now.

    btnCancelUnpacking:=TButton.create(WizardForm);

    btnCancelUnpacking.Parent:= WizardForm;

    btnCancelUnpacking.SetBounds(WizardForm.CancelButton.Left, WizardForm.CancelButton.top, WizardForm.CancelButton.Width, WizardForm.CancelButton.Height);

    btnCancelUnpacking.OnClick:= @btnCancelUnpackingOnClick;

    btnCancelUnpacking.Hide;

end;






При установке инсталлятор показывает что требуется места — несколько мегабайт. Размер содержимого архива (всмысле после распаковки) примерно 5 Гб.  Можно ли как-нибудь заставить Inno Setup показывать правильные размеры?



Кстати, может кто-нибудь подскажет, где можно скачать [b]GameScript Generator[/b]? На сайте, что указан в шапке темы, ссылка выпилена.




				Цитата [b]Cartmans[/b]:
	
	
		
				YURSHAT, Как у тебя в скрипте убрать выбор языка? [url=viewtopic.php?p=2805141#p2805141]»[/url]
		
	
	
Просто удали в секции [b][Languages][/b] строки со всеми языками кроме русского.

[Habetdin]

petrov1993,

Держите

Inno Setup GameScript Generator

Цитата petrov1993:



При установке инсталлятор показывает что требуется места — несколько мегабайт. Размер содержимого архива (всмысле после распаковки) примерно 5 Гб. Можно ли как-нибудь заставить Inno Setup показывать правильные размеры?

[архив] Скрипты Inno Setup. Помощь и советы [часть 2]

Тоже долго боролся с этим, потом плюнул, включил файлы *.arc в инсталлятор с флагом "nocompression".

[nik1967]

Цитата comsun:



Я понимаю что сейчас модно вместо ответа отсылать к учебнику.

Насколько вырастаешь в своих глазах,но..... ответа все-таки нет.

[архив] Скрипты Inno Setup. Помощь и советы [часть 2]

А какой ответ, вы бы хотели услышать?


Цитата comsun:



А хелп я читал, и кроме:

[архив] Скрипты Inno Setup. Помощь и советы [часть 2]

Цитата comsun:



о "тихом" инстале не упоминается.

[архив] Скрипты Inno Setup. Помощь и советы [часть 2]

Вы сами практически ответили на свой вопрос, просто нужно немного включить воображение и подойти к этому вопросу с другой стороны...


Цитата comsun:



Будет ли тихий инсталл или нет.

[архив] Скрипты Inno Setup. Помощь и советы [часть 2]

Ну если напишите, то будет, а если вы имеете ввиду возможно или нет, то ответ - да.




Цитата skeptik007:



А как узнать какими функциями обладает та или иная DLL, чтобы потом их использовать в создание инсталлятора?

[архив] Скрипты Inno Setup. Помощь и советы [часть 2]

Есть хорошая программка

DLL Export Viewer

, показывает экспортируемые функции dll'ки + знания + goole




Цитата Swotch:



Перепробовал несколько вариантов, не чего не получилось…

[архив] Скрипты Inno Setup. Помощь и советы [часть 2]

покажите как пробуете

[alex2010]

Цитата petrov1993:



Цитата Cartmans:

YURSHAT, Как у тебя в скрипте убрать выбор языка? »

Просто удали в секции [Languages] строки со всеми языками кроме русского.

[архив] Скрипты Inno Setup. Помощь и советы [часть 2]

Там только русский язык, а в инсталяторе почти в конце установки можна выбрать ещё и энглиш

[alex2010]

Цитата nik1967:



Держите Inno Setup GameScript Generator

[архив] Скрипты Inno Setup. Помощь и советы [часть 2]

Спасибо. А троян там зачем?