Создание инсталляторов для модпаков на базе Inno Setup

[voin_123]

Вместо точек напиши это, если своя голова не варит:

Тык!

[Kaster62rus]

парни , чёт посмотрел я так и понял , что картинка , которая появляется у мышки , слишком резкая и режет глаза , кто-нибудь пожертвует своими чертежами , дав мне скрипт с картинками ток , как у протанки и картинки к ним ( 

Фотошоп, скриншотер и Гугл тебе в помощь!

парни , чёт посмотрел я так и понял , что картинка , которая появляется у мышки , слишком резкая и режет глаза , кто-нибудь пожертвует своими чертежами , дав мне скрипт с картинками ток , как у протанки и картинки к ним ( 

 

Вот тебе кусок скрипта с картинками!!!

 

AddCompDescription(1, CustomMessage('CompDesc1'), 'CompDescImg1.bmp');

  AddCompDescription(2, CustomMessage('CompDesc2'), 'CompDescImg2.bmp');

  AddCompDescription(3, CustomMessage('CompDesc3'), 'CompDescImg3.bmp');

  AddCompDescription(4, CustomMessage('CompDesc4'), 'CompDescImg4.bmp');

  AddCompDescription(5, CustomMessage('CompDesc5'), 'CompDescImg5.bmp');

  AddCompDescription(6, CustomMessage('CompDesc6'), 'CompDescImg6.bmp');

  AddCompDescription(7, CustomMessage('CompDesc7'), 'CompDescImg7.bmp');

  AddCompDescription(8, CustomMessage('CompDesc8'), 'CompDescImg8.bmp');

  AddCompDescription(9, CustomMessage('CompDesc9'), 'CompDescImg9.bmp');

  AddCompDescription(10, CustomMessage('CompDesc10'), 'CompDescImg10.bmp');

  AddCompDescription(11, CustomMessage('CompDesc11'), 'CompDescImg5.bmp');

  AddCompDescription(12, CustomMessage('CompDesc12'), 'CompDescImg5.bmp');

  AddCompDescription(13, CustomMessage('CompDesc13'), 'CompDescImg5.bmp');

  AddCompDescription(14, CustomMessage('CompDesc14'), 'CompDescImg5.bmp');

  AddCompDescription(15, CustomMessage('CompDesc15'), 'CompDescImg5.bmp');

  AddCompDescription(16, CustomMessage('CompDesc16'), 'CompDescImg5.bmp');

  AddCompDescription(17, CustomMessage('CompDesc17'), 'CompDescImg5.bmp');

  AddCompDescription(18, CustomMessage('CompDesc18'), 'CompDescImg5.bmp');

  AddCompDescription(19, CustomMessage('CompDesc19'), 'CompDescImg5.bmp');

  AddCompDescription(20, CustomMessage('CompDesc20'), 'CompDescImg5.bmp');

  AddCompDescription(21, CustomMessage('CompDesc21'), 'CompDescImg5.bmp');

  AddCompDescription(22, CustomMessage('CompDesc22'), 'CompDescImg5.bmp');

  AddCompDescription(23, CustomMessage('CompDesc23'), 'CompDescImg5.bmp');

  AddCompDescription(24, CustomMessage('CompDesc24'), 'CompDescImg5.bmp');

  AddCompDescription(25, CustomMessage('CompDesc25'), 'CompDescImg5.bmp');

  AddCompDescription(26, CustomMessage('CompDesc26'), 'CompDescImg5.bmp');

  AddCompDescription(27, CustomMessage('CompDesc27'), 'CompDescImg5.bmp');

  AddCompDescription(28, CustomMessage('CompDesc28'), 'CompDescImg5.bmp');

  AddCompDescription(29, CustomMessage('CompDesc29'), 'CompDescImg5.bmp');

  AddCompDescription(30, CustomMessage('CompDesc30'), 'CompDescImg5.bmp');

  AddCompDescription(31, CustomMessage('CompDesc31'), 'CompDescImg5.bmp');

  AddCompDescription(32, CustomMessage('CompDesc32'), 'CompDescImg5.bmp');

  AddCompDescription(33, CustomMessage('CompDesc33'), 'CompDescImg5.bmp');

  AddCompDescription(34, CustomMessage('CompDesc34'), 'CompDescImg5.bmp');

  AddCompDescription(55, CustomMessage('CompDesc35'), 'CompDescImg5.bmp');

  AddCompDescription(36, CustomMessage('CompDesc36'), 'CompDescImg5.bmp');

  AddCompDescription(37, CustomMessage('CompDesc37'), 'CompDescImg5.bmp');

  AddCompDescription(38, CustomMessage('CompDesc38'), 'CompDescImg5.bmp');

  AddCompDescription(39, CustomMessage('CompDesc39'), 'CompDescImg5.bmp');

  AddCompDescription(40, CustomMessage('CompDesc40'), 'CompDescImg5.bmp');

  AddCompDescription(41, CustomMessage('CompDesc41'), 'CompDescImg5.bmp');

  AddCompDescription(42, CustomMessage('CompDesc42'), 'CompDescImg5.bmp');

  AddCompDescription(43, CustomMessage('CompDesc43'), 'CompDescImg5.bmp');

  AddCompDescription(44, CustomMessage('CompDesc44'), 'CompDescImg5.bmp');

  AddCompDescription(45, CustomMessage('CompDesc45'), 'CompDescImg5.bmp');

  AddCompDescription(46, CustomMessage('CompDesc46'), 'CompDescImg5.bmp');

  AddCompDescription(47, CustomMessage('CompDesc47'), 'CompDescImg5.bmp');

  AddCompDescription(48, CustomMessage('CompDesc48'), 'CompDescImg5.bmp');

  AddCompDescription(49, CustomMessage('CompDesc49'), 'CompDescImg5.bmp');

  AddCompDescription(50, CustomMessage('CompDesc50'), 'CompDescImg5.bmp');

  AddCompDescription(51, CustomMessage('CompDesc51'), 'CompDescImg5.bmp');

  AddCompDescription(52, CustomMessage('CompDesc52'), 'CompDescImg5.bmp');

  AddCompDescription(53, CustomMessage('CompDesc53'), 'CompDescImg5.bmp');

  AddCompDescription(44, CustomMessage('CompDesc54'), 'CompDescImg5.bmp');

  AddCompDescription(55, CustomMessage('CompDesc55'), 'CompDescImg5.bmp');

  AddCompDescription(56, CustomMessage('CompDesc56'), 'CompDescImg5.bmp');

 

 

 

[Pokaritel_VBR]

Фотошоп, скриншотер и Гугл тебе в помощь!

 

Я их уже скринил с гугла , но удалил папку с ними 

[Kaster62rus]

Я их уже скринил с гугла , но удалил папку с ними 

Скринил с Гугла...    Зачёт!!! 

Рас удалил, тебе поможет R.saver или Recuva

[Ekspoint]

выше ищи 

[woole]

парни , чёт посмотрел я так и понял , что картинка , которая появляется у мышки , слишком резкая и режет глаза , кто-нибудь пожертвует своими чертежами , дав мне скрипт с картинками ток , как у протанки и картинки к ним (

Выше был неплохой скрипт, воспользуйся поиском

Твоя проблема в том, что функция InitializateWizard() повторяется, она должна быть прописана единожды во всем скрипте

[Kaster62rus]

У тебя картинка на скрине 355*210, а рамка 345*200 примерно

Либо пойми, что размеры не те, либо сделай нормальный скрин

 

Покопался в скрипте и вот что нашёл

Проблема была не только в картинке но и в скрипте

 

CompDescImg := TBitmapImage.Create(WizardForm);

  with CompDescImg do

  begin

    Parent := CompDescImgPanel;

    SetBounds(ScaleX(5), ScaleY(5), CompDescImgPanel.Width - ScaleX(10), CompDescImgPanel.Height - ScaleY(10));

    Stretch := True;

    Hide;

  end;

 

Заменил на

 

CompDescImg := TBitmapImage.Create(WizardForm);

  with CompDescImg do

  begin

    Parent := CompDescImgPanel;

    SetBounds(ScaleX(2), ScaleY(2), CompDescImgPanel.Width - ScaleX(4), CompDescImgPanel.Height - ScaleY(4));

    Stretch := True;

    Hide;

  end;

 

Картинку сделал 351х206 и вот что получилось

 

было

 

стало

[mpmp]

Привет, ребята.

 

Вопрос от меня:

Как сделать, чтобы файл от выбран и установленной мод, имеет ярлык на рабочий стол ?

Может быть необходимо добавить что-то в [Components] --> Flags:

[Components]
Name: MMP\ZO; Description:1.Zoom.; Flags: ???? что-то ?????;

Не следует путаться, я не прошу для этого кода:

Потому что в этом варианте, помещаются ярлык всегда, независимо от того установлен или нет данный файл.

[Icons]
Name: "{commondesktop}\Название_ярлыка"; Filename: "C:\Windows\программа.exe";

 

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

Edited February 20, 2015 by mpmp

[Kotyarko_O]

@mpmp, если я правильно вас понял, вам нужно что-то типа этого:

[Components]
Name: MMP\ZO; Description:1.Zoom.;

[Icons]
Name: "{commondesktop}\Название_ярлыка"; Filename: "C:\Windows\программа.exe"; Check: IconChecker

[Code]
Function IconChecker(): Boolean;
begin
 Result := IsComponentSelected('MMP\ZO');
end;

[mpmp]

@mpmp, если я правильно вас понял, вам нужно что-то типа этого:

[Components]
Name: MMP\ZO; Description:1.Zoom.;

[Icons]
Name: "{commondesktop}\Название_ярлыка"; Filename: "C:\Windows\программа.exe"; Check: IconChecker

[Code]
Function IconChecker(): Boolean;
begin
 Result := IsComponentSelected('MMP\ZO');
end;

 

Абсолютно правильно меня поняли, хотя мой русский. :)

Золотой человек.

Большое спасибо.

 

И еще один вопрос:

Как сделать так, что выбрать (изменить) вида значок ярлыка ?

[Kotyarko_O]

И еще один вопрос:

Как сделать так, что выбрать (изменить) вида значок ярлыка ?

На примере иконки деинсталлятора:

[Iсons]
Name: "{commondesktop}\Название_ярлыка"; Filename: "C:\Windows\программа.exe"; IconFilename: "{uninstallexe}"; Check: IconChecker

Можно так же:

[Iсons]
Name: "{commondesktop}\Название_ярлыка"; Filename: "C:\Windows\программа.exe"; IconFilename: "{app}\Icon.ico"; Check: IconChecker

[AtotIK]

Дописать "Components: main;" или "Tasks: startmenu;" можно и не дуриться с кодом.

[mpmp]

На примере иконки деинсталлятора:

 

...

 

Можно так же:

[Iсons]
Name: "{commondesktop}\Название_ярлыка"; Filename: "C:\Windows\программа.exe"; IconFilename: "{app}\Icon.ico"; Check: IconChecker

 

Ъф корсе

Большое спасибо.

+

 

И все это из-за этот мод: Один клиент для игры на разных серверах [RU-EU-AISA]

Edited February 20, 2015 by mpmp

[fleshr]

Есть скрипт, в котором подключен Inno Download Plugin. Прячу кнопку FAQ на wpInstalling, а как спрятать кнопку FAQ во время скачки файла?

[woole]

Есть скрипт, в котором подключен Inno Download Plugin. Прячу кнопку FAQ на wpInstalling, а как спрятать кнопку FAQ во время скачки файла?

Разве скачка прерывается тоже?

Edited February 21, 2015 by woole

[Kotyarko_O]

Есть скрипт, в котором подключен Inno Download Plugin. Прячу кнопку FAQ на wpInstalling, а как спрятать кнопку FAQ во время скачки файла?

Разве скачка прерывается тоже?

Нет. Не прерывается.

 

Вроде, как-то так:

 case WizardForm.CurPageID of
  IDPForm.Page.ID: Button.Hide;
  wpInstalling: Button.Hide;
 else
  Button.Show
 end;

[fleshr]

@Kotyarko_O, спасибо все работает 

[Pokaritel_VBR]

Скринил с Гугла...    Зачёт!!! 

Рас удалил, тебе поможет R.saver или Recuva

не видет с recua ) уже пробовал

[Kaster62rus]

не видет с recua ) уже пробовал

Если тебе именно протанковские картинки нужны, отскринь с мод пака. Неужели трудно...

[Pokaritel_VBR]

Если тебе именно протанковские картинки нужны, отскринь с мод пака. Неужели трудно...

я имел введу дайте скрипт , такой , чтобы картинка была в самом инстоляторе , а не возле курсора