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

Желательно перенести это туда где ярлык на рабочий стол)

fduf,
Проще в компонент лист всё перенести:

Цитата:

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

[Components]
Name: Desktop; Description: Назначение ярлыков; Types: full; Flags: fixed
Name: Desktop\DesktopCheck; Description: Создать ярлык на рабочем столе; Flags:checkablealone;

[Icons]
Name: {userdesktop}\Космические рейнджеры 2; Filename: {app}\Rangers.exe; Components: Desktop\DesktopCheck;

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

fduf,
Скрипт изначально надо смотреть, выкидывать от туда лишние чекбоксы и добавлять те что я тебе выше написал, скрипт я смотреть не буду - мне не охота в чужом ковыряться.

Snoopak96
А зачем ему всё это делать через секцию [Components]?
Если он хочет сделать через секцию [Tasks]!

fduf
[more=Вот пример в Tasks]
[Tasks]
Name: additional; Description: "Дополнительнео ПО";
Name: additional\dx; Description: "Обновить DirectX"; Flags: unchecked
Name: additional\vcr; Description: "Обновить библиотеки Visual C++"; Flags: unchecked;
[/more]
[more=Вот пример Tasks и Run][Tasks]
Name: additional; Description: "Дополнительнео ПО";
Name: additional\dx; Description: "Обновить DirectX"; Flags: unchecked
Name: additional\vcr; Description: "Обновить библиотеки Visual C++"; Flags: unchecked;

[Run]
Filename: {src}\Redist\DirectX\dxsetup.exe; Tasks: additional\dx; StatusMsg: Обновление DirectX ...; Parameters: /silent;
Filename: {src}\Redist\vcredist_x86.exe; Tasks: additional\vcr; StatusMsg: Обновление библиотек Visual C++ ...; Parameters: /q;[/more]

fduf
А ты вместо того чтоб просить сам все сделай. На форуме куча примеров, да и в справку не лишнее заглянуть.

vintage 1,
Точно) и за каким там интересно сзади белый фон нарисовали) типа закос под компонент лист что ли)

Snoopak96

Цитата:

очно) и за каким там интересно сзади белый фон нарисовали) типа закос под компонент лист что ли)

Возможно

Snoopak96 23:09 14-07-2011
Цитата:

Inno Setup Compiler 5.4.1-4.2 build 110319 от ResTools

Вот именно что в Inno Setup Compiler 5.4.1-4.2 build 110319 нету TIconImage! Сначала попробуй найти в Inno Setup Compiler 5.4.1-4.2 build 110319 класс TIconImage, а потом уже пиши
Цитата:

Добавь TNewIconImage, увидишь как у тебя всё нормально.

ЗЫ. Поди пожуй тухлых помидоров, умник.

всем добрый день/вечер
подскажите пожалуйста,как в инсталятор добавить лого в .png формате? лого должно быть посередине..
смотрел F.A.Q. не нашел,или невнимательно глядел...
вот сам скрипт,там есть все необходимое... http://rghost.ru/14637691
могу за помощь перевести немного денег на web money...рублей 20

Цитата:

Вот именно что в Inno Setup Compiler 5.4.1-4.2 build 110319 нету TIconImage!

Видимо кому-то стоит почитать историю ResTools.
Это чтоб наверняка:
[more=Читать дальше..] [/more]


По поводу помидоров, огурцов, тыкв и т.д., Вам сюда

Всем доброго дня.

Цитата из русского хэлпа, раздел "константы":


Хотелось бы узнать подробнее, чем же они отличаются.

Я создавал ранее ярлык, используя {commondesktop}. Ярлык устарел и патч к программе удаляет его в секции [InstallDelete] с использованием константы {userdesktop}. Все работает, но неизвестность "давит".
Посетила мысль, что может быть {userdesktop} работает с рабочим столом конкретного пользователя, а {commondesktop} уже шерстит столы всех пользователей. Не уверен... Поясните, пожалуйста, чем же они все таки отличаются. Спасибо.

