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

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

Автор: Edison007007
Дата сообщения: 09.08.2011 21:52
ENERGES
лови халтуру
http://rghost.ru/17399811
Автор: insombia
Дата сообщения: 09.08.2011 22:02

Цитата:
http://rghost.ru/17399811

У меня не работает нужно обязательно ту прогу запускать что оно работало или как?
Автор: ALExey1995
Дата сообщения: 09.08.2011 22:15
insombia
Нет она не нужна.

Вот мой пример
http://rghost.ru/17403031
Автор: alex0413
Дата сообщения: 10.08.2011 00:28
подскажите, как сделать чтоб нормально отображалось? Вот скрин http://i056.radikal.ru/1108/be/3bbcafa24050.jpg botva2 наверно не будит работать вместе с iswin7? и после свертывания и розвертывания окна, картинка пропадает, и заместь нее черный квадрат, но прозрачность работает нормально.
Автор: Snoopak96
Дата сообщения: 10.08.2011 03:18
alex0413,
да, botva и iswin не работают нормально в месте. Лого можешь сделать либо этим, либо этим. Только Fairy.dll левые ошибки иногда выдаёт.
Автор: Percey123
Дата сообщения: 10.08.2011 10:45
Люди, помогите пожалуйста. Как сделать фоновую картинку, как в скрипте NFS Undercover от YURSHAT? Напишите, пожалуйста именно данный скрипт. Или если у кого-нибудь остался урезанный установщик от nik1967, выложите, пожалуйста (nik вырезал там музыку, слайд шоу и озвучку кнопок).
Автор: crysis1830
Дата сообщения: 10.08.2011 16:23
как двигать шрифт на кнопках подскажите пожалуйста

Автор: insombia
Дата сообщения: 10.08.2011 18:43

Цитата:
как двигать шрифт на кнопках подскажите пожалуйста

Ты сам понял что сказал?Может ты имел ввиду чтобы на кнопках тоже был шрифт такой же как и в инсталяторе?
Автор: ALExey1995
Дата сообщения: 10.08.2011 18:45
Percey123
http://rghost.ru/4554038 Это?

Добавлено:
insombia
НЭТ он имел в виду название кнопки двигать.
Автор: crysis1830
Дата сообщения: 10.08.2011 23:49
insombia
Ты сам понял что сказал?Может ты имел ввиду чтобы на кнопках тоже был шрифт такой же как и в инсталяторе?


я то понял что сказал это просто ты не правельно прочитал

ALExey1995

Цитата:
insombia
НЭТ он имел в виду название кнопки двигать.


угу так кто знает кто поможет

Автор: SotM
Дата сообщения: 11.08.2011 07:16
crysis1830
Научись цитировать правильно посты других людей.


Цитата:
я то понял что сказал это просто ты не правельно прочитал

