проблема с combobox

[undead92]

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

при нажатию на второй, соответсвенно 1 и 3 панели исчезаеют, при нажатии на 3 - 1 и 2 исчезают

написал вот так - с 1 и 3 айтимом работает без проблем идеально, а вот при выборе 2 - 2 панель не появляется, не могу понять в чем ошибка?

procedure TForm9.cbb1Change(Sender: TObject);
begin



           if Cbb1.ItemIndex = 0  then begin
                    pnl1.Visible:=True  ;
                    pnl2.Visible:=false;
                    pnl3.Visible:=False  ;
                    end   ;



   if    Cbb1.ItemIndex = 1    then begin
                    pnl1.Visible:=false ;
                    pnl2.Visible:=true;
                    pnl3.Visible:=False  ;
                         end  ;



    if   Cbb1.ItemIndex = 2 then begin
                    pnl1.Visible:=false ;
                    pnl2.Visible:=false;
                    pnl3.Visible:=true  ;
  end;


end;

[Аватар]

В коде проблем не вижу, причина не в нем. А сам бы код переделал

procedure TForm9.cbb1Change(Sender: TObject);
begin
  pnl1.Visible:=Cbb1.ItemIndex=0;
  pnl2.Visible:=Cbb1.ItemIndex=1;
  pnl3.Visible:=Cbb1.ItemIndex=2;
end;

[undead92]

Сообщение от Аватар

В коде проблем не вижу, причина не в нем. А сам бы код переделал

procedure TForm9.cbb1Change(Sender: TObject);
begin
  pnl1.Visible:=Cbb1.ItemIndex=0;
  pnl2.Visible:=Cbb1.ItemIndex=1;
  pnl3.Visible:=Cbb1.ItemIndex=2;
end;

абсолютно тоже самое

1 и 3 безупречно, 2 не открывается


возможно дело каким то образом в том что панели расположены друг на друге?

[Аватар]

Я же написал - причина не в этом коде. Смотри как панель расположена на форме. Она становится видимой, но х.з. где находится

панели расположены друг на друге?

Да уж. И что, очень удобно? PageControl не подходит?

[undead92]

ну у меня на каждой панеле много кнопок и смотриться красиво, когда из comba выбираешь появляется только нужная панель , хотя посути можно также блокировать вкладки в pagecontrol , только с кодом проблемы у меня возникнут)

[undead92]

все огонь)) проблема была в том что 2 панель располагалась в первой)

[Аватар]

В PageControl для нужной закладки делай TabVisible:=True, в остальных False. Удобно и наглядно, заменит кучу панелей, которые одна под одной, бред. Есть еще механизм Frame, там чуть посложней