Добавил admin | Категория Наши материалы | 27 Ноября 2014

Доброго времени суток уважаемый читатель, как ты уже наверное успел догадаться сегодня речь пойдет о подключении к БД Firebird используя среду разработки – Delphi. Но с одним но, для подключения мы будем использовать компоненты FIBPlus. Почему? Да потому что это лучшие компоненты для работы с СУБД Firebird. способ подключения описанный в этой статье будет применим практически для всех версий Delphi а продемонстрирован на примере Delphi 2010. Скачать FUBLpus можно вот по этой ссылке.
И так. Создадим новый проект:

Поместим на форму следующие компоненты:

• TpFIBDatabase;
• TpFIBTransaction 2 штуки;
• TButton;
• TLabel.

Настройку всех компонент мы сделаем непосредственно в коде, так будет понятней. TpFIBTransaction, первый назовем TrRead а второй TrWrite.

Компонент TpFIBDatabase настроим следующим образом:

Откроем окно свойства “DBParams” и добавим в него строчки как на рисунке ниже:

Осталось настроить наши транзакции и можно перейти к коду, кода будет мало.
Для tread сделаем вот такие вот настройки:

Для TrWrite вот такие:

Ну а теперь код подключения к БД Firebird.

  pFIBDatabase1.Close;
  try
    pFIBDatabase1.DatabaseName := 'localhost:C:\DBase.fdb';//если на сервере то вместо localHost имя сервера и алиас
    pFIBDatabase1.ConnectParams.UserName := 'SYSDBA';
    pFIBDatabase1.ConnectParams.Password := 'masterkey';
//    pFIBDatabase1.ConnectParams.RoleName := 'роль если есть, если нет то устанаваливается по умолчанию';
    pFIBDatabase1.Open(True) ;
  Except on E: Exception do
    MessageBox(Handle, PChar(E.Message), 'Error', MB_ICONERROR);
  end;

Не думаю что тут что то нужно комментировать, все до боли просто, но все же если у вас остаются вопросы вы вправе получить на них ответы в своих комментариях, пожалуйста оставляйте комментарии, ставьте лайки и подписывайтесь на наш канал).
p/s у нас нет канала, можете подписаться на нас в соц. сетях.