Это, наверное, из серии: "Казнить нельзя помиловать".
Автор: salexn1
Дата сообщения: 11.08.2011 12:34
Есть следующая задача:
2 типа инсталяции - сетевая и локальная.
Можно ли как-то давать в этих типах инсталяции выбирать, что ставить, а что не ставить?
Не дает у двух типов установить iscustom флаг
Автор: vint56
Дата сообщения: 11.08.2011 13:07
salexn1
[more=вот посмотри пример][Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program

[Files]
;Source: Network.txt; DestDir: {app}; Check: RadioButtonNetwork
;Source: local.txt; DestDir: {app}; Check: RadioButtonlocal

[CustomMessages]
Myver=Выбор Сети
Network=Сетевая
local=Локальная


[Code]
var
Label1: TLabel;
Network: TNewRadioButton;
local: TNewRadioButton;

function RadioButtonNetwork(): Boolean;
begin
Result:= Network.Checked;
end;

function RadioButtonlocal(): Boolean;
begin
Result:= local.Checked;
end;

procedure RedesignWizardForm;
begin
{ Label1 }
Label1 := TLabel.Create(WizardForm);
with Label1 do
begin
Name := 'Label1';
Parent := WizardForm.SelectDirPage;
Caption := ExpandConstant('{cm:Myver}');
Transparent := False;
Left := ScaleX(24);
Top := ScaleY(120);
Width := ScaleX(95);
Height := ScaleY(13);
end;

{ Network }
Network := TNewRadioButton.Create(WizardForm);
with Network do
begin
Name := 'Network';
Parent := WizardForm.SelectDirPage;
Left := ScaleX(24);
Top := ScaleY(136);
Width := ScaleX(200);
Height := ScaleY(17);
Caption := ExpandConstant('{cm:Network}');
Checked := True;
end;

{ local }
local := TNewRadioButton.Create(WizardForm);
with local do
begin
Name := 'local';
Parent := WizardForm.SelectDirPage;
Left := ScaleX(24);
Top := ScaleY(160);
Width := ScaleX(200);
Height := ScaleY(17);
Caption := ExpandConstant('{cm:local}');
end;

Network.TabOrder := 5;
local.TabOrder := 6;
end;


procedure InitializeWizard();
begin
RedesignWizardForm;
end;[/more]
Автор: salexn1
Дата сообщения: 11.08.2011 13:47
vint56
Спасибо, буду дальше разбираться

З.Ы.
А проще нет вариантов? Что не кодить?
Автор: vint56
Дата сообщения: 11.08.2011 14:10
salexn1 стандартными средствами
[more][Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program

[Files]
Source: Network.txt; DestDir: {app}; Components: Network\Network
Source: local.txt; DestDir: {app}; Components: Network\local

[Types]
Name: full; Description: Full installation; Flags: iscustom

[Components]
Name: Network; Description: Выбор Сети; Types: full; Flags: fixed
Name: Network\Network; Description: Сетевая; Flags: exclusive
Name: Network\local; Description: Локальная; Flags: exclusive

[Code]
procedure InitializeWizard();
begin
with WizardForm.ComponentsList do
begin
Height := ScaleY(60); // задается размер компонент листа
end;
end;[/more]
Автор: insombia
Дата сообщения: 11.08.2011 20:02
Как сделать чтобы в Isexec когда указываешь папку с архивом и делаешь установку чтобы файлов setup-1a.bin и так далее не было а просто твой созданный архив и файл setup.exe?
Автор: troyan90
Дата сообщения: 11.08.2011 21:08
insombia
DiskSpanning
как бы справка рулит
Автор: XNick92
Дата сообщения: 12.08.2011 03:04
Доброго времени суток! Хочу сделать музыку в инстале, точнее сделал, но мне необходимо скрыть кнопочку (Воспроизвести-Пауза) на страницах приветствия и завершении установки... Помогите написать необходимую строчку этого скрипта вот и сам исходный код...
Автор: Percey123
Дата сообщения: 12.08.2011 03:49
ALExey1995
Не совсем, но спасибо.
Автор: nik1967
Дата сообщения: 12.08.2011 07:48
crysis1830
Обрати внимание на procedure BtnSetTextAlignment в botva2.iss

Код: procedure BtnSetTextAlignment(h :HWND; HorIndent, VertIndent :integer; Alignment WORD); external 'BtnSetTextAlignment@{tmp}\botva2.dll stdcall delayload';
//устанавливает выравнивание текста на кнопке
//h - хэндл кнопки (результат возвращенный BtnCreate)
//HorIndent - горизонтальный отступ текста от края кнопки
//VertIndent - вертикальный отступ текста от края кнопки
//Alignment - выравнивание текста. задается константами balLeft, balCenter, balRight, balVCenter,
// или комбинацией balVCenter с остальными. например, balVCenter or balRight
Автор: Sergey_Demchuk
Дата сообщения: 12.08.2011 12:22
Такой вопрос. Как можно сделать окно в инсталяторе без границ.
Использовать для этого ф-ю
SetWindowLong(WizardForm.handle, GWL_STYLE, GetWindowLong(WizardForm.handle, GWL_STYLE)and(not WS_MAXIMIZEBOX));

Какие параметры для нее указать?

И еще такое. Окно которое появляется при отмене инсталляции, Выход из программы установки, Как оно в инно именуется? Хочу и его внешний вид изменить.
Автор: Percey123
Дата сообщения: 12.08.2011 12:22
У меня возник вопрос: есть строка кода ScaleX(593), ScaleY(96), ScaleX(114), ScaleY(20). В общем, если ScaleX(593), ScaleY(96) регулируют горизотнальность-вертикальность, то зачем тогда нужно ScaleX(114), ScaleY(20)?
Автор: Robkovich
Дата сообщения: 12.08.2011 12:23
Percey123
Длина и высота.
Автор: Percey123
Дата сообщения: 12.08.2011 14:45
Robkovich
Спасибо, теперь ясно.
Автор: Despofix
Дата сообщения: 12.08.2011 17:07
такая проблема растянул форму, хочу растянуть картинку. использую:
WizardForm.WizardBitmapImage.Width:= ScaleX(547);
WizardForm.WizardBitmapImage2.Width:= ScaleX(547);

но картинка как была шириной в 497 так и осталась, как же все таки ее растянуть?
Автор: bugron
Дата сообщения: 12.08.2011 17:12
Sergey_Demchuk

Цитата:
Такой вопрос. Как можно сделать окно в инсталяторе без границ.
Использовать для этого ф-ю
SetWindowLong(WizardForm.handle, GWL_STYLE, GetWindowLong(WizardForm.handle, GWL_STYLE)and(not WS_MAXIMIZEBOX));

Какие параметры для нее указать?


Может так? http://rghost.ru/17734121
Автор: sergey3695
Дата сообщения: 12.08.2011 17:15

Цитата:
И еще такое. Окно которое появляется при отмене инсталляции, Выход из программы установки, Как оно в инно именуется? Хочу и его внешний вид изменить.

Типо этого ...

Автор: bugron
Дата сообщения: 12.08.2011 17:21
Sergey_Demchuk

Цитата:
И еще такое. Окно которое появляется при отмене инсталляции, Выход из программы установки, Как оно в инно именуется? Хочу и его внешний вид изменить.


Чуть про это не забыл... При отладке оказалось что сообщение выводится с помощью функции MessageBox, если хотите изменить текст сообщения создайте событие на нажатие кнопки Cancel, если внешний вид, то для этого есть скины.

Добавлено:
Despofix

Цитата:
такая проблема растянул форму, хочу растянуть картинку. использую:
WizardForm.WizardBitmapImage.Width:= ScaleX(547);
WizardForm.WizardBitmapImage2.Width:= ScaleX(547);

но картинка как была шириной в 497 так и осталась, как же все таки ее растянуть?


Я попробовал растянуть картинку на большой форме, но больше 500x500 не растянулась, думаю нужно использоваь плагины.
Автор: Despofix
Дата сообщения: 12.08.2011 17:58
bugron
пришлось по другому сделать. но теперь все лэйблы прогрессбары придется вручную прописывать
Автор: DRIFTER2592
Дата сообщения: 12.08.2011 22:55
Помогите пожалуйста подправить скрипт (http://rghost.ru/17775491)
Есть "несколько" моментов, которые не удаеться реализовать...
Убрать иконку в левом верхнем углу
Убрать текст с welcom page и finished page
Почему-то не работает directx...
Хотелось бы прикрутить фриарк, но чтобы было написано "распаковка архивов", прогресс бар продвигался нормально (как при "стандартном" сжатии), показано сколько % прошло и не было написано "Распаковывается архив 1 из 1" (как это бывает часто)
Ярлыки должны создаваться после распаковки архивов
Также сделать чтобы во время распаковки кнопка отмена была не активна

Страницы: 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177

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


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