[Johny777]

мне может кто подсказать?
создаю комбобокс, при нажатии на Item должны быть отмечены те или иные чекбоксы и переключатели. Короче говоря как у типов установки.

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

Код:

var
   TypeComboBox: TNewComboBox;

procedure InitializeWizard;
begin
  { TypeComboBox }
  TypeComboBox := TNewComboBox.Create(WizardForm);
  with TypeComboBox do
  begin
    Name := 'TypeComboBox';
    Parent := ComponentsPage.Surface;
    Left := ScaleX(42);
    Top := ScaleY(8);
    Width := ScaleX(233);
    Height := ScaleY(21);
Items.add('всё на английском')
Items.add('всё на русском')
    Text := 'быстрый выбор типа установки';
  end;
end;

добавил
Items.add('всё на английском')
Items.add('всё на русском')
как привязать процедуру типа такой к каждому айтему?


procedure TYPE1 (Sender: TObject); /// тип первый
begin
hl2_main_CheckBox.Checked:= true;
hl2_ru_en_RadioButton.Checked:= true;
end;