Foros Club Delphi - Crear BD mysql en tiempo de ejecucion

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- MySQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=21)

- - Crear BD mysql en tiempo de ejecucion (https://www.clubdelphi.com/foros/showthread.php?t=55891)

Crear BD mysql en tiempo de ejecucion

Que tal
voy a comenzar a utilizar mysql con delphi 5 y necesito realizar una aplicacion que pueda crear una BD para cada empresa ingresada (sistema multiempresa).
¿Como se crea la BD y que componente es conveniente usar?

A mi me gusta mucho ADO, pero igual hay más opciones.

Create Database "Nombre"

Dicho así a bote pronto, se me ocurre lo siguiente, partiendo de la base de una empresa ya hecha:

Obtienes una lista de las tablas que conforman la base con la sentencia

Código SQL [-]show tables from base

Para cada nombre de tabla obtienes su estructura con
```
Código SQL [-]show create table tabla
```
Esto te devuelve un único registro cuyo segundo campo es la sentencia SQL necesaria para crear la tabla.
Creas la base nueva
Aplicas las sentencias obtenidas.

Dependiendo de qué componentes uses para conectar con MySQL es posible que dispongan de métodos más sencillos.

// Saludos

Voy a usar los componentes zeos.
¿Como podria crear la BD con estos componentes?

Código Delphi [-]ZQuery1.SQL.Add(' ... '); //SI
ZQuery1.ExecSQL;