Ru-Board.club
← Вернуться в раздел «Программы»

» Inno Setup (создание инсталяционных пакетов)

Автор: Mista_Max
Дата сообщения: 27.03.2008 21:52
Необходимо экспортировать ключи в данную ветку:
HKLM\SYSTEM\CurrentControlSet\Enum\Root\
Обычным методом этого сделать не получается!Естественно они должны удаляться так же легко!.. Для ускорения "ДОГОНА" хочу спросить у Вас... КАК?? Заранее СПАСИБО всем кто откликнется!!
Автор: Chanka
Дата сообщения: 27.03.2008 21:52
elapse

Спасибо
Автор: Genri
Дата сообщения: 27.03.2008 22:24
geranik

Цитата:
result:=f+'\Mods\Anti-Balance';// \ - в начале по обстоятельству
-- не сочти за наглость, просто небольшое дополнение: для того, чтобы не быть зависимым от "обстоятельств" , можно использовать function AddBackslash(const S: String): String; - гарантировано вернет путь со слэшем, вне зависимости от наличия слэша в исходной строке. Т.е. result:=AddBackslash(f)+'Mods\Anti-Balance';
Автор: Chanka
Дата сообщения: 27.03.2008 22:41
elapse

Заметил небольшой глюк.

На компонентах пустое поле. А должно быть выбрано Полная установка.
Нельзя ли как-нибудь поправить
Автор: Genri
Дата сообщения: 27.03.2008 22:42
Mista_Max

Цитата:
Необходимо экспортировать ключи в данную ветку:
HKLM\SYSTEM\CurrentControlSet\Enum\Root\
-- а нескромный вопрос - зачем? Если для инсталляции трояна, то Inno Setup не лучший выбор. :-\
Автор: elapse
Дата сообщения: 27.03.2008 22:54
Chanka, очень сложно? Или нет желания что-то делать самому?

Код:
procedure InitializeWizard();
begin
WizardForm.TypesCombo.Tag := WizardForm.TypesCombo.ItemIndex;
WizardForm.BorderStyle := bsDialog;
WizardForm.TypesCombo.ItemIndex := WizardForm.TypesCombo.Tag;
end;
Автор: Chanka
Дата сообщения: 27.03.2008 23:00
elapse

Недостаточно знаний в этом направлении

Спасибо
Автор: Artem_Butenko
Дата сообщения: 28.03.2008 00:29
Извиняюсь за повторение, но всё-таки может существует вариант кода, позволяющий приступить к установке как только пользователь выбрал директорию установки и нажал кнопку "ОК" (в окне выбора директории установки), т.е. не требующий подтверждения по кнопке "Далее". И, есть ли возможность наложения bmp-рисунка на кнопку "О программе..." (About...)?. Вызов этой кнопки (в левой нижней части окна инсталлера) я вызываю процедурой из стандартного скрипта "CodeClasses.iss". Уважаемые товарищи, пожалуйста предложите кто-нибудь спасительный скрипт, буду очень Вам благодарен.
Автор: elapse
Дата сообщения: 28.03.2008 00:57
Artem_Butenko, насчёт автонажатия NextButton - примерно [more=так][no]
[Setup]
AppName=My Program
AppVerName=My Program 1.5
DefaultDirName={pf}\My Program
DirExistsWarning=no

[Code]
procedure DirOnClick(Sender: TObject);
var
DirEditString: String;
begin
DirEditString := WizardForm.DirEdit.Text;
if BrowseForFolder('Выберите папку из списка и нажмите «ОК»', DirEditString, False) then
begin
WizardForm.DirEdit.Text := DirEditString;
WizardForm.NextButton.OnClick(WizardForm.NextButton)
end;
end;

procedure InitializeWizard();
begin
WizardForm.DirBrowseButton.OnClick := @DirOnClick;
end;
[/no][/more]. Только не думаю, что это так "полезно".

Насчёт наложения текстур - скины Samprona, руководство Kindly, Соrona Skin Виктора Доброва --> неужели мало примеров?
Автор: GRom V
Дата сообщения: 28.03.2008 08:48
Genri
Как то давненько ты выкладывал скрипт:

function PercentProgress(): Integer;
begin
with WizardForm.ProgressGauge do
begin
Result:= (Position-Min)/((Max - Min)/100) ;
end;
end;

procedure OnTimer(HandleW, msg, idEvent, TimeSys: LongWord);
var
percent: integer;

