Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

В чем проблема обращения к TPFibDataBase по указателю в Dll?


Aleksandr. ©   (2005-08-08 15:40:00) 

Программа использует embedded FireBird, поэтому TPFibDataBase в ней для одновременных коннектов может быть только одна. Функционал, использующий соединения к базе, разделен на две части - непосредственно код программы и dll. В dll при вызове функции инициализации ее внутреннего объекта передается Pointer PFIBDataBase, размещенной на DataModule программы, а в констракторе объекта, соответственно, приводится к его внутреннему свойству обратно ( FDB:=TPFIBDataBase(DBPointer); ).
Кроме того, на DataModule программы есть две TPFIBTransaction, у которых FIBDataBase установлена в DefaultDataBase, а у FIBDataBase эти транзакции установлены в DefaultTransaction и DefaultUpdateTransaction. У внутреннего объекта dll есть свои две аналогичные транзакции (в дефолты PFIBDataBase они не устанавливаются, просто назначаются соответствующим свойствам объектам TPFIBQuery и TPFIBDataSet). И вот наблюдается непонятная картина: при первом вызове функций библиотеки все работает отлично, а при втором начинают вылетать AccessViolation при попытке вызовов типа FDB.GetTableNames, хотя трассировка показывает наличие нормальных объектов (не уничтоженных, судя по тому, что их свойства не Inaccessible value). В чем причина такого поведения переданного по указателю компонента? Если FDB создается своя внутри библиотеки, то проблем не возникает (это для тех, кто может посчитать, что ошибка в коде обращения к FDB).


Виталий Панасенко   (2005-08-08 17:47:00) [1]

Для вызова из DLL нужно использовать УДАЛЕННЫЙ доступ..Точнее, формат подключения..Не DataBaseName=C:\db.FDB,а DataBaseName=LOCALHOST:\c:db.FDB...


Наверх

Титульная страница Поиск, карта сайта Написать письмо