Otra idea:
Con Ib Expert o EMS puedes extraer todos los metadatos. Esos metadatos los guardas en un archivo de texto. Dicho archivo se carga en un FIBScript (no conozco ese componente, pero debe tenerlo).
Quedaría algo así:
Código SQL
[-]
SET SQL DIALECT 3;
SET NAMES ISO8859_1;
CREATE DATABASE 'd:\sistema\nombre1.FDB'
USER 'SYSDBA' PASSWORD 'masterkey'
PAGE_SIZE 4096
DEFAULT CHARACTER SET ISO8859_1;
.... aqui continua, pero lo corto para no extenderme más
Para crear una nueva BBD, solo tienes que modificar la línea del "CREATE DATABASE", después ejecutas el script: FIBScript.Execute y listo, BBDD creada y sin datos.
Saludos