FibDataBase создание новой базы

[Lokos]

Здравствуйте.
Пытался сделать это с помощью следующего кода

procedure TForm1.Button10Click(Sender: TObject);
begin
   pFIBDatabase1.DBParams.Clear;
   pFIBDatabase1.DBParams.Add('USER ''SYSDBA'' PASSWORD ''masterkey''');
   pFIBDatabase1.DBParams.Add('PAGE_SIZE = 2048');
   pFIBDatabase1.DBParams.Add('DEFAULT CHARACTER SET WIN1251');
   pFIBDatabase1.DBName := 'SERV_DB:C:\DB\TEST.fib';
   pFIBDatabase1.SQLDialect := 3;
   pFIBDatabase1.CreateDatabase;
end;

Но выскакивает ошибка. Код взят с официального мануала по FibPlus.
Думаю проблема в параметре DBName. SERV_DB такое ощущение что там нужно указать сервер или что то в этом духе.

[Lokos]

Отвечаю на свой вопрос.
Если сервер локальный то делаем так

procedure TForm1.Button10Click(Sender: TObject);
begin
   pfibdatabase1.Connected:=false;
   pFIBDatabase1.DBParams.Clear;
   pFIBDatabase1.DBParams.Add('USER ''SYSDBA'' PASSWORD ''masterkey''');
   pFIBDatabase1.DBParams.Add('PAGE_SIZE = 2048');
   pFIBDatabase1.DBParams.Add('DEFAULT CHARACTER SET WIN1251');
   pFIBDatabase1.DBName := 'localhost:D:\TEST.fdb';
   pFIBDatabase1.SQLDialect := 3;
   pFIBDatabase1.CreateDatabase;
end;