[Mat_y]

Есть вопрос:

В теме уже научился создавать описание и картинку при наведении мышки на компонент... а можно ли воспроизводить звуки при наведении на некоторые компоненты?

[alexxxdar@vk]

Уважаемые форумчане! Очень нужна ваша помощь...
Я разработчик Mod Pack Alexxx-DAR для игры World Of Tanks!
У меня есть несколько вопросов... Помогите кто знает!

01. Как сделать так, чтобы мой установщик автоматически находил местоположение игры, тоесть сам прописывал путь к папке World Of Tanks ???
02. Как сделать так, чтобы установщик копировал папку audio из папки World Of Tanks/res в папку World Of Tanks/res_mods/0.8.9 ???
03. Как сделать так, чтобы в окне выбора модов, при наведение на какой либо мод, высвечивалось описание мода и маленький скриншот ???
04. Как сделать так чтобы установщик автоматически очищал папку res_mods ???
05. Как сделать так, чтобы при запуске установщика открывалось окно с описанием мод-пака (По умолчанию у меня открывается "Вас приветствует мастер установки", Далее открывается "Выберите папку с игрой") Как между ними вставить окно с описанием модов ???

Подобные установщики есть у таких мододелов как Jove: http://www.youtube.com/watch?v=5RfUHG5Ptxc
и ExPromt: http://www.youtube.com/watch?v=ikVnr8r6ELs#t=147

Мой же установщик, который мне нужно доработать можно скачать и посмотреть отсюда: http://yadi.sk/d/aJ4UyBdRBsauc

[Shkutu]

Всем доброго времени суток!
Подскажите плиз, а можно на форме типа TInputQueryWizardPage добавленное текстовое поле сделать недоступным для редактирования? Или для этого свою форму рисовать придется?

[nik1967]

Shkutu, ну у TInputQueryWizardPage есть свойство Edits[Index: Integer]: TPasswordEdit, у которого, в свою очередь, есть свойство ReadOnly: Boolean - только чтение. Вроде так.

[ATTACUE]

Доброго времени суток.
Взял код авторана на Inno Setup отсюда

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

сообщение от Gnom_aka_Lexander, сцитировать не могу, так как тема закрыта

Добавил секцию [CustomMessages] на два языка - rus и eng.
Секция [Languages] соответственно тоже имеется.
В секции [code] подписи имен файлов (Caption) через cm:MyButtomName тоже сделал.
Проблема в следующем:
Хочу добавить две кнопки - rus и eng, чтобы по их нажатию интерфейс переключался на русский и английский соответственно.
То есть реализация ShowLanguageDialog=yes, только через кнопки
или хотя бы как изменить текст, который отображается при выборе языка установки:
Выберите язык, который будет использован в процессе установки
На просто - выберите язык, так как по крайней мере реализация через ShowLanguageDialog работает, но выглядит не совсем так, как хотелось.

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

Код:

procedure EngButtonClick(Sender: TObject);
begin
// голову сломал, не знаю как реализовать
end;

Кто что посоветует?

[ATTACUE]

alexxxdar@vk,

1) через реестр
[Setup]
DefaultDirName={reg:HKLM\SOFTWARE\Название_Игры,InstallPath}
Только заранее свои ключи к игре проверить

2) Как-то так (если я правильно понял)
[Files]
Source: "Audio\Звуковой_файл_1.wav"; DestDir: "{app}\Папка_Куда_Копируем\"; DestName: "Новое_имя_1.wav";
Можно DestName (переименование) не использовать

3) не знаю

4) в секции [code] нужно как-то применить следующее, как именно не знаю, но копать отсюда:
RemoveDir(ExpandConstant('{app}\Название_удаляемой_папки'));

5) Можно само описание добавить как-то так:
[Setup]
InfoBeforeFile=info.txt
Рядом со скриптом создается info.txt и в нем пишется все, что душе угодно, в процессе установки высвечивается.

Иных способов в голову не приходит. Надеюсь помог)

[nik1967]

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

пример

Код:

[setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}
ShowLanguageDialog=yes

[Languages]
Name: rus; MessagesFile: compiler:Languages\Russian.isl
Name: eng; MessagesFile: compiler:Default.isl

[Messages]
; Русский
rus.SelectLanguageTitle=Выберите язык
rus.SelectLanguageLabel=Выберите язык:

; English
eng.SelectLanguageTitle=Select language
eng.SelectLanguageLabel=Select language:

Хочу добавить две кнопки - rus и eng, чтобы по их нажатию интерфейс переключался на русский и английский соответственно. »

пример

Код:

[setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}
ShowLanguageDialog=auto

[Languages]
Name: rus; MessagesFile: compiler:Languages\Russian.isl
Name: eng; MessagesFile: compiler:Default.isl

