[valyok666]

repacksman, не понимаю смысл выкладки его

[repacksman]

valyok666, Может ктото не может из крінкелса скачать

[valyok666]

repacksman, смотрю русским языком ты не блещешь, как и Vasyakrn

[repacksman]

valyok666, Я и есть vasyakrn. Мне просто профиль взломали

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

У меня такой вопрос - можно ли как-то изменить через код Description в списке компонентов?

И маленький вопросик: на последней странице у меня две птички "посетить сайт", если выбрать обе-две, открывается в броузере только первая. Я так понимаю браузер не может переварить сразу два урла и открывает первый переданный. Как это обойти?

[by_gangster]

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

[Gnom_aka_Lexander]

Может ктото не может из крінкелса скачать »

Изза тебя, вора, пришлось пойти на эти ограничения. Тебе кстати, никто не разрешал этот скрипт у себя выкладывать.

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

блин
за такими спорами про меня забудут

У меня такой вопрос - можно ли как-то изменить через код Description в списке компонентов? И маленький вопросик: на последней странице у меня две птички "посетить сайт", если выбрать обе-две, открывается в броузере только первая. Я так понимаю браузер не может переварить сразу два урла и открывает первый переданный. Как это обойти? »

[Gnom_aka_Lexander]

R.i.m.s.k.y.,

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

Код:

[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application

[Components]
Name: text; Description: Язык субтитров;
Name: text\rus; Description: Русский; 
Name: text\eng; Description: Английский; 

[*Code]
procedure ComponentsListClick(Sender: TObject);
var
  s: string;
  n: Integer;
begin
  with WizardForm.ComponentsList do
  begin
    s := '';
    ItemCaption[0] := '';
    for n := 0 to ItemCount - 1 do
    begin
      if Checked[n] then
        s := s + ItemCaption[n] + ' ' + '|' + ' ' + #32;
    end;
    Delete(s, Length(s) - 2, 2);
    if s = '' then s := 'Ничего не выбрано';
    ItemCaption[0] := s;
  end;
end;

procedure InitializeWizard();
begin
  with WizardForm.ComponentsList do
  begin
    OnClick := @ComponentsListClick;
  end;
end;

По второму вопросу - на птичках не стоит фалаг ожидания?

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

По второму вопросу - на птичках не стоит фалаг ожидания? »

нет

Код:

Filename: http://www.SVP-Team.com; Description: Зайти на сайт SmoothVideo Project; Flags: shellexec skipifsilent postinstall nowait Unchecked
Check: IsRus; Filename: http://svp-team.com/wiki/Mailing_list/ru; Description: Подписаться на рассылку; Flags: shellexec skipifsilent postinstall nowait Unchecked

по первому что-то я не вижу чтобы что-то менялось