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

Brabusdark

procedure RedesignWizardForm;
begin
with WizardForm.StatusLabel do
begin
Font.Color := clWhite;
Font.Name := 'Georgia';
ParentFont := False;
end;

procedure InitializeWizard();
begin
RedesignWizardForm;
end;

кажись оно

а кто нибудь подскажет как сделать чтобы при выборе компонентов
слева они выбирались а справа шло их описание?
у рекордингов такое видел и у тебя insombia
в твоем скрипте

Brabusdark
Inno DescCtrl v1.0 могу тебе в скипт впаять тему и там изменить прогресс бар пойдет?

буду благодарен

Brabusdark но нужен весь скрипт твой с файлами

Всем доброго вечера.

Подскажите пожалуйста как сделать так как вот на картинку?
Как я думаю ля начала надо убрать стандартную?




Заранее спасибо)

Brabusdark ЛС

Dark_Delphin, Тут, я думаю, чтото такое сделано:

[more]
var
Panel1: TPanel;
Panel2: TPanel;
Panel3: TPanel;

procedure Panel1Click(Sender: TObject);
begin
//действие по нажатию
end;

procedure Panel2Click(Sender: TObject);
begin
//действие по нажатию
end;

procedure Panel3Click(Sender: TObject);
begin
//действие по нажатию
end;

procedure InitializeWizard();
begin
{ Panel1 }
Panel1 := TPanel.Create(WizardForm);
with Panel1 do
begin
Name := 'Panel1';
Parent := WizardForm.WelcomePage;
Left := ScaleX(16);
Top := ScaleY(144);
Width := ScaleX(25);
Height := ScaleY(25);
BevelOuter := bvSpace;
Caption := 'э';
Color := 48892;
Font.Color := clWindowText;
Font.Height := 30;
Font.Name := 'Wingdings';
Font.Style := [];
ParentBackground := False;
ParentFont := False;
OnClick := @Panel1Click;
end;

{ Panel2 }
Panel2 := TPanel.Create(WizardForm);
with Panel2 do
begin
Name := 'Panel2';
Parent := WizardForm.WelcomePage;
Left := ScaleX(48);
Top := ScaleY(144);
Width := ScaleX(25);
Height := ScaleY(25);
BevelOuter := bvSpace;
Caption := '0';
Color := 48892;
Font.Color := clWindowText;
Font.Height := 30;
Font.Name := 'Webdings';
Font.Style := [];
ParentBackground := False;
ParentFont := False;
OnClick := @Panel2Click;
end;

{ Panel3 }
Panel3 := TPanel.Create(WizardForm);
with Panel3 do
begin
Name := 'Panel3';
Parent := WizardForm.WelcomePage;
Left := ScaleX(80);
Top := ScaleY(144);
Width := ScaleX(25);
Height := ScaleY(25);
BevelOuter := bvSpace;
Caption := '4';
Color := 48892;
Font.Color := clWindowText;
Font.Height := 30;
Font.Name := 'Webdings';
Font.Style := [];
ParentBackground := False;
ParentFont := False;
OnClick := @Panel3Click;
end;
end;[/more]

Символа динамика не нашел, но гдето, вроде видел, как его получить, аналогичным способом.

Gnom3, спасибо. Я всё вроде правильно сделла, только при нажатии ничего не происходит.
Как исправить или где я ошибся?

Gnom3
на самом деле это кнопки, которые сделаны на ботве

Как в исдоне наложить на кнопку отмены мою кнопку(button.bmp)?а то смотреть на кнопку отмены исдона не хочется

[ Обновил библиотеку ]
------------------------
ISVideo.dll
ISVideo.dll - Это библиотека позволяет запускать МР3 музыку и AVI видео в инсталляторе

Добавлено:
Процедуры: ISVolume_Music и ISVolume_Video - Регулерация громкости.

Версия - 1.2

Скачать

Объясните пожалуйста где надо прописывать что бы архив (arc) распаковался?

Predskazatel Isdone используй

insombia
Это я знаю . Я имею ввиду где прописывать в скрипте путь к архиву.

if not ISArcExtract ( 0, 0, ExpandConstant('{src}\arc.arc'), ExpandConstant('{app}\'), '', false, '', ExpandConstant('{tmp}\arc.ini'), ExpandConstant('{app}\'), notPCFonFLY{PCFonFLY}) then break;

Подскажите пожалста как сделать маску для деинсталятора через ботву

insombia
Спасибо.

http://www.inno-setup.de/
Вам етот сайт не кажетса знакомим

VASYAKRN
ММ мне то же как ни странно.
Хотя я смотрю он уже довольна долго работает.

ISDownload.dll - Это библиотека даст вам возможность скачать быстро любой файл с интернета.
Версия - 1.0b

P.S.: Всё расписано и показано в скрипте!

Скачать

А как сделать вот так?
Я про картинку.

Народ а есть у кого нибудь такой скрипт??
http://s39.radikal.ru/i084/1002/b5/c13909f74b25.jpg

Добавлено:
а где можно скины найти? видел где то но забыл уже где

Brabusdark
1) Негде
2) Выдераешь любые скины из тем XP через ISSkin

vistaw
а как выдрать?

Цитата:

а где можно скины найти? видел где то но забыл уже где

Brabusdark Лови.

есть ли у кого-то нормальный скрипт приоритета инстала а то той пример что есть на инноультра не полный там только высокий приоритет работает даже если выбрать средний-низкий

insombia
Если используешь ISDone, приоритет будет оставаться высоким, т.к. это записано в самой dll. Тоже самое с unarc'ом...

R3Pa4eK фак

S.T.A.L.K.E.R.- Народная солянка

Автор: Gnom3
Описание: Простенький скрипт с IsDone 0.6e приятный глазу. Без революционных идей, но может, кому и понравится

Скачать
Перезалил - Версия 2 - вроде все мелкие ошибки поправил