Скрипты Inno Setup. Помощь и советы [часть 3]

[Habetdin]

kindza811, либо еще раз уменьшить рисунок, либо изменить это:
BtnPanel:=TPanel.Create(WizardForm)
with BtnPanel do begin
Left:=20 // положение относительно левого края окна
Top:=325 // положение относительно верха окна
Width:=132 // ширина кнопки
Height:=27 // высота

[kindza811]

сейчас попробую

[LinkOFF]

либо еще раз уменьшить рисунок, либо изменить это: »
Я ему дал скрипт

[Mafia_forever]

помогите создать несколько ярлыков на раб. стол и с разными названиями

[Rikill]

Есть в справке.

[insombia]

Mafia_forever

[Icons]
Name: {commondesktop}\Back to the Future The Game - Episode 1; Filename: "{app}\Back to the Future The Game - Episode 1\BackToTheFuture101.exe"; IconIndex: 0; Check: MakeDesktopIcon
Name: {commondesktop}\Back to the Future The Game - Episode 2; Filename: "{app}\Back to the Future The Game - Episode 2\BackToTheFuture102.exe"; IconIndex: 0; Check: MakeDesktopIcon
Name: {commondesktop}\Back to the Future The Game - Episode 3; Filename: "{app}\Back to the Future The Game - Episode 3\BackToTheFuture103.exe"; IconIndex: 0; Check: MakeDesktopIcon
Name: {commondesktop}\Back to the Future The Game - Episode 4; Filename: "{app}\Back to the Future The Game - Episode 4\BackToTheFuture104.exe"; IconIndex: 0; Check: MakeDesktopIcon
Name: {commondesktop}\Back to the Future The Game - Episode 5; Filename: "{app}\Back to the Future The Game - Episode 5\BackToTheFuture105.exe"; IconIndex: 0; Check: MakeDesktopIcon
Name: {group}\{cm:UninstallProgram,Back to the Future Collection}; Filename: {uninstallexe}

[Sollar]

Здравствуйте, мучаюсь довольно долго
Нужно чтобы при выбора одной задачи (то есть отметки в тасках на первой в списке) все остальные стали б неотмеченными и скрытыми

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


procedure TaskOnClick(Sender: TObject);
var
i:integer;
begin
if IsTaskSelected('nomer1') or IsTaskSelected('nomer0') then
begin
for i:=2 to WizardForm.TasksList.Items.Count-1 do
begin
WizardForm.TasksList.ItemEnabled[i]:= False;
end;
end;
end;

procedure InitializeWizard();
begin
WizardForm.TasksList.OnClick := @TaskOnClick;
end;

[Habetdin]

Нужно чтобы при выбора одной задачи (то есть отметки в тасках на первой в списке) все остальные стали б неотмеченными и скрытыми »
А почему не сделать задачи с флагом exclusive? Тогда сразу оба нельзя выбрать :) Пример:
[Tasks]
Name: nomer; Description: Тырым-пырым;
Name: nomer/1; Description: Первый; Flags: exclusive;
Name: nomer/2; Description: Второй; Flags: exclusive;
[hr]Я ему дал скрипт »
Проблема с Button.bmp и его размерами :tomato2:

[insombia]

Sollar если ты о репаке от рекодинг deus ex то хотелось тоже узнать как это сделать?

[Rikill]

insombia, surface.dll какбе, она всё делает.

[Sollar]

Habetdin, потому что задач где-то около 20, т.е. есть 1 задача, включающая в себя все остальные, типа "все"
insombia, нет) просто в один инсталлер собираю программы, которыми пользуюсь

[Mafia_forever]

insombia почти получилось только выдаёт маленькую ошибку

Required function or procedure 'MakeDesktopIcon' not found :gamer:

[LinkOFF]

Как сделать в скрипте isdone выбор компонентов с извлечением их из архива freearc?

[Rikill]

Mafia_forever, удали все check
линкофф, читай справку в исдоне

[Mafia_forever]

как поставить картиру как показанно на картинке чтобы было только на первой и последней странице!!

[kindza811]

