[Kashtan007]

El Sanchez, спасибо огромное за помощь)
Но файл paths.xml не возвращается после удаление сборки.
Когда сборку устанавливаешь, то он перемещается в папку OriginalFiles, но после удаления восстанавливается только бекап, а файл paths.xml нет.

P.S. Перенес все в свой скрипт... и возникла проблема под чекбоксами серый фон. Возможно это из-за того, что у меня весь дизайн установщика состоит из BitMapImage?

Текст я убрал, так как он написан на картинке, но фон под чекбоксами не пропал.
Как убрать фон из под чекбоксов?
Заранее спасибо за ответ!

[Nordek]

Подскажите как записать такие данные в секции [Registry]? »

Dodakaedr, 1.

Показать/скрыть: Дополнительные программы для Inno Setup: » Converter - Программа конвертирует reg-файлы в формат *.iss (формат скриптов Inno Setup). Последняя версия: 0.1.4 [13.03.2010] - Скачать; »

2. "Inno Script Studio » Проект » Импорт из файла » Импорт файла реестра"


AlekseyPopovv, 1.

И надо начать паковать в ZIP. »

2. Пусть сам пробует разобраться (см. выше).

[vint56]

Kashtan007, пример http://rghost.ru/58173793

[Kashtan007]

vint56, спасибо больше работает!

P.S.
У меня есть код, который проверяет папку на файл WorldOfTanks.exe, и файл на версию.
Дело в том, что если выбираешь папку без файла WorldOfTanks.exe, то ошибку дает, что установка не возможна в другой путь.
А вот если взять файл с версией отличающейся с той, которая в установщике, то ошибки не будет.
Взгляните пожалуйста, если ли ошибка в коде? Заранее спасибо за ответ!

Код:

function FileVersion(const FilePath: String): String;
var
  oFS: Variant;
begin
  oFS:= CreateOleObject('Scripting.FileSystemObject');
    try
      Result:= oFS.GetFileVersion(FilePath);
    except
  end;
end;

function NextButtonClick(CurPageID: Integer): Boolean;
begin
  Result := True;
  case CurPageID of
  wpSelectDir:
   begin
    if not FileExists(ExpandConstant('{app}\WorldOfTanks.exe')) then begin
      MsgBox('Установка модов невозможна, так как по выбранному пути отсутствует клиент игры World of Tanks. Выберите правильный путь и продолжайте установку!', mbError, MB_OK);
      Result := False;
   end;
   if FileExists(ExpandConstant('{app}')+'\WorldOfTanks.exe') then begin
     if FileVersion(ExpandConstant('{app}')+'\WorldOfTanks.exe') < '0.9.3' then begin
     MsgBoxEx(WizardForm.Handle, 'Моды не будут работать на данной версии игры! Моды предназначены для версии патча 0.9.2. Обновите клиент игры! ', 'Моды не подходят к данному патчу World of Tanks', MB_OK or MB_ICONWARNING, 0, 0);
    Result:= false;
   end;end;
end;
end;
end;

[saurn]

Дело в том, что если выбираешь папку без файла WorldOfTanks.exe, то ошибку дает, что установка не возможна в другой путь. А вот если взять файл с версией отличающейся с той, которая в установщике, то ошибки не будет. »

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

Код:

function NextButtonClick(CurPageID: Integer): Boolean;
var
    msg, ver: string;
begin
    Result := True;

    case CurPageID of
        wpSelectDir:
        begin
            msg = '';

            if not FileExists( ExpandConstant( '{app}\WorldOfTanks.exe' ) ) then
              msg := 'Установка модов невозможна, так как по выбранному пути отсутствует клиент игры World of Tanks. Выберите правильный путь и продолжайте установку!'
            else if GetVersionNumbersString( ExpandConstant( '{app}\WorldOfTanks.exe' ), ver) then
                   if ( ver <> '0.9.2' ) then
                     msg := 'Моды не будут работать на данной версии игры! Моды предназначены для версии патча 0.9.2. Обновите клиент игры! ';

            Result := msg = '';

            if not Result then
              MsgBox( msg, mbError, MB_OK );
        end;
    end;
end;

[Kashtan007]

saurn, выдало ошибку на этой строке

Код:

 
msg = '';

Я ее убрал и заработало. Эта строка вообще нужна?
Или заменить на это?

Код:

Result := msg = '';

[saurn]

Эта строка вообще нужна? »

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

выдало ошибку на этой строке »

Я пропустил двоеточие

Код:

msg := '';

[Kashtan007]

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

И как по-вашему примеру можно убрать фон из под StatusLabel и FilenameLabel?

Заранее спасибо за ответ!

[roman_kudin@vk]

Добрый вечер. Подскажите как сделать, что бы при наведении на компонент, появлялось описание?
Брал код из справки, пишет ошибку: "descctrl.dll не найден". Можно как то реализовать без этой библиотеки?

[saurn]

Добрый вечер. Подскажите как сделать, что бы при наведении на компонент, появлялось описание? »

#1308
Если поискать, еще с десяток постов с примерами найдется.