[Johny777]

Да вот смотрю, в первый раз картинка появляется. Потом отвожу курсор, ещё раз навожу и уже не появляется. »

так сразу и сказал бы
благодарю за найденную ошибку!
в procedure CompOnMouseLeave(Sender: TObject); не хватало LastIndex := -1;
исправил, перезалил демо

http://forum.oszone.net/post-2169372-662.html

[Dinvin4ester]

Nordek,
Спасибо , но что-то выдает ошибку .

[Nordek]

но что-то выдает ошибку . »

Я не могу угадать путь к твоему файлу exe.

А так?

Код:

Source: E:\Games 2\Четыре поросенка и коробка\Твой_файл1.exe; DestDir: {commondesktop}
Source: E:\Games 2\Четыре поросенка и коробка\Твой_файл2.exe; DestDir: {commondesktop}

эти строчки, добавляешь в секцию [Files].

[Dinvin4ester]

Nordek,
Вот сейчас все подошло. Огромное спасибо вам .

[tuz-veta]

Привет всем!
Нужна ваша помощь, например запускаю инсталлятор и устанавливаю компоненты которые мне надо.
Потом запускаю еще раз инсталлятор и снимаю галочки с тех компонентов которые я установил,
как сделать если я снимаю галочки с компонентов которые были установленные
то чтоб эти компоненты удалялись?
ЗАРАНЕЕ БОЛЬШОЕ СПАСИБО!

[habib2302]

tuz-veta,

предварительное удаление только для твоего инсталла

Код:

[Setup]
AppId=by Xabib

[code  ]                           

function UninstallMyApp(): Boolean;
var
    Buff: String;
    i: Integer;
begin
    Result := not RegQueryStringValue( HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{#SetupSetting("AppID")}_is1', 'UninstallString', Buff );
    if not Result then Result := not FileExists(RemoveQuotes(Buff));
    if not Result then if MsgBox('Перед установкой необходимо удалить предыдущую версию приложения. Продолжить?', mbError, MB_YESNO) = IDYES then
    try
        Exec(RemoveQuotes(Buff), '', ExtractFilePath(RemoveQuotes(Buff)), SW_SHOW, ewWaitUntilTerminated, i);
    finally
        Result := not RegQueryStringValue( HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{#SetupSetting("AppID")}_is1', 'UninstallString', Buff );
        if not Result then MsgBox('Удаление завершилось неудачей!', mbError, MB_OK);
    end;
end;

function InitializeSetup(): Boolean;
begin
    Result := UninstallMyApp();
end;

[tuz-veta]

habib2302,
Вы наверное не так меня поняли.
Мне надо удалять компоненты снятием галочки с компонента а не через unins000.exe

[Tco 03]

написал полностью код закачки с нуля на основе тех же функций из Wininet.h/Wininet.pas двойной прогресс как ты и хотел, ... сам код загрузки + демо»

Что-то у меня не работает... Висит надпись "Preparing download..." и всё, больше никаких действий!

я ж не знаю, тонкостей запроса Tco 03 »

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

[Optitron]

Здравствуйте. Как сделать так, что кнопка "Далее" переименовывалась в "Установить" на посл. странице мастера перед установкой (при условии, что DisableReadyPage=yes).

[Mat_y]

Добрый день.
Такой вопрос... реально ли в этом шаблоне установщика сделать прокрутку списка компонентов кнопками вверх/вниз (которые на форме нарисованы) и (или) колесиком мышки? Т.к. в данный момент реализован только ползунок.
Буду благодарен за помощь.

Здравствуйте. Как сделать так, что кнопка "Далее" переименовывалась в "Установить" на посл. странице мастера перед установкой (при условии, что DisableReadyPage=yes). »

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

Код:

Procedure CurPageChanged(CurPageID: Integer);
begin
 if CurPageID = wpSelectTasks then
 begin
  WizardForm.NextButton.Caption:='Установить';
 end;
end;