Creating Firebird database programatically in delphi

Today my colleague asked me the question, “How to create FB database programatically from Delphi?”. Well, the solution is very easy, just use the following code:

[See remaining text…]

IBDatabase1.DatabaseName := ChangeFileExt(Application.ExeName, '.fdb');
IBDatabase1.Params.Add('USER ''SYSDBA''');
IBDatabase1.Params.Add('PASSWORD ''masterkey''');
IBDatabase1.Params.Add('PAGE_SIZE 4096');
IBDatabase1.Params.Add('DEFAULT CHARACTER SET WIN1250');
IBDatabase1.CreateDatabase;

Jiří Činčura - http://blog.vyvojar.cz/jirka/