como puedo ver las tablas que contiene una base de datos

[[kurono]]

hola amigos del foros como estan les cuento que estoy haciendo una aplicacion que me permite conectarme a cualquier base de datos access y mediante un edit pongo la tabla que quiero revisar o ver y me la muestra en un dbgrid todo funciona a la perfecion pero me gustaria q en ves de poner el nombre de la tabla que quiero ver me la muestre en un combobox una ves me conecto a la base de datos a qui les expongo mi codigo para que se guien

Código Delphi [-]
 
procedure TForm1.Button1Click(Sender: TObject);
begin
if open.Execute then
txt1.Text:=open.FileName;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
enlace.conexion.connectionstring:=txt1.text;
enlace.conexion.provider:='microsoft.jet.oledb.4.0';
enlace.conexion.Connected:=true;
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
enlace.tabla.close;
enlace.tabla.sql.clear;
enlace.tabla.sql.add('select*from '+ edit1.Text);
enlace.tabla.open;
end;
end.

[[Caral]]

Hola
La verdad no entiendo muy bien lo que quieres hacer.
Lo puedes explicar mejor?.
Ver el contenido de la base de datos, sean los campos o su contenido es sencillo con access, pero no se a que te refieres.
Saludos

[[enecumene]]

De esta Forma puedes llenar un combobox con los campos de una tabla:

Código Delphi [-]
while not(Query1.eof) do
begin
    combo.items.add(Query1.fieldByName('blabla').asString;
    Query1.next;
end;

no se si esto es lo que buscas, pues concuerdo con Caral, deberias explicar un poco tu duda.

Saludos.

[[Caral]]

Hola
Conseguir los nombres de las tablas y ponerlos en un combobox:

Código Delphi [-]
 DataModule1.AC1.GetTableNames(ComboBox1.Items);

Poner los nombres de los campos de la tabla seleccionada de un combobox a otro:

Código Delphi [-]
    ADOQuery1.Close;
    ADOQuery1.SQL.Text:= 'Select * from '+ComboBox1.Text;
    ADOQuery1.Open;
    DataModule1.AC1.GetFieldNames(ComboBox1.Text, ComboBox2.Items);

Gracias Roman.
Saludos

[[kurono]]

lo q quiero hacer es que cuano me conecte a la base de datos me presente en un combobox los nombre de la tabla que contine esa base de datos

[[Caral]]

Hola
Bueno, entonces la pregunta esta contestada.
Saludos

[[cHackAll]]

Oops, repetí lo que dijo Caral.