Всем привет давно не был здесь наконец навели хоть кокой то порядок
dinazav
{userdesktop} - рабочий стол Администратора (User)
(C:\Documents and Settings\User\Рабочий стол)
{commondesktop} - рабочий стол всех пользователей (ALL User)
(C:\Documents and Settings\All Users\Рабочий стол)
в общем 2 разных пути
Администратор - может видеть по обоим путям ярлыки {commondesktop} {userdesktop}
А гость только {commondesktop}

Добавлено:
Snoopak96
demon1232010
Я насколько знаю
Inno Setup Compiler 5.4.1-4.2 build 110319 он расширяет возможности GUI Inno Setup-а
а возможности TIconImage и т.д. доступны только если добавить Inno ISCmplr Setup 5.4.2 build 110329
P.S.
Но может я чего то не до понял в вашем споре?!
читал всё беглым взглядом

Sarcastic_94
http://rghost.ru/14716591

---

Вот! Добавил лого )) Добавляется оно на прозрачную облость через fairy.dll
Денег не надо xD
У тебя там ещё компоненты надо поправить... изображение лежит не ровно ))) Но это уже сам!

---

Ещё вопрос, зачем ты паришься? Ведь есть отличные закосы под каталистов! Практически один в один!
Да и вообще, не вижу смысла юзать такой инсталл, когда им уже пользуются многие

Цитата:

Проще в компонент лист всё перенести:

Цитата:

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

Цитата:

А зачем ему всё это делать через секцию [Components]?
Если он хочет сделать через секцию [Tasks]!

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

как двигать окно не за стандартный кусок вверху окна, а например снизу чтобы можно было ухватиться и потянуть?
на скрине показано:
http://i26.fastpic.ru/big/2011/0716/57/4cb5cfaea91388141135ca1713ce7957.png

Gnom3
А как перенести компонент-лист на нужную страницу?

blablach
WizardForm.ComponentsList.Parent := твоя страница. Возможные страницы:
[more=Страницы]WizardForm.WelcomePage
WizardForm.LicensePage
WizardForm.PasswordPage
WizardForm.InfoBeforePage
WizardForm.UserInfoPage
WizardForm.SelectDirPage
WizardForm.SelectComponentsPage
WizardForm.SelectProgramGroupPage
WizardForm.SelectTasksPage
WizardForm.ReadyPage
WizardForm.PreparingPage
WizardForm.InstallingPage
WizardForm.InfoAfterPage
WizardForm.FinishedPage
[/more]думаю, что понятно, где какая страница?

PavZver

Цитата:

а например снизу чтобы можно было ухватиться и потянуть?

[more]
Код:
function ReleaseCapture: BOOL; external 'ReleaseCapture@user32.dll stdcall delayload';

procedure wfMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
WizardForm.perform($0112, $f012, 0);
end;

procedure InitializeWizard();
begin
wizardform.OnMouseDown:=@wfMouseDown;
end;

troyan90
спасибо! работает!)

