Есть ли такая таблица в базе

[Vervolf]

Доброго времени суток, Уважаемые программисты! сегодня столкнулся с такой проблемой: как в MySQL программно через Delphi выяснить, есть ли таблица XXXXX в базе? Все что знаю сам - перепробывал.как обработать ошибку запроса, чтобы она не рушила всю прогу не знаю.. подключаюсь через компаненты MySQL Access.

[Vervolf]

всё, сам разобрался
код пока корявый.. путём проб и ошибок, но все работает

procedure TForm4.Button1Click(Sender: TObject);
label
01;
var
zapros1,newtable,re: string;
kol,i,so: integer;
begin
01:
Dm.MyQueryNewTest.Active:=False;
dm.MyQueryNewTest.SQL.Clear;
randomize;
newtable:='test'+intToStr(math.RandomRange(1,9999));

//zapros1:='';
zapros1:='Show tables';
dm.MyQueryNewTest.SQL.Text:=zapros1;
Dm.MyQueryNewTest.Active:=True;
re:=dm.MyQueryNewTest.Fields[0].AsString;
kol:=dm.MyQueryNewTest.RecordCount;

so:=0;
dm.MyQueryNewTest.First;
for i:=1 to kol do
 begin
 if dm.MyQueryNewTest.Fields[0].AsString='klass000' then
  begin
  so:=so+1;
  end;
 dm.MyQueryNewTest.Next;
 end;

application.MessageBox(PChar('Всего таблиц:'+intToStr(kol)+'/Совпадений: '+intToStr(so)),'!',48);
end;

[Аватар]

Может так попробовать и не дергать имена всех таблиц:
SHOW TABLES LIKE 'имя искомой таблицы'

[Vervolf]

да, благодарю