[Serega]

Drongo, чуть поправлю, размеры формы должны находится в procedure InitializeWizard();, в вашем варианте она тоже будет работать, но это не правильно. Потому, что процедура InitializeWizard работает при инициализации формы, а procedure CurPageChanged(CurPageID: Integer); - работает на смену страниц, т.е. нужно добавить в самое начало процедуры:

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

Код:

..............................................
procedure InitializeWizard();
begin
  WizardForm.ClientHeight:= 800;
  WizardForm.ClientWidth:= 750;
  WizardForm.Height:= 500;
  WizardForm.Width:= 700;

  InfoPage := CreateCustomPage(wpLicense, 'Аппаратное и программное обеспечение',
                                          'Программа установки обнаружила следующие наобходимые компоненты.')
  CreateCheckForm()  // Создание объектов TMemo, в которых будет выводится информация о системе
  UpdateInfo()  // Обновление информации о системе
.........................................

[Drongo]

Serega_, В принципе всё сработало как надо. Для этого инсталятора уже переделывать ничего не буду, а для общего развития, подскажи, где менять, чтобы кнопки, линиии и размер куда мы картинку загоняем, изменить\сместить под новые размеры формы? Я только нашёл для ProgressBar.

Код:

...
WizardForm.ProgressGauge.Top := ScaleY(430); // Значение 430 как раз.
...

И последний штрих, какой флаг выставить для того, чтобы был заранее отмечен пункт Создать значок на Рабочем столе

Код:

...
[Tasks]
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked
...

[Habetdin]

чтобы был заранее отмечен пункт »

Flags: unchecked »

попробуйте unchecked заменить на checked

[Serega]

попробуйте unchecked заменить на checked »

Habetdin, флага checked - нет и при компиляции скрипта выскочит ошибка... Надо просто убрать Flags: unchecked

а для общего развития, подскажи, где менять, чтобы кнопки, линиии и размер куда мы картинку загоняем, изменить\сместить под новые размеры формы? »

Компоненты основных страниц

Код:

{ для всех страниц, кроме первой - wpWelcome и последней - wpFinished }
  WizardForm.MainPanel // верхняя панель, где маленький рисунок WizardSmallBitmapImage
  WizardForm.WizardSmallBitmapImage // сам, маленький рисунок
  WizardForm.Bevel1 // точно не уверен, но помоему Bevel расположеный сразу под MainPanel
  WizardForm.PageNameLabel // имя страницы, пример: Выбор папки установки
  WizardForm.PageDescriptionLabel // описание страницы, пример: В какую папку вы хотите установить [name]?
  WizardForm.InnerNotebook // Notebook, даже незнаю как перевести ;)... расплогается по центу мастера, между верхним и нижним Bevel
{ для всех страниц }
  WizardForm.Caption // пишется на бордюре Установка - [name]
  WizardForm.Bevel // черта над кнопками (нижний Bevel)
  WizardForm.BackButton // кнопка 'Назад'
  WizardForm.NextButton // кнопка 'Далее'
  WizardForm.CancelButton // кнопка 'Отмена'

WizardForm.WelcomePage // или wpWelcome - страница приветствия
  WizardForm.WizardBitmapImage // большой рисунок, расположен слевой стороны окна мастера
  WizardForm.WelcomeLabel1 // текст: Вас приветствует мастер установки [name]
  WizardForm.WelcomeLabel2 // текст: Программа установит... и так далее

WizardForm.SelectDirPage // или wpSelectDir - страница выбора папки назначения
  WizardForm.SelectDirBitmapImage // рисунок папки на странице выбора директории
  WizardForm.SelectDirLabel // текст: Программа установит [name] в следующую папку
  WizardForm.SelectDirBrowseLabel // текст: Нажмите Далее, чтобы продолжить. Если Вы хотите выбрать другую папку нажмите Обзор.
  WizardForm.DirEdit // Edit в котором пишется путь к папке назначения
  WizardForm.DirBrowseButton // кнопка Обзор...
  WizardForm.DiskSpaceLabel // текст: Требуется как минимум [size] Мб свободного дискового пространства

