Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы
Старый 11.09.2018, 19:30   #1
tarakan1983
Форумчанин
 
Аватар для tarakan1983
 
Регистрация: 09.09.2008
Сообщений: 374
Репутация: 46
По умолчанию Динамическое подключение к БД Firebird из Fastreport

Здравствуйте. Использую динамическое создание отчета и в нем подключаюсь к БД Firebird.
Код:

PRNF := TfrxReport.Create(nil); 
with PRNF do 
begin 
OnUserFunction := UserFunction; 
CreateUniqueName; 
PreviewOptions.MDIChild := True; 
PreviewOptions.Modal := False; 
EngineOptions.DestroyForms := False; 
... 
end; 
DataPage := PRNF.FindComponent('Data') as TfrxDataPage; 
frxDB := TfrxFIBDatabase.Create(DataPage); 
with frxDB do 
begin 
Connected := False; 
Name := 'DB'; 
DatabaseName := SRVIP+':'+DBPATH+DBNAIM; 
LoginPrompt := False; 
Params.Clear; 
Params.Add('user_name=sysdba'); 
Params.Add('password=masterkey'); 
//s := 'LibraryName=C:\Program Files\Firebird\Firebird_2_5\WOW64\fbclient.dll'; 
//FromString(s); 
//Params.Add(s); 
SQLDialect := 3; 
Connected := True; 
end;

На windows x86 все работает идеально, а вот при переходе на x64 получаю ошибку
Цитата:
Connection not established . Connection rejected by remote interface.
Удалил gds32.dll из C:\Windows\system32
Получаю
Цитата:
System Error. Code: 126. Не найден указанный модуль
Внимание вопрос! Как TfrxFIBDatabase явно указать какую использовать DLL????
Для компонентов FibPlus есть свойство LibraryName. А где это у TfrxFIBDatabase?
Буду очень признателен за помощь.
tarakan1983 вне форума   Ответить с цитированием
Старый 12.09.2018, 16:58   #2
tarakan1983
Форумчанин
 
Аватар для tarakan1983
 
Регистрация: 09.09.2008
Сообщений: 374
Репутация: 46
По умолчанию

Отвечаю сам себе. Все как всегда проще простого.
Код:

frxDB := TfrxFIBDatabase.Create(DataPage);
frxDB.Database.LibraryName := 'Путь к нужной библиотеке';

tarakan1983 вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Подключение к БД FireBird Prostaf Работа с сетью в Delphi 9 02.10.2015 15:46
Требуется программист Delphi (+UCL, +FastReport), Firebird maxipost Работа на постоянной основе - Вакансии 0 02.07.2015 13:48
Delphi + Firebird + FastReport tarakan1983 БД в Delphi 9 15.02.2015 12:05
Динамическое подключение Dll С++ дашка-милашка Помощь студентам 0 14.06.2010 15:50
firebird подключение Domanoff БД в Delphi 15 09.06.2010 16:04


20:55.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru