Компонент ComboBox

[Ericnex]

Как с помощью компонета ComboBox вывести список таблиц, чтобы затем в другом ComboBox вывести список полей этой таблицы и производить по ним сортировку, фильтрацию и поиск. Если можно пример кода. Буду очень благодарен.

[Аватар]

Обычно СУБД имеет средства для доступа к таким данным запросом или процедурой. Обычный Select или вызов процедуры. У разных СУБД реализация может отличаться

[Ericnex]

Пробую вот так:
procedure TForm1.ComboBox1Change(Sender: TObject);
var i:integer;
begin
Combobox2.Clear;
Combobox2.Text:='Выберете поле';
Case Combobox1.ItemIndex of
0:begin for i:=1 to 4 do Combobox2.Items.Add(Dbgrid1.Fields[i].Text); end;
1:begin for i:=1 to 6 do Combobox2.Items.Add(Dbgrid2.Fields[i].Text); end;
2:begin for i:=1 to 7 do Combobox2.Items.Add(Dbgrid3.Fields[i].Text); end;
3:begin for i:=1 to 3 do Combobox2.Items.Add(Dbgrid4.Fields[i].Text); end;
end;
end;
end.
Выдает ошибку.
Что неправильно?

[Аватар]

Чет не понял, при чем здесь список таблиц и полей в таблицах - и DBGrid. Откуда возьмется список таблиц и их полей?

[Ericnex]

я думал что свойство Field компонента DBGrid выведет мне хотя бы список полей. Теперь понял что это не так. А какие есть способы вывести список полей той или иной таблицы подскажите.

[=master=]

искать по INFORMATION_SCHEMA

[Аватар]

Если нужно из грида выдернуть список имен полей отбражаемых в колонках, то можно использовать

for i:=0 to DBGrid.Columns.Count-1 do 
  и имена полей в DBGrid.Columns[i].FieldName или DBGrid.Fields[i].FieldName

[Librarian]

список таблиц получаю таким образом

ZQuery1.SQL.Clear;
ZQuery1.SQL.Add('SELECT * FROM information_schema.tables WHERE table_type="BASE TABLE" and table_schema=название базы;');
ZQuery1.Open;

его разместить можно в DBGrid или в DBComboBox