WizardForm.SelectComponentsPage // или wpSelectComponents - страница выбора компонентов
  WizardForm.SelectComponentsLabel // текст: Выберите компоненты, которые Вы хотите установить... и так далее
  WizardForm.TypesCombo // ComboBox с выбором типа установки (Полная установка, Выборочная установка)
  WizardForm.ComponentsList // CheckListBox - окно выбора компонентов
  WizardForm.ComponentsDiskSpaceLabel // текст: Текущий выбор требует не менее [size] Мб на диске

WizardForm.SelectProgramGroupPage // или wpSelectProgramGroup - страница выбора программной группы
  WizardForm.SelectStartMenuFolderLabel // текст: Программа создаст ярлыки в следующей папке меню Пуск
  WizardForm.SelectGroupBitmapImage // рисунок папки
  WizardForm.SelectStartMenuFolderBrowseLabel // текст: Нажмите Далее, чтобы продолжить... и так далее
  WizardForm.GroupEdit // Edit с названием группы меню Пуск
  WizardForm.GroupBrowseButton // кнопка Обзор...

WizardForm.SelectTasksPage // или wpSelectTasks - страница выбора дополнительных задач
  WizardForm.TasksList // CheckListBox - окно выбора дополнительных задач
  WizardForm.SelectTasksLabel // текст: Выберите дополнительные задачи, которые должны выполнится... и так далее

WizardForm.ReadyPage // или wpReady - страница Всё готово к установке
  WizardForm.ReadyLabel // текст: нажмите Установить, чтобы продолжить... и так далее
  WizardForm.ReadyMemo // отображается список выбора

WizardForm.InstallingPage // или wpInstalling - страница установки, где отбражается прогрессбар
  WizardForm.FilenameLabel // при установке отбражаются имена копируемых файлов
  WizardForm.StatusLabel // при установке отбражаются пути куда копируются файлы
  WizardForm.ProgressGauge // прогрессбар

WizardForm.FinishedPage // или wpFinished - страница завершения установки
  WizardForm.FinishedHeadingLabel // текст: Завершение Мастера установки [name]
  WizardForm.FinishedLabel // текст: Программа [name] установлена на Ваш компьютер... и так далее

[Drongo]

попробуйте unchecked заменить на checked »

Я тоже, по аналогии с С++ сразу попробовал checked.

Надо просто убрать Flags: unchecked »

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

Приблизительно так

Для каждого компонета добавляем Top, Left, и т.д. и ScaleX(), ScaleY(). Правильно?

Код:

...
WizardForm.FilenameLabel.Top := ScaleY(330);
WizardForm.FilenameLabel.Top := ScaleY(430);
WizardForm.FilenameLabel.Left := ScaleX(10);
WizardForm.FilenameLabel.Width := ScaleX(380);
WizardForm.FilenameLabel.Height := ScaleX(18);
...

[Serega]

Для каждого компонета добавляем Top, Left, и т.д. и ScaleX(), ScaleY(). Правильно? »

Всё правильно, но если нужно просто изменить расположение стандартных компонентов, хватит того, что просто указать Top и Left, так как они не создаются заново, а мы только изменяем их расположение на форме... Да и как говорят, для развития, ScaleX или ScaleY

Берет координату X (или ширину) и возвращает значение в масштабе шрифта текущего диалогового окна. Если шрифт MS Sans Serif размером 8 и Windows у пользователя запущена с опцией Мелкий шрифт (96 dpi), то X будет возвращен без изменений.

P.S.
Drongo, в примере вы два раза указали значение Top, я думаю это опечатка для примера?
WizardForm.FilenameLabel.Top := ScaleY(330);
WizardForm.FilenameLabel.Top := ScaleY(430);
Вообще сработает последнее значение. Нет, точнее сработают оба, но результат вывода будет по последнему значению...

[Drongo]

в примере вы два раза указали значение Top, я думаю это опечатка для примера? »

