[Karsh]

Если у вас только 2 пункта в меню, то можно так:

Код:

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  Button1.Visible:= (ComboBox1.ItemIndex = 0);
  //или
  //Button1.Visible:= (ComboBox1.Text = '1 Магазин');
  Button2.Visible:= not Button1.Visible;
end;