[Sollar]

El Sanchez, как сделать чтобы событие наступало сразу после первого клика?
если так, то только после второго

Код:

procedure TaskOnClick(Sender: TObject);
var
i:integer;
begin
  if IsTaskSelected('nomer1') or IsTaskSelected('nomer0') then
        begin 
        for i:=2 to WizardForm.TasksList.Items.Count-1 do
          begin
          WizardForm.TasksList.ItemEnabled[i]:= False;
          end;
        end;
end;

procedure InitializeWizard();
begin
WizardForm.TasksList.OnClick := @TaskOnClick;
end;

а если так, то только после перехода на другую страницу

Код:

procedure CurPageChanged(CurPageID: Integer); 
var 
  i: integer;
begin
  if CurPageID = wpSelectTasks then 
    begin
    if IsTaskSelected('nomer1') or IsTaskSelected('nomer0') then
        begin 
        for i:=2 to WizardForm.TasksList.Items.Count-1 do
          begin
          WizardForm.TasksList.ItemEnabled[i]:= False;
          end;
        end;
    end;
end;