Create Table zur Laufzeit mit Query?

[davar]

Zitat von marabu:

Hallo,

schau mal hier: create a database at runtime with ZEOS

Freundliche Grüße

Danke.

Das geht aber anscheinend nicht mit meiner Zeos-Variante (6.6.1 bei Turbo Delphi Prof.). Die TZIbSqlDatabase habe ich gar nicht.

Stattdessen habe ich hier etwas gefunden. So geht es nämlich:

Delphi-Quellcode:

ZConnection1.Database := 'd:\db1.fdb'; 
ZConnection1.Protocol := 'firebird-1.5'; 
ZConnection1.Properties.Add ('CreateNewDatabase=CREATE DATABASE ' + 
QuotedStr ('d:\db1.fdb') + ' USER ' + 
QuotedStr ('sysdba') + ' PASSWORD ' + QuotedStr ('masterkey') + 
' PAGE_SIZE 4096 DEFAULT CHARACTER SET ISO8859_1'); 
ZConnection1.Connect;

Mfg

davar