Genri
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
DuhaLab -- в секции [INI] вместо параметра Tasks: используй параметр Check: Т.е. выглядеть это будет примерно так (только откуда у тебя в примере Tasks: icons/3 я не знаю):
Код:
[Setup]
AppName=My Program
AppVerName=My Program v.1.2
DefaultDirName={pf}\My Program
[Files]
Source: "MyProg.ini"; DestDir: "{app}"
[INI]
Filename: {app}\opera6.ini; Section: User Prefs; Key: Save With Images Use Subfolder; String: 1; Check: CheckOption(4); Flags: uninsdeleteentry
Filename: {app}\opera6.ini; Section: User Prefs; Key: Force Encoding; String: AUTODETECT-RU; Check: CheckOption(5); Flags: uninsdeleteentry
Filename: {app}\opera6.ini; Section: User Prefs; Key: Title; Check: CheckOption(0); String: ; Flags: uninsdeleteentry
;Filename: {app}\opera6.ini; Section: Multimedia; Key: Always load favicon; String: 1; Tasks: icons/3; Flags: uninsdeleteentry
Filename: {app}\opera6.ini; Section: User Prefs; Key: Use Integrated Search; String: 1; Check: CheckOption(2); Flags: uninsdeleteentry
Filename: {app}\opera6.ini; Section: User Prefs; Key: Ellipsis In Center; String: 1; Check: CheckOption(3); Flags: uninsdeleteentry
[Kode] ; Естественно переименовать в Code 
var
Page: TInputOptionWizardPage;
IsRegisteredUser: Boolean;
procedure InitializeWizard();
begin
Page := CreateInputOptionPage(wpSelectTasks,
'License Information', 'Are you a registered user?',
'If you are a registered user, please check the box below, then click Next.',
False, False);
{0} Page.Add('Исправить ошибку page2chm v.2.7 RC1 с Opera v.9.10 и выше (проблема с сохранением страниц данным плагином)');
{1} Page.Add('Исправить кодировку русских символов в оболочке Windows (проблема с правильным отображением русских символов)');
{2} Page.Add('Использовать доступное поле множественного поиска или поле "Поиск на странице" взамен диалогового окна "Найти"');
{3} Page.Add('Сокращать длинные названия кнопок и панелей в середине имени');
{4} Page.Add('Включить сохранение страниц на подобие IE (файл + папка) Если вы используете page2chm галку ставить не рекомендуется');
{5} Page.Add('Включить рекомендуемую кодировку текста в браузере Opera');
Page.Values[0] := True;
end;
function CheckOption(OptionNum: integer): Boolean;
begin
Result:= Page.Values[OptionNum];
end; |
Добавлено:
maxdddca123
#define BuildNumHI Int(ReadIni(SourcePath + "\\BuildInfo.ini","Info","BuildHI","0"))
#expr BuildNumHI = BuildNumHI + 1
#expr WriteIni( SourcePath + "\\BuildInfo.ini","Info","BuildHI", BuildNumHI )
#define BuildNumLO Int(ReadIni(SourcePath + "\\BuildInfo.ini","Info","BuildLO","0"))
#expr BuildNumLO = BuildNumLO + 1
#expr WriteIni( SourcePath + "\\BuildInfo.ini","Info","BuildLO", BuildNumLO )
[Setup]
AppName=My Program
AppVerName=My Program v.1.2
DefaultDirName={pf}\My Program
VersionInfoVersion=1.0.{#BuildNumHI}.{#BuildNumLO}
[/code] -- любопытства ради - а как ты делал, что у тебя не получилось ?
|
Всего записей: 872 | Зарегистр. 06-09-2003 | Отправлено: 16:51 29-05-2007 | Исправлено: Genri, 17:18 29-05-2007 |
|
