Выбор DBGrid через ComboBox

[elrin]

Нужно чтоб при выборе Items (их 5) в DBGrid отображалась соответствующая таблица
написал код:

procedure TfMain.cbb1Change(Sender: TObject);
begin
  if cbb1.ItemIndex = 0 then DBGrd1.DataSource := fDM.название таблицы;
end;

соответственно - выдало одну таблицу, пробовал использовать case - результат тот же.

Подскажите пожалуйста начинающему

[kropotkina-alice]

case cbb1.ItemIndex of
0: DBGrd1.DataSource := fDM.название таблицы_1;
1: DBGrd1.DataSource := fDM.название таблицы_2;
...
end;

Должно работать...

[elrin]

Сообщение от kropotkina-alice

case cbb1.ItemIndex of
0: DBGrd1.DataSource := fDM.название таблицы_1;
1: DBGrd1.DataSource := fDM.название таблицы_2;
...
end;

Должно работать...

СПАСИБО за подсказку, я неправльно код в case писал, теперь все работает