begin
percent:= PercentProgress;
with BackgroundBitmapImage do
begin
if ((percent > 12) and (percent < 25) and (Tag <> 1)) then
begin
Bitmap.LoadFromFile(ExpandConstant('{tmp}') + '\pic1.bmp');
Tag:= 1;
end
Сдесь - запуск рисунка в зависимости от выполнения % установки.
Можно ли вместо рисунка запустить например на 5 % файл.ехе ???
Автор: geranik
Дата сообщения: 28.03.2008 09:14
Genri

Цитата:
Т.е. result:=AddBackslash(f)+'Mods\Anti-Balance';

Я раньше не знал как это пишется, надо просто AddBackslash в начале строки. Спасибо.
Автор: Linda85
Дата сообщения: 28.03.2008 11:42
Только начинаю разбираться с программой, поэтому нужна помощь.
Нужно, чтобы при установке проверялось какая версия офиса стоит на компе (например, 2000, 2003, ХР) и, в зависимости от этого, устанавливалась та или иная версия программки. Возможно ли это?

Автор: noiseless
Дата сообщения: 28.03.2008 16:18
Linda85
ИМХО, надо проверять наличие значения Path в ветке HKLM\Software\Microsoft\Office\x.x\Common\InstallRoot
где x.x - это обозначение версии офиса (например, для MS Office 2003 - это 11.0)

А лучше написать что устанавливается и куда при той или иной версии офиса, так будет понятнее... Так и скрипт написать проще будет
Автор: Genri
Дата сообщения: 28.03.2008 17:42
GRom V

Цитата:
Можно ли вместо рисунка запустить например на 5 % файл.ехе ???
-- ну если надо, то вместо Bitmap.LoadFromFile..., вызывай функцию Exec с необходимыми параметрами. Каких-либо проблем я не вижу.

Linda85

Цитата:
Нужно, чтобы при установке проверялось какая версия офиса стоит на компе
-- имхо задача поставлена не совсем корректно. Вероятно, проверять надо не версию офиса, а наличие и версию необходимой програмной части офиса (Word, Excel, Access и т.п.). Ведь у пользователя из всего офиса может быть установлен только поверпоинт.
Автор: Diawer
Дата сообщения: 28.03.2008 22:19
Genri, огромное спасибо, всё работает и отдельное спасибо elapse, вы здорово помогаете.
Автор: Dimbay
Дата сообщения: 29.03.2008 13:27
Genri
Вопрос снимается,в связи с невнимательностью автора
Автор: machetos
Дата сообщения: 29.03.2008 21:14
Sampron

Спасибо, эти скины с другим скриптом, там фишка со шрифтом check'а выполнена по другому, а я брал скин из руководства от Kindly... Хороший ход: не бороться с глюком, а обойти его )))
Но у меня тут же возникла другая проблема. В процессе установки я обычно задаю слайд-шоу фоном и сворачиваю окно инсталятора в угол экрана, при этом кнопка "отмена" куда-то пропадает и приходиться выносить её на передний план (BringToFront), а из-за этого рисунок скина с этой кнопки уходит под неё ((( А хочется сохранить стиль пакета до конца установки.
Может кто поможет сделать так, чтобы кнопка отображалась со скином)))
Заранее спасибо


Добавлено:
И ещё, чуть выше описано как запускать рисунок в фоне в зависимости от процента установки. А можно тоже самое сделать с jpg файлами (грузятся с помощью isxbb.dll)?
Автор: Forslay
Дата сообщения: 29.03.2008 22:38
Может быть я пропустил читая посты на форуме. Но мне нужна помощь, можно ли сделать так что бы после проигрыша одног mp3 файла, проигрывался другой.... а то инсталляшка длинная нужно что бы две песенки играли такое возможно веть?
Автор: machetos
Дата сообщения: 29.03.2008 23:22
Forslay

а просто пороигрыш по кругу не хочешь сделать?
ещё можно тупо склеить 2 файла в один и пусть себе играет )))

Добавлено:
Forslay

а просто пороигрыш по кругу не хочешь сделать?
ещё можно тупо склеить 2 файла в один и пусть себе играет )))
Автор: Victor_Dobrov
Дата сообщения: 30.03.2008 04:33
machetos, Forslay, chum2000
Цитата:
Сворачиваю инсталятор, при этом кнопка 'Отмена' пропадает и приходиться выносить её на передний план...
Слайдшоу - можно тоже самое сделать с jpg файлами?
Можно ли сделать, чтобы после проигрыша одного mp3 файла проигрывался другой?

