[fantik]

http://fantik.vline.ru/soft/FastStone_2.8.exe

Здесь версия InnoSetup.
Косяков не обнаружено, на T13 ставится просто замечательно, под дефолт_юзер, никаких придумок не нужно.

Единственное, что при /noicons всё равно лепит ярлычки, как обойти?

Сорс если нужен кому - выложу.

[EgOrus]

fantik
да с реестром такая фигня есть, но в данном случае имхо не очень актуально, всё рано пути переправлять, и объем небольшой.

что при /noicons всё равно лепит ярлычки

попробуй в секцию [Setup] добавить AllowNoIcons=yes

[Black Babay]

Сорс если нужен кому - выложу.

Конечно нужен! Это же интересно!

[fantik]

Так, занялся созданием _правильного_ дистрибутива, с сохранением предыдущих файловых ассоциаций, никак не могу допетрить, как при анинсталле не удалить/очистить значение реестра, а присвоить какое-то новое...

Если это возможно, конечно

[EgOrus]

fantik
стандартными средствами никак, можно через паскаль, пример скрипта
[code]
[Files]
Source: files\*; DestDir: {app}; Flags: ignoreversion recursesubdirs; BeforeInstall: MyBeforeInstall

Код:

// При установке, бэкапим значение HKEY_CLASSES_ROOT\.pdf\default в Foxit_bak
// нужно для кореектной деинсталяции, c возвратом предыдущей ассоциации на pdf-файлы
procedure MyBeforeInstall();
var
  PDF: String;
begin
  if RegQueryStringValue(HKEY_CLASSES_ROOT, '.pdf', '', PDF) then
  begin
	RegWriteStringValue(HKEY_CLASSES_ROOT, '.pdf', 'Foxit_bak', PDF);
  end;
end;

// При деинсталяции восстанавливаем бэкапное значение и удаляем ключ Foxit_bak
procedure DeinitializeUninstall();
var
  PDF: String;
begin
  RegDeleteValue(HKEY_CLASSES_ROOT, '.pdf', '');
  if RegQueryStringValue(HKEY_CLASSES_ROOT, '.pdf', 'Foxit_bak', PDF) then
	begin
		RegWriteStringValue(HKEY_CLASSES_ROOT, '.pdf', '', PDF);
	end;
  RegDeleteValue(HKEY_CLASSES_ROOT, '.pdf', 'Foxit_bak');
end;

Если использовать родной деинстоллер, то procedure DeinitializeUninstall(); можно по идее не использовать, тогда в процедуре procedure MyBeforeInstall(); нужно использовать такой же формат ключей как и в родном деинстолере (посмотреть формат ключа в котором сам Faststone бэкапит текущее значение). Немного путано, но надеюсь понятно.

[fantik]

EgOrus
Спасибо

Уже с этимразобрался, сейчас осталось только красиво сделать и сразу выложу.

[Black Babay]

Секцию [Files] переписал, так по моему удобней:

Код:

[Files]
Source: "{app}\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: "{userappdata}\*"; DestDir: "{userappdata}"; Flags: ignoreversion recursesubdirs createallsubdirs

[fantik]

Black Babay
Так структура получается не гибкая. Я оставил как было.

Сделал всё :
- Старые файловые ассоциации остаются при любом количестве инсталлов те, которые были изначально (или после последнего анинстала)
- Регистрируются все типы файлов
- Если добавится новый, то добавить его в скрипт - 2 минуты.

Всё, что остается после анинстала - настройки программы в Application Data
По прежнему не могу не добавлять иконки, ключ /noicons не помогает, AllowNoIcons тоже, это всё не то. Иконка не добавляется в меню, но на рабочий стол кладётся

Файл : http://fantik.vline.ru/soft/FastStone_2.8.exe
Конструктор : http://rapidshare.com/files/3751737/FastStone2.8.7z

[Black Babay]

fantik
Спасибо за проделанный труд! Почет и уважение!

С иконками, думаю надо поступить так:

Код:

[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked

И запускаем с ключами: /SILENT /NOCANCEL /NOICONS
Нигде, ничего не создается. (Проверил)

А я в своей компиляции этот флаг не ставлю, чтобы иконка на столе была.

PS. За "Compiled by" спасибо, очень приятно!

[fantik]

EgOrus
Можешь добавить в шапку