Здравствуйте!
Стало вываливать AV при закрытии формы, вызываемой из DLL.
Имеется Delphi7, EhLib 5.5 (пробовал и EhLib 6.0), стороннее ПО, которое вызывает функции из DLL. Код вызова к сожалению продемонстрировать не могу, так как не имею исходников. На версиях EhLib 4.x такой ошибки не вываливалось. DLL - пустая форма с компонентом DBGrid.
Код вызова:
Code:
function ShowForm(ADLLCallBack: TDLLCallBack): boolean;
begin
Result := False;
TmpCall := ADLLCallBack;
try
Application.Handle := HWND(ADLLCallBack(0));
with TForm1.Create(Application) do
if ShowModal = mrOk then Result := True;
finally
if Assigned(Form1) then FreeAndNil(Form1);
end;
Application.Handle := 0;
end;
При закрытии формы Form1:
1 - если дебажить DLL - Сторонняя программа выкидывает AV "Project ..... raised too many consecutive exceptions: access violation ....."
2 - если просто вызывать форму - то АV "Инструкция по адресу .... обратилась к памяти по адресу .... Память не может быть read", затем вываливается обрабатываемое сторонней программой исключение "Runtime error 216 at..."
Я понимаю, что проблема в стороннем ПО, но может подскажите куда копать.
Заранее благодарю.