Выбор определенной таблицы БД через ComboBox

@Skill1377228 · Регистрация: 12.04.2018

Author24 — интернет-сервис помощи студентам

Здравствуйте!!Хотел реализовать такую тему в Делфи с базой данных , в комбобоксе добавить таблицы и что бы при выборе таблицы в комбобоксе она выводилась на форму ,можно ли такое реализовать?

@northener · 12.04.2018, 03:03

Можно.

@Skill1377228 · 12.04.2018, 03:07 **[ТС]**

как не подскажешь?

@Пытливый · 12.04.2018, 18:03

Какая именно у вас база - пока тайна покрытая мраком, но по аналогии может разберетесь.
Если вы подключаетесь к базе через AdoConnection, то вам будет доступен метод GetTableNames, а используется он так:

Delphi

var
  Tables: TStringList;  
begin
 Tables := TStringList.Create;
 AdoConnection1.GetTableNames(Tables);
...

Все имена таблиц теперь находятся в Tables.Strings

Дерзайте.

@D1973 · 13.04.2018, 09:43

Сообщение от Пытливый

Все имена таблиц теперь находятся в Tables.Strings

Да что уж ТС-а мучить...

Delphi

1	AdoConnection1.GetTableNames(ComboBox1.Items);

больше ничего не надо - имена таблиц уже в ComboBox-е

@qwertehok · 13.04.2018, 13:46

если таблиц много - подвиснет
уж лучше запросом получить количество и вывести

@xxbesoxx · 15.04.2018, 18:40

T-SQL

1	SELECT T.TABLE_NAME FROM INFORMATION_SCHEMA.TABLES T ORDER BY 1 DESC

1)

Delphi

1 2	private procedure Table_Name;

2)

Delphi

procedure TForm1.Table_Name;
begin
  with ADOQuery1 do
  begin
     with SQL do
     begin
       Clear;
       Add('SELECT T.TABLE_NAME FROM INFORMATION_SCHEMA.TABLES T ORDER BY 1 DESC');
     end;
     Open;
  end;
  // заполнять ComboBox
  While not ADOQuery1.Eof do
  begin
    ComboBox1.Items.Add(ADOQuery1.Fields[0].AsString);
    ADOQuery1.Next;
  end;
 
end;
 
end.

3)

Delphi

procedure TForm1.FormShow(Sender: TObject);
begin
  Table_Name();
end;

@Skill1377228 0 / 0 / 0 Регистрация: 12.04.2018 Сообщений: 4
		1
	Выбор определенной таблицы БД через ComboBox 12.04.2018, 02:48. Показов 1110. Ответов 6 Метки нет (Все метки) Здравствуйте!!Хотел реализовать такую тему в Делфи с базой данных , в комбобоксе добавить таблицы и что бы при выборе таблицы в комбобоксе она выводилась на форму ,можно ли такое реализовать? 0

@northener пофигист широкого профиля 4735 / 3168 / 860 Регистрация: 15.07.2013 Сообщений: 18,255
	12.04.2018, 03:03	2
	Можно. 0

@Skill1377228 0 / 0 / 0 Регистрация: 12.04.2018 Сообщений: 4
	12.04.2018, 03:07 [ТС]	3
	как не подскажешь? 0

@qwertehok 5396 / 4324 / 1060 Регистрация: 29.08.2013 Сообщений: 27,135 Записей в блоге: 3
	13.04.2018, 13:46	6
	если таблиц много - подвиснет уж лучше запросом получить количество и вывести 0

	15.04.2018, 18:40