как поставить картиру как показанно на картинке чтобы было только на первой и последней странице!! »
[Setup]
AppName=MyApp
AppVerName=MyApp
DefaultDirname={pf}\MyApp

[files]
Source: Img2.bmp; DestDir: {tmp}; Flags: dontcopy


var
WelcomeLabel1, WelcomeLabel2, FinishedLabel, FinishedHeadingLabel: TLabel;

procedure InitializeWizard();
begin
ExtractTemporaryFile('img2.bmp');

WizardForm.WizardBitmapImage.Width:= ScaleX(497);
WizardForm.WizardBitmapImage2.Width:= ScaleX(497);
WizardForm.WizardBitmapImage2.Bitmap.LoadFromFile(ExpandConstant('{tmp}\img2.bmp'));

WelcomeLabel1:= TLabel.Create(WizardForm);
WelcomeLabel1.AutoSize:= False;
with WizardForm.WelcomeLabel1 do
WelcomeLabel1.SetBounds(Left, Top, Width, Height);
WelcomeLabel1.Font:= WizardForm.WelcomeLabel1.Font
WelcomeLabel1.Font.Color:= clWhite;
WelcomeLabel1.Transparent:= True;
WelcomeLabel1.WordWrap:= true;
WelcomeLabel1.Caption:= WizardForm.WelcomeLabel1.Caption;
WelcomeLabel1.Parent:= WizardForm.WelcomePage

WelcomeLabel2:= TLabel.Create(WizardForm);
WelcomeLabel2.AutoSize:= False;
with WizardForm.WelcomeLabel2 do
WelcomeLabel2.SetBounds(Left, Top, Width, Height);
WelcomeLabel2.Font:= WizardForm.WelcomeLabel2.Font
WelcomeLabel2.Font.Color:= clWhite;
WelcomeLabel2.Transparent:= True;
WelcomeLabel2.WordWrap:= true;
WelcomeLabel2.Caption:= WizardForm.WelcomeLabel2.Caption;
WelcomeLabel2.Parent:= WizardForm.WelcomePage

FinishedHeadingLabel:= TLabel.Create(WizardForm);
FinishedHeadingLabel.AutoSize:= False;
with WizardForm.FinishedHeadingLabel do
FinishedHeadingLabel.SetBounds(Left, Top, Width, Height);
FinishedHeadingLabel.Font:= WizardForm.FinishedHeadingLabel.Font
FinishedHeadingLabel.Font.Color:= clWhite;
FinishedHeadingLabel.Transparent:= True;
FinishedHeadingLabel.WordWrap:= true;
FinishedHeadingLabel.Caption:= WizardForm.FinishedHeadingLabel.Caption;
FinishedHeadingLabel.Parent:= WizardForm.FinishedPage

FinishedLabel:= TLabel.Create(WizardForm);
FinishedLabel.AutoSize:= False;
with WizardForm.FinishedLabel do
FinishedLabel.SetBounds(Left, Top, Width, Height);
FinishedLabel.Font:= WizardForm.FinishedLabel.Font
FinishedLabel.Font.Color:= clWhite;
FinishedLabel.Transparent:= True;
FinishedLabel.WordWrap:= true;
FinishedLabel.Caption:= WizardForm.FinishedLabel.Caption;
FinishedLabel.Parent:= WizardForm.FinishedPage

WizardForm.WelcomeLabel1.Hide;
WizardForm.WelcomeLabel2.Hide;
WizardForm.FinishedLabel.Hide;
WizardForm.FinishedHeadingLabel.Hide;
end;

procedure CurPageChanged(CurPageID: Integer);
begin
FinishedLabel.Caption:= WizardForm.FinishedLabel.Caption;
end;

[insombia]

Mafia_forever скачай это (http://rghost.ru/19380971) там все это легко делается

[Mafia_forever]

kindza811 спасибо большое :up

[Mafia_forever]

след вопрос>> как сделать как показано на картинку и дайте прямую ссылку для скачивания botva2.dll и musicbutton.bmp

[Mafia_forever]

insombia болшое спасибо :)