Издержки Copy\Paste. Скопировать скопировал, но изменить забыл, имелось ввиду X и Y

Да и как говорят, для развития, ScaleX или ScaleY »

[Serega]

Drongo, X - ширена, Y- высота... всё как в математике... , т.е. смещение по вертикали Y (ScaleY - Top, Height), смещение по горизонтали X (ScaleX - Width, Left).

P.S.
Нашёл на просторах своего винчестера скрипт, который показывает изменение координат стандартных компонентов, я думаю, пригодится как наглядный пример работы с компонентами.

скрипт

Код:

[Setup]
AppName=My Program
AppVerName=My Program v 1.5
DefaultDirName={pf}\My Program
OutputDir=.
Compression=lzma/ultra
InternalCompressLevel=ultra
SolidCompression=yes

[_Code]
Procedure InitializeWizard();
begin
  with WizardForm do
  begin
    Position:= poScreenCenter
    ClientWidth:= 690
    ClientHeight:= 496
    Font.Color:= clWindow
    Font.Name:= 'MS Sans Serif'
    Font.Style:= []
    with Bevel do
    begin
      Left:=0
      Top:=313
      Width:=497
      Height:=2
      Visible:=False
    end;
    with CancelButton do
    begin
      Left:=600
      Top:=462
      Width:=77
      Height:=25
      BringToFront
    end;
    with NextButton do
    begin
      Left:=375
      Top:=462
      Width:=77
      Height:=25
      BringToFront
    end;
    with BackButton do
    begin
      Left:=293
      Top:=462
      Width:=77
      Height:=25
      BringToFront
    end;
    with OuterNotebook do
    begin
      Left:=0
      Top:=0
      Width:=690
      Height:=496
    end;
    with MainPanel do
    begin
      Left:=0
      Top:=0
      Width:=690
      Height:=496
      Color:=clWindow
      with WizardSmallBitmapImage do
      begin
        Left:=0
        Top:=0
        Width:=690
        Height:=496
        BackColor:=clWindow
      end;
      with PageDescriptionLabel do
      begin
        Left:=25
        Top:=25
        Width:=500
        Height:=14
        Color:=6697728
        Font.Color:=clWindow
      end;
      with PageNameLabel do
      begin
        Left:=15
        Top:=7
        Width:=500
        Height:=14
        Color:=6697728
        Font.Color:=clWindow
      end;
    end;
    with BeveledLabel do
    begin
      Left:=10
      Top:=468
      Width:=150
      Height:=14
      Enabled:=False
      Color:=14405068
    end

  // страница приветствия wpWelcome
    with WelcomePage do
    begin
      Color:=11232829
      with WizardBitmapImage do
      begin
        Left:=0
        Top:=0
        Width:=690
        Height:=496
      end
      with WelcomeLabel2 do
      begin
        Left:=205
        Top:=230
        Width:=465
        Height:=200
      end
      with WelcomeLabel1 do
      begin
        Left:=205
        Top:=190
        Width:=465
        Height:=28
        Font.Color:=clWindow
        Font.Size:=8
      end
    end
    with InnerPage do
    begin
      with Bevel1 do
      begin
        Left:=0
        Top:=58
        Width:=499
        Height:=3
        Visible:=False
      end
      with InnerNotebook do
      begin
        Left:=205
        Top:=79
        Width:=465
        Height:=354
        BringToFront
        Color:=11232829
      end;
    end;
  // страница лицензии wpLicense
    with LicensePage do
    begin
      with LicenseNotAcceptedRadio do
      begin
        Left:=0
        Top:=338
        Width:=465
        Height:=17
        Checked:=True
      end
      with LicenseAcceptedRadio do
      begin
        Left:=0
        Top:=318
        Width:=465
        Height:=17
      end
      with LicenseMemo do
      begin
        Left:=0
        Top:=38
        Width:=465
        Height:=266
        ReadOnly:=True
        ScrollBars:=ssVertical
      end
      with LicenseLabel1 do
      begin
        Left:=0
        Top:=0
        Width:=465
        Height:=28
      end
    end
  // страница пароля wpPassword
    with PasswordPage do
    begin
      with PasswordEdit do
      begin
        Left:=0
        Top:=50
        Width:=465
        Height:=21
        Font.Color:=clWindowText
      end
      with PasswordEditLabel do
      begin
        Left:=0
        Top:=34
        Width:=465
        Height:=14
      end
      with PasswordLabel do
      begin
        Left:=0
        Top:=0
        Width:=465
        Height:=28
      end
    end
  // информация перед установкой wpInfoBefore
    with InfoBeforePage do
    begin
      with InfoBeforeMemo do
      begin
        Left:=0
        Top:=24
        Width:=465
        Height:=327
        ScrollBars:=ssVertical
      end
      with InfoBeforeClickLabel do
      begin
        Left:=0
        Top:=0
        Width:=465
        Height:=14
      end
    end
  // страница информация о пользователе wpUserInfo
    with UserInfoPage do
    begin
      with UserInfoSerialEdit do
      begin
        Left:=0
        Top:=120
        Width:=465
        Height:=21
        Font.Color:=clWindowText
      end
      with UserInfoSerialLabel do
      begin
        Left:=0
        Top:=104
        Width:=465
        Height:=14
      end
      with UserInfoOrgEdit do
      begin
        Left:=0
        Top:=68
        Width:=465
        Height:=21
        Font.Color:=clWindowText
      end
      with UserInfoOrgLabel do
      begin
        Left:=0
        Top:=52
        Width:=465
        Height:=14
      end
      with UserInfoNameEdit do
      begin
        Left:=0
        Top:=16
        Width:=465
        Height:=21
        Font.Color:=clWindowText
      end
      with UserInfoNameLabel do
      begin
        Left:=0
        Top:=0
        Width:=465
        Height:=14
      end
    end
  // страница выбора директории wpSelectDir
    with SelectDirPage do
    begin
      with SelectDirBitmapImage do
      begin
        Left:=0
        Top:=0
        Width:=32
        Height:=32
        Visible:=False
      end
      with DiskSpaceLabel do
      begin
        Left:=0
        Top:=340
        Width:=465
        Height:=14
      end
      with DirBrowseButton do
      begin
        Left:=388
        Top:=288
        Width:=77
        Height:=25
      end
      with DirEdit do
      begin
        Left:=0
        Top:=290
        Width:=378
        Height:=21
        Font.Color:=clWindowText
      end
      with SelectDirBrowseLabel do
      begin
        Left:=0
        Top:=24
        Width:=465
        Height:=28
      end
      with SelectDirLabel do
      begin
        Left:=0
        Top:=0
        Width:=465
        Height:=14
      end
    end
  // страница компонентов wpSelectComponents
    with SelectComponentsPage do
    begin
      with ComponentsDiskSpaceLabel do
      begin
        Left:=0
        Top:=340
        Width:=417
        Height:=14
      end
      with ComponentsList do
      begin
        Left:=0
        Top:=48
        Width:=465
        Height:=275
        Font.Color:=clWindow
        Color:=11232829
      end
      with TypesCombo do
      begin
        Left:=0
        Top:=24
        Width:=465
        Height:=21
        Font.Color:=clWindow
        Color:=11232829
       end
      with SelectComponentsLabel do
      begin
        Left:=0
        Top:=0
        Width:=465
        Height:=14
      end
    end
  // страница выбора программной группы меню Пуск wpSelectProgramGroup
    with SelectProgramGroupPage do
    begin
      with SelectGroupBitmapImage do
      begin
        Left:=0
        Top:=0
        Width:=32
        Height:=32
        Visible:=False
      end
      with NoIconsCheck do
      begin
        Left:=0
        Top:=337
        Width:=465
        Height:=17
      end
      with GroupBrowseButton do
      begin
        Left:=388
        Top:=288
        Width:=77
        Height:=25
      end
      with GroupEdit do
      begin
        Left:=0
        Top:=290
        Width:=378
        Height:=21
        Font.Color:=clWindowText
      end
      with SelectStartMenuFolderBrowseLabel do
      begin
        Left:=0
        Top:=24
        Width:=465
        Height:=28
      end
      with SelectStartMenuFolderLabel do
      begin
        Left:=0
        Top:=0
        Width:=465
        Height:=14
      end
    end
  // страница выбора дополнительных задач wpSelectTasks
    with SelectTasksPage do
    begin
      with TasksList do
      begin
        Left:=0
        Top:=34
        Width:=465
        Height:=317
        Color:=11232829
      end
      with SelectTasksLabel do
      begin
        Left:=0
        Top:=0
        Width:=465
        Height:=28
      end
    end
  // страница Всё готово к установке wpReady
    with ReadyPage do
    begin
      with ReadyMemo do
      begin
        Left:=0
        Top:=34
        Width:=465
        Height:=317
        Color:=11232829
      end
      with ReadyLabel do
      begin
        Left:=0
        Top:=0
        Width:=465
        Height:=28
      end
    end
  // без коментариев, просто я её никогда не видел... ;) wpPreparing {видимо в бане парится постоянно, когда я компилирую}
    with PreparingPage do
    begin
      with PreparingErrorBitmapImage do
      begin
        Left:=0
        Top:=0
        Width:=16
        Height:=16
        Visible:=False
      end
      with PreparingLabel do
      begin
        Left:=24
        Top:=0
        Width:=393
        Height:=14
        Visible:=False
      end
    end
  // страница Установки wpInstalling
    with InstallingPage do
    begin
      with FilenameLabel do
      begin
        Left:=0
        Top:=16
        Width:=465
        Height:=16
      end
      with StatusLabel do
      begin
        Left:=0
        Top:=0
        Width:=465
        Height:=16
      end
      with ProgressGauge do
      begin
        Left:=0
        Top:=42
        Width:=465
        Height:=21
        Min:=0
        Max:=100
      end
    end
  // страница информации после установки wpInfoAfter
    with InfoAfterPage do
    begin
      with InfoAfterMemo do
      begin
        Left:=0
        Top:=24
        Width:=465
        Height:=327
        ScrollBars:=ssVertical
      end
      with InfoAfterClickLabel do
      begin
        Left:=0
        Top:=0
        Width:=465
        Height:=14
      end
    end
  // финальная страница wpFinished
    with FinishedPage do
    begin
      Color:=11232829
      with WizardBitmapImage2 do
      begin
        Left:=0
        Top:=0
        Width:=690
        Height:=496
      end;
      with NoRadio do
      begin
        Left:=205
        Top:=227
        Width:=465
        Height:=17
      end;
      with YesRadio do
      begin
        Left:=205
        Top:=199
        Width:=465
        Height:=17
      end;
      with RunList do
      begin
        Left:=205
        Top:=199
        Width:=465
        Height:=149
        BorderStyle:=bsNone
      end;
      with FinishedLabel do
      begin
        Left:=205
        Top:=119
        Width:=465
        Height:=53
      end;
      with FinishedHeadingLabel do
      begin
        Left:=205
        Top:=79
        Width:=465
        Height:=24
        Font.Color:=clWindow
        Font.Size:=8
      end;
    end
  end
end;

[tem000]

Русская версия Inno Setup Compiler 5.2.3 (ISPP 5.2.3.0) от ResTools

Русская версия расширенной версии Inno Setup от ResTools. За основу был взят перевод от Inno Setup 5.2.3 RU из шапки, в настройках программы не перевел некоторые функции, не понял для чего они нужны поэтому не смог правильно сформулировать и оставил без перевода. Короче перевод проги процентов 80, если где некорректный перевод пишите исправлю.

[Serega]

tem000, спасибо, вроде на первый взгляд ошибок не увидел, но если что, то напишу...

P.S.
Скажу по своему опыту, некоторые вещи от перевода, теряют свою суть и понимание процесса...