Вопрос MsgBox при выборе компонента (ComponentsList'е)

AtotIK

Пользователь
Привет всем!

Столкнулся с данной проблемой: нужно что бы при выборе компонента сразу же появился MsgBox с информацией. Уже час кручусь и не мог это реализовать. Пробовал делать через isComponentSelected и выбором страницы (wpSelectComponents), но сообщение появляется только после перехода на следующую страницу.

Вроде решение понимаю, но что-то голова совсем не варит...:(
 

AtotIK

Пользователь
Хамик, да, но вот только нужно это на основном ComponentsList'е, а не на создаваемом.
 

ReFLeXx

Пользователь
AtotIK,
Код:
[Components]
Name: comp1; Description: "Установить ...";
Name: comp2; Description: "Удалить ...";

[Code]

procedure ComponentsListOnClickCheck(Sender: TObject);
begin
  if (WizardForm.ComponentsList.ItemIndex = 0) and IsComponentSelected('comp1') then
   MsgBox('Comp1 on click', mbInformation, MB_OK);
end;

procedure InitializeWizard;
begin
  WizardForm.ComponentsList.OnClickCheck:=@ComponentsListOnClickCheck;
end;
 
Сверху