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

[Johny777]

saurn, Ну я и нуб, как я сразу не понял...

[insombia]

странности с isexec,есть файл размером в 3 гб,установка прошла нормально,но папка с игрой пустая

[insombia]

такая проблемка, вот игровые некоторые файлы обрабатывал precomp+srep и поменялось разрешение файлов, когда я их закинул в папку с игрой в процессе игры у меня у меня не считывает эти файлы, как используя precomp+srep сделать после этого нужное разрешение?

[ilya_klimovich]

ilya_klimovich их нужно юзать для распаковки в исдоне или isexec

[saurn]

by_gangster,

Код:

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

Font.Name := 'бла-бла-бла;

---------------------------------------------------------------------------------------------------------------------------------------
Цитата by_gangster:



Может кому-нибудь пригодится полезный скрипт.

Перед запуском инсталлятор проверяет на наличие необходимой программы через реестр

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

Если бы вы читали форумы по инно - здесь на oszone или на ру-борде, вы бы поняли, что эти строчки кода уже перепереезженные, и имеются во всех возможных FAQ'ах к инно. Но нет, вы умеете только орать, дайте мне то, дайте мне это....

[nik1967]

Цитата Mailchik:



вы умеете только орать

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

Кто орал то ?

[saurn]

nik1967, диск разбит на три раздела - С, D, E, соответственно. Все разделы основные, логических нет. В том и дело, что скрипт показывает файловую систему D и E, но запинается на C.

[Johny777]

saurn, Осваивай массивы (статичные и динамичные) и работу с ними, мелкий пример:

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

Код:

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

[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application
[code  ]
var
    CheckArray: array of TCheckBox; // array [0..16] of TCheckBox;
function IndexOfCheckBox(const UCaption: String): Integer;
var
    i: Integer;
begin
    Result := -1;
    for i := GetArrayLength(CheckArray)-1 downto 0 do if CheckArray[i].Caption = UCaption then
    begin
        Result := i;
        Break;
    end;
end;
function CaptionOfCheckBox(const UIndex: Integer): String;
var
    i: Integer;
begin
    for i := 0 to GetArrayLength(CheckArray)-1 do if i = UIndex then Result := CheckArray[i].Caption;
end;
function IsChecked(const UIndex: Integer): Boolean;
var
    i: Integer;
begin
    if UIndex > GetArrayLength(CheckArray)-1 then Exit;
    Result := CheckArray[UIndex].Checked;
end;
procedure InitializeWizard();
var
    i: Integer;
begin
    WizardForm.OuterNotebook.Hide;
    SetArrayLength(CheckArray, 16);
    CheckArray[0] := TCheckBox.Create(WizardForm)
    with CheckArray[0] do
    begin
        Parent := WizardForm;
        Left := ScaleX(7);
        Top := ScaleY(7);
        Caption := IntToStr(0);
    end;
    for i := 1 to GetArrayLength(CheckArray)-1 do
    begin
        CheckArray[i] := TCheckBox.Create(WizardForm)
        with CheckArray[i] do
        begin
            Parent := WizardForm;
            Left := ScaleX(7);
            Top := ScaleY(CheckArray[i-1].Top + 16);
            if i mod 2 = 0 then Checked := True;
            Caption := IntToStr(i);
        end;
    end;
    ///
    if IsChecked(10) then MsgBox('Checked', mbInformation, MB_OK);
    MsgBox(CaptionOfCheckBox(5), mbInformation, MB_OK);
    MsgBox(IntToStr( IndexOfCheckBox('7') ), mbInformation, MB_OK);
end;

[saurn]

insombia, дословно, это означает "внешнее исключение". Иными словами смотрите в сторону процедур и функций вызываемых из внешних библиотек. Некоторые библиотеки( например IsUtils, get_hw_caps) используют WMI (Windows Management Instrumentation), которая есть в любой форточке, кроме 98. И соответственно, для их корректной работы необходимо, чтобы была включена сама WMI и ряд связанных с ней сервисов. Ну, а если используется какая-нибудь сборка системы ,где черезмерно умный сборщик отключил ненужные по его мнению службы, подобных ошибок не избежать. Inno тут ни причем. Так же, вполне вероятно, что просто ошибка в скрипте.

[insombia]

saurn могу дать скрипт,мож посмотреть

http://rghost.ru/45646441

p.s. да,он с krinkels'а но я его переделаю под себя