[Антон_Мураткин@vk]

В модуле Uninstall.iss, но как видите она не больше ваших картинок »

В Uninstall.iss вообще нечего не менял но на скине видно что с права полоса и снизу. Из-за чего же это может быть?

[Dodakaedr]

В Uninstall.iss вообще нечего не менял но на скине видно что с права полоса и снизу. Из-за чего же это может быть? »

Не знаю, может из-за скина, а может попробуйте отцентрировать свое изображение.

[Антон_Мураткин@vk]

Dodakaedr, Всё разобрался. Только почему так получается фиг его знает. Сделал ширина - 693 высота 372 и всё стало нормально и разрешение исталятора 700x400.

Просто мистика какая та.

Dodakaedr, Огромное спасибо за помощь.

Dodakaedr, И ещё вопросик, можно ли сделать текст с глянцевым эффектом?
Может знаешь?

[Dodakaedr]

Dodakaedr, И ещё вопросик, можно ли сделать текст с глянцевым эффектом? Может знаешь? »

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

[Антон_Мураткин@vk]

создать изображение с текстом с глянцевым эффектом на прозрачном фоне и сохранить в .png »

Так текста уж много. Ладно что то другое поищу.

[Dodakaedr]

Как в этом коде указать HKU\{code:UsSID}\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts? Код: procedure BackupData(FileExt: String); var OldValueData: string; begin if RegKeyExists(HKCR, '.' + FileExt) then begin RegQueryStringValue(HKCR, '.' + FileExt, '', OldValueData); RegWriteStringValue(HKCR, '.' + FileExt + '(backup)', '', OldValueData); end; end; procedure RestoreData(FileExt: String); var OldValueData: string; begin if RegKeyExists(HKCR, '.' + FileExt + '(backup)') then begin RegQueryStringValue(HKCR, '.' + FileExt + '(backup)', '', OldValueData); RegWriteStringValue(HKCR, '.' + FileExt, '', OldValueData); RegDeleteKeyIncludingSubkeys(HKCR, '.' + FileExt + '(backup)'); end; end; »

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

[saurn]

ключ со всеми значениями и подключами »

Предлагаю, так:

читать дальше »

Код:

[Files]
Source: compiler:Examples\MyProg.exe; DestDir: {app}; AfterInstall: IsRegExport(); Flags: ignoreversion;


[code]
procedure IsRegExport();
var
    i: Integer;
    RegKey: String;
begin
    RegKey := 'HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Inno Setup 5_is1';

    Exec( ExpandConstant( '{win}\regedit.exe' ), '-ea export.reg ' + AddQuotes( RegKey ), ExpandConstant( '{app}' ), SW_HIDE, ewWaitUntilTerminated, i );
end;


procedure IsRegImport();
var
    i: Integer;
    RegFile: String;
begin
    RegFile:= ExpandConstant('{app}\export.reg');

    if FileExists(RegFile) <> False then
      Exec( 'regedit.exe', ' /s ' + AddQuotes( RegFile ), ExpandConstant( '{win}' ), SW_HIDE, ewWaitUntilTerminated, i );
end;


procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
    case CurUninstallStep of
        usUninstall: IsRegImport();
    end;
end;

[Dodakaedr]

Предлагаю, так: »

А как больше веток добавить? Так не работает:

Код:

procedure IsRegExport();
var
    i: Integer;
    RegKey: String;
begin
    RegKey := 'HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\.mp3';
    RegKey := 'HKEY_CLASSES_ROOT\.mp3';
    Exec( ExpandConstant( '{win}\regedit.exe' ), '-ea export.reg ' + AddQuotes( RegKey ), ExpandConstant( '{app}' ), SW_HIDE, ewWaitUntilTerminated, i );
end;

И то создал бекап ключа HKEY_CLASSES_ROOT\.mp3 а при удалении программы не восстанавливает.

С восстановлением разобрался, а как больше путей добавить без понятия.

[Shift85]

можно ли сделать текст с глянцевым эффектом? »

Антон_Мураткин@vk, Нет. Вот попробуй модуль для текста.http://rghost.ru/55185131

[Kashtan007]

Привет всем. Как сделать чтобы шапка установщика на каждой странице была разная. Разные шапки получилось поставить только на начальной и финишной странице. А на страницах: каталог, компонент лист и т.д. ставилась одна общая шапка.
Ставил изображения через Редактор форм в расширенном Инно. Добавлял BitmapImage.
Возможно ли как-то сделать на этих страницах разные шапки. Если да, то как? Заранее спасибо!