Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для ZVSRus

Старожил


Сообщения: 284
Благодарности: 85

Профиль | Отправить PM | Цитировать


Цитата ROMKA-1977:
возможно ли в секции [Tasks] добавить CheckBox для перехода по веб ссылке ?
Может так

Код: Выделить весь код
[Setup]
  AppName=My Application
  AppVersion=1.5
  DefaultDirName={pf}\My Application
  OutputDir=.

[Tasks]
  Name: WebSite; Description: "Перейти на страницу Автора"; GroupDescription: "Другие задачи:"; Flags: unchecked

[Code  ]
procedure CurStepChanged(CurStep: TSetupStep);
var
  r: integer;

begin
  if CurStep = ssDone then if IsTaskSelected('WebSite') then
  begin
    ShellExec('open', 'http://forum.oszone.net/post-3024679-1051.html', '','', SW_SHOW, ewNoWait, r);
  end;
end;

-------
Inno Setup 5.5.1.ee2 Ultra ANSI Unicode

Это сообщение посчитали полезным следующие участники:

Отправлено: 10:30, 29-02-2024 | #1052