[Karsh]

Код:

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  if ComboBox1.ItemIndex = 0 then //первый пункм меню
  //или условие можно сделпть не по индексу, а по тексту:
  //if ComboBox1.Text = '1 Магазин' then
  begin
    Button2.Visible:= False;
    Button1.Visible:= True;
  end;
  if ComboBox1.ItemIndex = 1 then //второй пункт меню
  //или условие можно сделпть не по индексу, а по тексту:
  //if ComboBox1.Text = '2 Магазин' then
  begin
    Button1.Visible:= False;
    Button2.Visible:= True;
  end;
end;