Есть задачка. Делаю инсталлятор для плагинов к фотошопу, нужно получить несколько путей, единственный найденный вариант - реестр, но там могут быть различия из-за разных версий:
[more=реестр][Registry]
; пути для х64
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop; Flags: uninsdeletekeyifempty
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop\12.0; ValueType: string; ValueName: ApplicationPath; ValueData: {pf}\Adobe\Adobe Photoshop CS5.1 (64 Bit)\; Flags: uninsdeletevalue uninsdeletekeyifempty
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop\12.0; ValueType: string; ValueName: PluginPath; ValueData: {pf}\Adobe\Adobe Photoshop CS5.1 (64 Bit)\Plug-Ins\; Flags: uninsdeletevalue uninsdeletekeyifempty
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop\12.0\ApplicationPath; ValueType: string; ValueData: {pf}\Adobe\Adobe Photoshop CS5.1 (64 Bit)\; Flags: uninsdeletevalue uninsdeletekeyifempty
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop\12.0\PluginPath; ValueType: string; ValueData: {pf}\Adobe\Adobe Photoshop CS5.1 (64 Bit)\Plug-Ins\; Flags: uninsdeletevalue uninsdeletekeyifempty
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop\55.0; ValueType: string; ValueName: ApplicationPath; ValueData: {pf}\Adobe\Adobe Photoshop CS5.1 (64 Bit)\; Flags: uninsdeletevalue uninsdeletekeyifempty
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop\55.0; ValueType: string; ValueName: PluginPath; ValueData: {pf}\Adobe\Adobe Photoshop CS5.1 (64 Bit)\Plug-Ins\; Flags: uninsdeletevalue uninsdeletekeyifempty
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop\55.0\ApplicationPath; ValueType: string; ValueData: {pf}\Adobe\Adobe Photoshop CS5.1 (64 Bit)\; Flags: uninsdeletevalue uninsdeletekeyifempty
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop\55.0\PluginPath; ValueType: string; ValueData: {pf}\Adobe\Adobe Photoshop CS5.1 (64 Bit)\Plug-Ins\; Flags: uninsdeletevalue uninsdeletekeyifempty
; пути для х32
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop; Flags: uninsdeletekeyifempty
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop\12.0; ValueType: string; ValueName: ApplicationPath; ValueData: {sd}\Program Files (x86)\Adobe\Adobe Photoshop CS5.1\; Flags: uninsdeletevalue uninsdeletekeyifempty
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop\12.0; ValueType: string; ValueName: PluginPath; ValueData: {sd}\Program Files (x86)\Adobe\Adobe Photoshop CS5.1\Plug-Ins\; Flags: uninsdeletevalue uninsdeletekeyifempty
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop\12.0\ApplicationPath; ValueType: string; ValueData: {sd}\Program Files (x86)\Adobe\Adobe Photoshop CS5.1\; Flags: uninsdeletevalue uninsdeletekeyifempty
Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop\12.0\PluginPath; ValueType: string; ValueData: {sd}\Program Files (x86)\Adobe\Adobe Photoshop CS5.1\Plug-Ins\; Flags: uninsdeletevalue uninsdeletekeyifempty[/more]
цифра 12 и 55 в путях зависит от версии, нигде в реестре я так и не нашел, как получить версию, чтоб сперва подставить ее, а уж потом подставлять в проверяемый ключ. Вопрос - можно-ли это както решить?
П.С. Нашел ключ, который неизменен, может он поможет в решении задачи.

Код: ; команда открытия файлов типа Photoshop.PlugIn
Root: HKLM; SubKey: SOFTWARE\Classes\Photoshop.PlugIn\shell\open\command; ValueType: string; ValueData: {pf}\Adobe\Adobe Photoshop CS5.1 (64 Bit)\Photoshop.exe; Flags: uninsdeletevalue uninsdeletekeyifempty

Gnom3
думаю есть более легкий вариант решения данной задачи, но я предлагаю использовать рекурсивный поиск в Root: HKLM; SubKey: SOFTWARE\Adobe\Photoshop;

Можно ли для WizardForm.ComponentsList фон сделать прозрачным?

Sergey_Demchuk
нет

Sergey_Demchuk,
Можно сделать так:
[more]
[Files]
Source: "1.bmp"; Flags: dontcopy solidbreak recursesubdirs createallsubdirs;


[_Code]
var
BGImgFile: String;
BorderWidth:Integer;

procedure InitializeWizard();

ExtractTemporaryFile('1.bmp');
BGImgFile := ExpandConstant('{tmp}\1.bmp');
with WizardForm.ComponentsList do
begin
Left := (WizardForm.ClientWidth-WizardForm.ComponentsList.Width) div 2;
Top := ScaleY(180);
Parent := WizardForm.WelcomePage;
Font.Color := clSilver;
BorderWidth := (WizardForm.ComponentsList.Width-WizardForm.ComponentsList.ClientWidth) div 2;
LoadBGBmpFromFile(BGImgFile, WizardForm.ComponentsList.Left+BorderWidth, WizardForm.ComponentsList.Top+BorderWidth);
end;[/more]
Вставить точно такое изображение на задний план компонент листа.

Snoopak96
Спасибо, я так и делал, но не подошло.

Скажите, а почему врут в Инно света?
WizardForm.ComponentsList.Color:=$576889;
должен быть синеватый оттенок (в фотошопе именно это значение для данного цвета написано)
В инно же он коричневый

Sergey_Demchuk.
Цвета в делфи задам на перёд по моему, если память не изменяет. Сейчас если найду программу где-то на винте валялась по подбору цветов в делфи, то скину.

Snoopak96
Найди плиз