mostrar las tablas de una bd
 

Tengo una base de datos con unas 30 tablas.
¿Como puedo hacer para que en un combobox insertado en un formulario me aparezcan todas las tablas de dicha base de datos?

¿Si ademas tendo insertado un datasource y un dbgrid, como puedo hacer que cambien los datos segun la tabla que haya elegido en el combobox?

Gracias.

Depende qué tipo de base de datos sea.
Interbase, Oracle, SQL-server y otros motores del estilo tienen tablas de sistema con los objetos de la BD.
Si hablamos de un paradox, access o por el estilo, creo que tendrás que recorrer los directorios y crearte una lista.
En cuanto a modificar el datasource claro que se puede, en el onchange del combo asignas la propiedad dataset a ese mismo datasource (por ejemplo) y le pones la tabla que hayas seleccionado. Un saludo,



F.T.G.

Olvida esto. Paradox tiene tablas sueltas, pero acces tiene un único mdb. Disculpa la imprecisión.

Hola:

El siguiente método de un objeto TSession devuelve en una lista todas las tablas de una base de datos, sin importar que tipo de SGBD sea:

GetTableNames(const DatabaseName, Pattern: string; Extensions, SystemTables: Boolean; List: TStrings);

En la ayuda de Delphi viene explicado su funcionamiento y un ejemplo.

Si rellenas un ComboBox con esas tablas, para que el Grid te muestre los datos de cada tabla, puedes enlazar el DBGrid a un DataSource y éste a un TTable cuyo DatabaseName apunte a esa base de datos. En el OnChange del ComboBox puedes escribir algo así:

Un saludo