Вниз
Скачать: CL | DM;

Access Violation и DLL   Найти похожие ветки 

 
Mary   (2005-06-01 09:44) [0]

Доброе утро All. Проблема в следующем.
Сделана dll для работы с RaveReports. Единственная функция экспортная для создания DataModule-я, остальные вызываются через интерфейс.
Из основного приложения в определенный момент вызывается функция печати, которая загружает dll, пользует её функции и потом после печати отчета выгружает её.
Первый раз все срабатывает на ура, дальше со второго или любого другого раза валятся ошибки типа Access Vioation, системы появления ошибок выявить не удалось.
Вот кусок кода из функции основного приложения:

try
dllHandle:=GetModuleHandle(pchar(ExtractFilePath(Application.ExeName)+"\DLL\Print.dll"));
if (dllHandle=0) then
dllHandle:=LoadLibrary(pchar(ExtractFilePath(Application.ExeName)+"\DLL\Print.dll"));
try
if dllHandle=0 then Exit;
@MyDllCreate:=GetProcAddress(dllHandle,"CreateDMPrint");
if (@MyDllCreate=nil) then Exit;
dmP:=MyDllCreate(Application.Handle);
if (dmP.GetInterface(IPrintInterface,IPrint)) then begin
// открываем файл проекта
tmp_str := ReturnPrintProjectName(doc_table,doc_type);
if not IPrint.OpenProject(tmp_str) then begin
Showmessage(ReturnErrMsg(11,tmp_str));
Exit;
end;
{ формируем отчет, передаем данные и все такое }
...
Sleep(10);
// вызов сформированного отчета
IPrint.CreateReport(print_type);
end;

finally
dmD.CloseConnection;
IPrint:=nil;
dmP.Free;
dmP:=nil;
FreeLibrary(dllHandle);
Sleep(10);
end;

except
Showmessage("Ошибка");
end;

Мучаюсь довольно давно. Сведущие, откликнитесь, пожалуйста !


 
evvcom ©   (2005-06-01 10:05) [1]

Что такое dmP - TDataModule? Что делает CreateDMPrint с Application.Handle? И скорее всего самый важный вопрос, стоит ли галка "Build with run-time packages"?


 
Alx2 ©   (2005-06-01 11:08) [2]

Mary   (01.06.05 9:44)
Может, потому-что не используется модуль ShareMem ?


 
Digitman ©   (2005-06-01 11:25) [3]


> Mary   (01.06.05 09:44)  


пара вопросов к тебе, напрямую не связанных с проблемой ..

1. Каков тайный смысл заключения вызовов GetModuleHandle и LoadLibrary в блок try..exept, если эти вызовы (равно как и лбые иные Win32API-вызовы) не возбуждают никаких исключений ? тем более - дельфийских ?

2. Каков тайный экспортировать ф-цию, если есть интерфейс ?



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.053 c
14-1117254337
D2005
2005-05-28 08:25
2005.06.29
Есть ли возможность?


14-1117462017
Fessio
2005-05-30 18:06
2005.06.29
хелп плизз с методом резолюций


6-1112208880
Urvin
2005-03-30 22:54
2005.06.29
ICQ посредством Delphi


1-1118331014
Alex77777
2005-06-09 19:30
2005.06.29
Как обработать текстовый файл !?


3-1116437770
another
2005-05-18 21:36
2005.06.29
движок базы данных




   Наверх