В Corona Skin есть Компактный режим, Проигрывание по списку, Слайдшоу по секундам с эффектами и другие дополнения.
Скрипт делает инсталлятор функциональнее. Смотрите список дополнений в первом посте, или прочитайте Справку.
Автор: machetos
Дата сообщения: 30.03.2008 08:00
Victor_Dobrov
нужно, чтобы именно jpg и именно по процентам, а не по секундам
(по секундам можно и без Corona Skin ... Bmp можно по процентам, но они МНОГО весят)
Автор: Forslay
Дата сообщения: 30.03.2008 09:03
Виктор Вам спасибо, но для моей инсталляции Corona не подойдёт.
А на счёт проигрыша по кругу это как?
Автор: Dimbay
Дата сообщения: 30.03.2008 11:24
Genri
Приветствую!
Как установить разные языковые версии через Components понятно.
А реально их привязать к выбору языка интерфейса(выбрал англ. инерфейс-установка англ версии игры),(выбрал рус. инерфейс-установка рус. версии игры)?


Автор: htuos
Дата сообщения: 30.03.2008 13:00
Forslay
насчет музыки
посмотри как здесь делается
или Corona Skin расковыряй. ничего сложного здесь нет
Автор: Diawer
Дата сообщения: 30.03.2008 14:49
Установил Far PowerPack там такая фишка, программа по умолчанию установилась в Program Files и папке присвоилась иконка находящаяся в папке программы (смотрится на фоне стандартных жёлтых папок интересно), появился вопрос, как после установки сделать, что бы инсталлятор присваивал иконку папке. (на папке: Свойства - Настройка - Сменить значёк)
Автор: Mista_Max
Дата сообщения: 30.03.2008 15:27

Цитата:
-- а нескромный вопрос - зачем? Если для инсталляции трояна, то Inno Setup не лучший выбор. :-\

Хочу сделать инсталляцию для сервиса от stylexp. Чтобы без самой программы можно было менять темы и стили для xp.
Автор: serg_aka_lain
Дата сообщения: 30.03.2008 17:24
Diawer

Вот способ:
В дистрибутив включ. пустой файл "desktop.ini"
Source: "desktop.ini"; DestDir: "{app}"; Attribs: "hidden system"; Flags: ignoreversion;

Папка в которую устанавливается тоже должна иметь - Attribs: "system";
[Dirs]
Name: "{app}"; Attribs: "system"; Flags: uninsalwaysuninstall;

Ну и в конце установки записываем в "desktop.ini" путь к иконке .exe, или .ico файлу.
procedure CurStepChanged(CurStep: TSetupStep);
begin
if CurStep = ssPostInstall then
begin
SaveStringToFile(ExpandConstant('{app}')+'\desktop.ini', #13#10, true);
SaveStringToFile(ExpandConstant('{app}')+'\desktop.ini', '[.ShellClassInfo]' + #13#10, true);
SaveStringToFile(ExpandConstant('{app}')+'\desktop.ini', 'IconFile' + '=' + ExpandConstant('{app}') + '\Icon.ico' + #13#10, true);
SaveStringToFile(ExpandConstant('{app}')+'\desktop.ini', 'IconIndex' + '=' + '0' + #13#10, true);
end;
end;

p.s. Может elapse или htuos знают способ проще ... ?
этот кажется не очень..

Автор: Diawer
Дата сообщения: 30.03.2008 18:20
serg_aka_lain, спасибо работает.

Цитата:
Может elapse или htuos знают способ проще ... ?
, если есть ещё варианты выложите.

Автор: htuos
Дата сообщения: 30.03.2008 23:36

Цитата:
Может elapse или htuos знают способ проще

ну, я другого способа не знаю, вроде винда именно так и делает
Автор: serg_aka_lain
Дата сообщения: 31.03.2008 00:38
htuos

Да я имел в виду обойтись без пустого файла "desktop.ini" в дистрибутиве,
а создать в процессе установки ,вернее присвоить атрибуты "hidden system"
через Code, такое возможно?

Страницы: 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667

Предыдущая тема: Поиск в WinDjView


Форум Ru-Board.club — поднят 15-09-2016 числа. Цель - сохранить наследие старого Ru-Board, истории становления российского интернета. Сделано для людей.