[CustomMessages]
; Русский
rusButtonBack=< &Назад
rusButtonNext=&Далее >
rusButtonCancel=Отмена
rusSetupWindowTitle=Установка — %1
rusWelcomeLabel1=Вас приветствует Мастер установки %1
rusWelcomeLabel2=Программа установит %1, версия %2 на Ваш компьютер.%n%nРекомендуется закрыть все прочие приложения перед тем, как продолжить.%n%nНажмите «Далее», чтобы продолжить, или «Отмена», чтобы выйти из программы установки.

; English
engButtonBack=< &Back
engButtonNext=&Next >
engButtonCancel=Cancel
engSetupWindowTitle=Setup — %1
engWelcomeLabel1=Welcome to the %1 Setup Wizard
engWelcomeLabel2=This will install %1 version %2 on your computer.%n%nIt is recommended that you close all other applications before continuing.%n%nClick Next to continue, or Cancel to exit Setup.

[ Code]
var
  lang: String;
  langBtn: TButton;

procedure ChangeLang();
begin
  WizardForm.BackButton.Caption:= CustomMessage(lang+'ButtonBack');
  WizardForm.NextButton.Caption:= CustomMessage(lang+'ButtonNext');
  WizardForm.CancelButton.Caption:= CustomMessage(lang+'ButtonCancel');
  WizardForm.Caption:= FmtMessage(CustomMessage(lang+'SetupWindowTitle'), ['{#SetupSetting('AppName')}']);
  WizardForm.WelcomeLabel1.Caption:= FmtMessage(CustomMessage(lang+'WelcomeLabel1'), ['{#SetupSetting('AppName')}']);
  WizardForm.WelcomeLabel2.Caption:= FmtMessage(CustomMessage(lang+'WelcomeLabel2'), ['{#SetupSetting('AppName')}', '{#SetupSetting('AppVersion')}']);
end;

procedure LangBtnClick(Sender: TObject); 
begin
  if lang='rus' then begin
    lang:= 'eng';
    langBtn.Caption:= 'рус';
  end else begin
    lang:= 'rus';
    langBtn.Caption:= 'eng';
  end;
  ChangeLang();
end;

procedure InitializeWizard;
begin
  langBtn:= TButton.Create(WizardForm);
  with langBtn do begin
    SetBounds(10,WizardForm.CancelButton.Top,30,WizardForm.CancelButton.Height)
    OnClick:= @LangBtnClick;
    Parent:= WizardForm;
  end;

  if ActiveLanguage='rus' then begin
    lang:= 'rus';
    langBtn.Caption:= 'eng';
  end else begin
    lang:= 'eng';
    langBtn.Caption:= 'рус';
  end;
end;

[ToBeLife]

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

[Dinvin4ester]

Ребята есть скрипт - http://sendfile.su/886094 . Писал ранее , мне ответили , но у меня не получилось . В чем проблема- не получается прописать выборочную установку . Надо чтобы напротив установки ПО по умолчанию ставилась галка,т.е. была выборочная установка и полная.

[ATTACUE]

Доброго времени суток.

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

nik1967, спасибо за помощь

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

Код:

[Setup]
DefaultDirName={reg:HKLM\SOFTWARE\Название_приложения,InstallPath}

То есть через реестр инсталлятор определял - куда поставить.
И вроде бы все хорошо, и очень даже удобно, если бы не одно НО:
Когда я стал использовать данный путь, но для установки дополнительного ПО, чтобы в случае чего доп. ПО
было удалить, а основную программу оставить нетронутой, то есть:

Код:

[Setup]
DefaultDirName={reg:HKLM\SOFTWARE\Название_приложения,InstallPath}\папка_1\внутренняя папка

то после установки приложения, значение в реестре основной программы
{reg:HKLM\SOFTWARE\Название_приложения,InstallPath}
меняется на {reg:HKLM\SOFTWARE\Название_приложения\папка_1\внутренняя папка,InstallPath}
и это моем случае очень здорово напрягает.

Не помогает и запись такого вида:

Код:

[Setup]
DefaultDirName={reg:HKLM\SOFTWARE\Название_приложения,InstallPath|{pf}\папка_1\внутренняя папка}

или

Код:

[Setup]
DefaultDirName={reg:HKLM\SOFTWARE\Название_приложения,InstallPath|папка_1\внутренняя папка}

Секция [registry] имеется, выставлены отличные от основной программы значения типа:

Код:

Root: HKLM; Subkey: "Другое_название_приложения"; ValueType: string; ValueName: "InstallPath"; ValueData: "{app}"; Flags: uninsdeletekey

Тем не менее - в {reg:HKLM\SOFTWARE\Название_приложения,InstallPath} значения все равно меняются.

Как мне заблокировать изменение инсталлятором именно этой ветки:
{reg:HKLM\SOFTWARE\Название_приложения,InstallPath}
чтобы она для инсталлятора была как бы "только для чтения"