Einzelnen Beitrag anzeigen

Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.388 Beiträge
 
Delphi 12 Athens
 
#6

Re: Embedded FireBird Datenbank Datei erzeugen

  Alt 31. Mai 2008, 08:25
Hallo...

vieleicht ein bischen spät aber...
Du kannst auch mit Zeos beim Connecten eine Datenbank erstellen.
Code:
// Netzwerk mit Server
Datenbank:= [b]Server Name oder IP + ':' + lokaler Datenbankordner aus Sicht des Servers incl. Dateiname (deiner Wahl) der Datenbank[/b]
// Embedded
Datenbank:= [b]lokaler Datenbankordner aus Sicht des Servers incl. Dateiname (deiner Wahl) der Datenbank[/b]
 

ZConnection1.User:= 'SYSDBA';
ZConnection1.Password:= 'masterkey';
ZConnection1.Database:= [b]lokaler Datenbankordner aus Sicht des Servers incl. Dateiname (deiner Wahl) der Datenbank[/b]
ZConnection1.HostName:= [b]Server Name oder IP :warn: bei Embedded = ''[/b]
ZConnection1.Properties.Add ('CreateNewDatabase=CREATE DATABASE ' +
  QuotedStr(Datenbank) + ' USER ' + QuotedStr('SYSDBA') + ' PASSWORD ' + QuotedStr('masterkey') + ' PAGE_SIZE 4096');
ZConnection1.Connect;

PS: absichtlich keine Delphi-Tags wg. Hervorhebung



[edit=Sharky]Hihi.. mit dem PRE-Tag kommt zwar keine Codeformatierung aber dafür steht es in einem "Code-Blog" und mann kann Hervorhebungen machen. Mfg, Sharky[/edit]
  Mit Zitat antworten Zitat