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.