[GoshaPolo]

На мой вопрос выше никто ответа не знает?

[Raf-9600]

GoshaPolo, если не ошибаюсь, нужно писать Root: HKCU; и без S-1-5-21-4202093143-4282819894-987643330-1006

[GoshaPolo]

Raf-9600, писал так, но при установке выдает ошибку, что не может прописать по такому пути

[R.i.m.s.k.y.]

Поделитесь пожалуйста алгоритмом сравнения нужной версии файла 50.6 через GetVersionNumbers(FilePath, VersionMSFile, VersionLSFile);
Причем VersionMSFile деятичный, а VersionLSFile - шестандцатеричный (т.е. msgbox показывает 50 327680 соответственно)

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

[Sanshalay]

Помогите пожалуйста убрать страницы "Меню пуск" и "Компоненты" правильно. Как не убираю, вылазит рантайм. Буду очень благодарен

Скрипт: http://clck.ru/d/zxAyJVzi19yFX

[GoshaPolo]

Sanshalay, мне тут выше отвечали на такой же вопрос

Вот ответ:

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

Код:

[Setup]

DisableSelectComponentsPage=yes
DisableSelectProgramGroupPage=yes

[Sanshalay]

GoshaPolo, ошибка вылазит:
Unrecognized [Setup] section directive "DisableSelectComponentsPage"

[Serega]

в этом нет ничего неправильного? »

всё правильно

и вообще записывать через case правильнее (с точки зрения оптимизации)? »

Вопрос поставлен не верно, писать через case... или через if..., это скорее всего привычка написания, ну или кому как легче читать код. Конечно это только можно отнести только если использовать только одну проверку т.е. if ... then ... else, если таких проверок более двух, то удобнее на мой взгляд через case...

На мой вопрос выше никто ответа не знает? »

HKCU\Software\...

Поделитесь пожалуйста алгоритмом сравнения нужной версии файла 50.6 через GetVersionNumbers »

Пример

Код:

[Setup]
AppName=My Program
AppVerName=My Program v 1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program
OutputDir=.
Compression=lzma2/ultra64
InternalCompressLevel=ultra64
SolidCompression=yes

[Languages]
Name: ru; MessagesFile: compiler:Languages\Russian.isl

[Code]
function InitializeSetup(): Boolean;
var
  VersionMS, VersionLS: Cardinal;
begin
  if GetVersionNumbers(ExpandConstant('{sys}\shell32.dll'), VersionMS, VersionLS) then
    MsgBox(IntToStr(VersionMS shr 16) + '.' +
           IntToStr(VersionMS and $FFFF) + '.' +
           IntToStr(VersionLS shr 16) + '.' +
           IntToStr(VersionLS and $FFFF),
           mbInformation, MB_OK);
end;

[Gnom_aka_Lexander]

это скорее всего привычка написания, ну или кому как легче читать код. »

Внесу свою лепту, так сказать
Через case удобно и оптимально проверять сранение двух переменных, когда:
1) одну определенную переменную нужно сравнить с несколькими другими, и в зависимости от того, какой из других она равна - совершить соответствующее действие
2) когда одну переменную нужно сравнить с несколькими другими и совершить в нескольких случаях одно и тоже действие.
В обоих этих случаях плюсы ощутимы - начиная от читаемости кода, заканчивая его оптимальностью. но в плане оптимальности, нужно помнить - case of работает до первого положительного ответа. как только получен ответ - да, выполнение структуры прерывается, и если это недопустимо, то тут без вариантов - if...then...else...

[GoshaPolo]

Sanshalay, со страницей компонентов у меня тоже такой способ не прокатил

Вот такой вариант 100% получится. Пропиши эту функцию в секцию CODE

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

Код:

function ShouldSkipPage(PageID: Integer): Boolean;
begin
if PageID = 7 then Result:= True;
if PageID = 8 then Result:= True;
end;

7 и 8 это ID страниц. Вот список всех страниц:

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

Код:

wpWelcome = 1;
wpLicense = 2;
wpPassword = 3;
wpInfoBefore = 4;
wpUserInfo = 5;
wpSelectDir = 6;
wpSelectComponents = 7;
wpSelectProgramGroup = 8;
wpSelectTasks = 9;
wpReady = 10;
wpPreparing = 11;
wpInstalling = 12;
wpInfoAfter = 13;
wpFinished = 14;

Serega, в том то и дело, что там не CURRENT USER, а в простой USERS надо записать. Если HKU\SOFTWARE прописывать, то выдает ошибку при установке, что записать такую строку не может в реестр. Или разницы нету между CURRENT USER и этой строкой в USERS? Но почему тогда они разделены на разные разделы?