Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];



Вниз

Нужно загрузить в TComboBox.Items все имеющиеся таблицы 

michael_B   (2002-01-11 12:43) [0]

Проблема такая:
Нужно загрузить в TComboBox.Items все имеющиеся таблицы
в базе данных. С базой данных соединяюсь через ADO.

Заранее благодарен.

---

aus   (2002-01-12 01:06) [1]

Items - это же TStringList, можно загрузить последовательно считывая записи и добавляя в список.
Но вот не понятно, что значит ВСЕ таблицы. Т.е. в один ComboBox?
Тогда зачем? Что это будет?
А через что ты с базой соединяешься - никакой разницы.

---

AlexSV   (2002-01-14 12:36) [2]

Попробуй TADOConnection.GetTableNames(...).
Если не получиться, то пиши на Mail, попробую помочь.

---

amamed_3071   (2002-01-14 13:48) [3]

SELECT MSysObjects.Name
FROM MSysObjects
WHERE (((MSysObjects.Type)=1) AND ((MSysObjects.Flags)=0));
order by MSysObjects.Name

---

dim-   (2002-01-14 14:34) [4]

Делай как AlexSV
TADOConnection.GetTableNames(TComboBox.Items )

---

Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.72 MB
Время: 0.023 c