Combobox проблемы

[TIXIY]

народ помогите пожалуйста, очень давно не работал с делфи, подскажите как сделать. Вот если в combobox выбрали какой то пункт надо что другой combobox стал visible, подскажите как это реализовать..=))))) Заранее огромное Спасибо..=))

[Noor]

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
if ComboBox1.Items[ComboBox1.ItemIndex] = 'Видно' then
ComboBox2.Visible := true
Else
if ComboBox1.Items[ComboBox1.ItemIndex] = 'Не видно' then
ComboBox2.Visible := False;
end;

[raxp]

...а в частном случае :

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
 combobox2.Visible:= boolean(ComboBox1.itemindex)
end;

[Noor]

Сообщение от raxp

...а в частном случае :

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
 combobox2.Visible:= boolean(ComboBox1.itemindex)
end;

Интересное решение, спс, возьму себе на вооружение.
А если в ComboBox1 будет больше чем 2 значения - эффект не тот !

[TIXIY]

Спасибо большое всем кто помогfk...=))))но я чуть позже сам разобрался методом тыка..=)))

if (Combobox1.text='Другое') then
begin
  combobox2.Visible:=true;
end;