EIBInterBaseError «недоступная база данных» при попытке создать базу данных Firebird в Delphi

Я пытаюсь создать базу данных Firebird во время выполнения. Процедура, которую я использую для этого, такова:

procedure CreateDatabase(DBName: String);
var
  IBDatabase1: TIBDatabase;
begin
  IBDatabase1 := TIBDatabase.Create(Self);
  try
    IBDatabase1.DatabaseName := ChangeFileExt(DBName, '.fdb');
    IBDatabase1.Params.Add('USER ''SYSDBA''');
    IBDatabase1.Params.Add('PASSWORD ''masterkey''');
    IBDatabase1.Params.Add('PAGE_SIZE 4096');
    IBDatabase1.Params.Add('DEFAULT CHARACTER SET WIN1252');
    IBDatabase1.CreateDatabase;
  finally
    IBDatabase1.Free;
  end;
end;

Я добился этого без проблем в любом маленьком проекте, который я создаю для тестирования этой функции. Однако, если я попытаюсь запустить этот код на той же машине, в той же Delphi, все то же самое, за исключением того, что это другой (и довольно большой) проект, я получаю следующую ошибку в строке IBDatabase1.CreateDatabase:

First chance exception at $7579B9BC. Exception class EIBInterBaseError with message 'unavailable database'. Process xxx.exe (4144)

У кого-нибудь есть какие-нибудь подсказки об этом? Может быть, как-то правильно отладить это?

Заранее спасибо.

ИЗМЕНИТЬ

Кажется, что-то в моем файле проекта. Мне удалось создать новый, и проблема исчезла, но я боюсь быть укушенным этим в будущем. Что может быть причиной этого?


delphi firebird interbase dbexpress
person ivarec    schedule 16.03.2012    source источник
comment
Что изменилось в вашем файле проекта? Вы уверены, что файл проекта — это единственное, что вы изменили?   -  person Rob Kennedy    schedule 16.03.2012
comment
Не уверен, потому что я очень тороплюсь. Но я создал новый файл проекта, добавил все файлы моего проекта и выполнил его. База создана нормально. Я все еще проверяю вещи и скоро выложу больше.   -  person ivarec    schedule 16.03.2012
comment
Инструмент diff вашей системы контроля версий должен показать вам, что изменилось.   -  person Rob Kennedy    schedule 16.03.2012
comment
Так и должно быть, если IDE Delphi не будет XML, где порядок не имеет значения. Файлы выглядят одинаково, но все поля перепутаны. На самом деле трудно определить различия. Пока изменился только файл проекта.   -  person ivarec    schedule 16.03.2012

Ответы (1)


arrow_upward
4
arrow_downward

Это был не мой файл проекта. Это была старая GDS32.dll, которая была сброшена в тот же каталог, что и исполняемый файл. Удаление решило проблему. Надеюсь, это может помочь кому-то с той же проблемой.

person ivarec    schedule 16.03.2012