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

[Ivan_009]

как прикрутить скрипт для проверки системных требований если у меня черный инсталл почемуто не отображается нормально какой цвет надо сделать заранее спасибки............................................................................................ .......

[Johny777]

Цитата rasim933:



другие файлы

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

а именно?


Цитата rasim933:



требует диск 2. сую диск 2, жму на кнопку

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

Скажи сколько установщиков у тебя?

Если один, то запрос дика это работа инно и авторан тут никаким боком

вывод

если инсталяторов много, то авторан с кучей кнопок это сложно (для меня), тк игры на разных дисках.

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

[Ivan_009]

Описать про другие файлы несмогу. Вот картинки -



1 картинка со всеми файлами -

,

2 картинка 1 папки -

3 картинка 2 папки -

.



У меня 10 игр, у каждой игры есть свой екзешник (*.exe).

При нажатии одной кнопки в антолгии, запускается экзешник (*.exe) одной игры.



У меня такая фигня -

[Johny777]

rasim933,

ну теперь понятно

завтра попробую сделать

[Ivan_009]

Ну типа так чтобы а если не соответствует системным требованиям то выделялось красным цветом

[Ivan_009]

Да вот если не трудно один вопрос как этот модуль одтелить тоесть если он не нужен то закоментить.... зараннее большое прибольшое спасибо.............

[Johny777]

Ivan_009,

модуль это кусок скрипта

он подключён у тебя в основном скрипте через препроцессор

#include "HWREQ_Module.iss"

просто закомментируй ///

[Ivan_009]

Ошибка

[Johny777]

Цитата rasim933:



Если можено, то пришли пожалста сюда коды кнопок.

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

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

Код:

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

procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);// Встроенная процедура
begin
  Confirm := False; // убираем окно потверждения нажатия на кнопку отмены
  Cancel := True;   // Разрешаем выход
end;
procedure NewButtonClick(Sender: TObject); // Обработчик кнопок.
begin
  case TNewButton(Sender).Tag of // Узнаем, какая кнопка нажата, по ее тегу
    0: MsgBox('Вы нажали кнопку 1',mbInformation,MB_OK);
    1: MsgBox('Вы нажали кнопку 2',mbInformation,MB_OK);
    2: MsgBox('Вы нажали кнопку 3',mbInformation,MB_OK);
    3: MsgBox('Вы нажали кнопку 4',mbInformation,MB_OK);
    4: MsgBox('Вы нажали кнопку 5',mbInformation,MB_OK);
    5: MsgBox('Вы нажали кнопку 6',mbInformation,MB_OK);
    6: MsgBox('Вы нажали кнопку 7',mbInformation,MB_OK);
    7: WizardForm.CancelButton.OnClick(WizardForm.CancelButton);
  end;
end;
procedure InitializeWizard();
Var
  i:Integer; // локальная переменная, с ее помощью запустим цикл
begin
  with WizardForm do // Делаем сразу общее обращение (минимальноя оптимизация, но торморза из мелочей собираются)
  begin
    AutoScroll := False;
    ClientHeight := ScaleY(260); // размер в высоту
    ClientWidth := ScaleX(190); // размер в ширину
    OuterNotebook.Hide; //Скрываем основной слой, на котором лежат почти все элементы
    Bevel.Hide;   // Скрываем полоску внизу инсталла, чтоб не маячила
    NextButton.Hide;  // Скрываем кнопку далее, чтоб нельзя было добраться до нее табом
    for i:=0 to 7 do // Запускаем цикл от 0 до 7, то-есть то, что внутри цикла, будет сделано 8 раз
    begin
      with TNewButton.Create(WizardForm) do // Собственно создаем кнопку
      begin
        Parent := WizardForm;  // указываем где ей лежать, в данном случае - окно инсталлятора Inno
        SetBounds(ScaleX(10),ScaleY(10+i*30),ScaleX(170),ScaleY(25)); // Задаем координаты и размеры 10+i*30 - тут простая математика 10 от верха будет первая кнопка, остальные лягут с интервалом в 30, в зависимости от того, чему равна локольная переменная I в данный момент
          case i of // тут задаем текст кнопки, в зависимости от того, какая из них создается в данный момент
            0: Caption := 'Кнопка 1';
            1: Caption := 'Кнопка 2';
            2: Caption := 'Кнопка 3';
            3: Caption := 'Кнопка 4';
            4: Caption := 'Кнопка 5';
            5: Caption := 'Кнопка 6';
            6: Caption := 'Кнопка 7';
            7: Caption := 'Выход';
          end;
        OnClick := @NewButtonClick; // Адрес обработчика нажатия на кнопку.
        Tag := i; // очень важно не забыть указать тег, поскольку создаем объект неименованый. Тег будет i.
      end;
    end;
  end;
end;

Вот, вроде достаточно подробно описал.

[Ivan_009]

Johny777 спасибо разобрался что к чему