[pirojok750]

BlackEric, спасибо за помошь.Товарищи с http://www.delphisources.ru/ подкинули вот такую идею

Код:

var  list:Tstrings;  
begin  Database1.GetTableNames(list,False);  
ComboBox1.Items.AddStrings(list);

У меня это не работает,но я уверен не работает из-за меня,потому что я очень слабо в них разбираюсь.Что вы можете сказать по этому коду??

Это очень древняя штука. Sql она не держит. »

создание таблиц я уже прописал.язык для создания-SQL. получается моя держит.