Beste mensen,
Ik maak voor mijn Delphi applicatie gebruik van een Firebird database. Die heb ik ooit eens aangemaakt via een SQL monitor. Binnen mijn Delphi app. maak ik gebruik van IB componenten. Nu wil ik binnen mijn app. een nieuwe database aanmaken met de onderstaanden code:
HTML Code:
with IBQuery1 do
begin
try
SQL.Clear;
SQL.Add('create database :db USER :us PASSWORD:pw;');
ParamByName('db').value := 'C:\FBPO.GDB';
ParamByName('us').value := 'SYSDBA';
ParamByName('pw').value := 'masterkey';
ExecSQL;
SQL.Clear;
SQL.Add('Commit;');
ExecSQL;
Memo1.Lines.Add('Database succesfully created!');
OK := True
except
Memo1.Lines.Add('Database NOT succesfully created!');
OK := False;
end;
end
Maar dat schijnt niet te werken. Nu heb ik al van alles geprobeerd maar hij bijft klagen dat de inout fout is.
Wat doe ik hier fout? Iemand een hint of oplossing?
Alvast bedankt, Frank
Bookmarks