Runtime Err in DLL Library Module on Terminate ! [NT4, WinXP]
Конопелька © (2006-03-01 23:01:00)
Доброго времени суток уважаемые мастера !
У меня большая проблема с динамическими библиотеками !
Я создал приложение у которого есть главное окно которое в
последствии запуска вызывает остальные нужные формы ! Главное
приложение запуска используеться как SplashScreen и на нем еще
храниться обьект TPopupMenu который я использую для меню в System
Tray, соответсвенно из этого меню и запускаються остальные формы !
При создании и работе приложения нивозникает никаких проблем ! Но
при выключении появляеться ошибка с нулевым адресом и после нее еще
и ошибка Run Time ! Модуль ShareMem использую как написано в
литературе ! Вот метод использования функции SystemTray:
Procedure Tlogoform1.WndProc(Var Msg:TMessage);
Var P:TPoint;
Begin
If Msg.Msg=WM_USER+1
then Case Msg.lParam of
WM_LbuttonDblClk:
begin
ExitDialog;
end;
WM_RBUTTONDOWN:
begin
SetForegroundWindow(Handle);
GetCursorPos(P);
TrayMenu.Popup(P.X,P.Y);
PostMessage(Handle,WM_NULL,0,0);
End;
end;
inherited;
end;
procedure ShellNotify;
begin
With logoform1.FIconData do
begin
cbSize:=SizeOf(logoform1.FIconData);
Wnd:=logoform1.Handle;
uID:=100;
uFlags:=NIF_MESSAGE+NIF_ICON+NIF_TIP;
uCallbackMessage:=WM_USER+1;
hIcon:=Application.Icon.Handle;
StrPCopy(szTip,Application.Title)
end;
Shell_NotifyIcon(NIM_ADD,@LogoForm1.FIconData);
end;
Функция вызова хранилась в библиотеке и пробывал вызывать
форму двумя способами:
procedure show_mainform;stdcall;
var mainform1:tmainform1;
begin
mainform1:=tmainform1.create(application);
mainform1.show;
end;
и второй тот же только вместо первой строки внутри процедуры:
application.createform(Tmainform1,mainform1);
а процедуры завершения читал в одной книге что достаточно
процедуры FREE над формой и все ! а в другой написано что
библиотека ее полностью не освобождает и что нужно использовать
метод mainform.RELEASE; и модуль ShareMem даже млин .. в SplashForm
запихнул ! ненаю чо делать !! все время при завершении ошибки !
:(((
Подскажите ПОЖУЛУЙСТА как мне правильно использовать формы из
динамических библиотек и какие метожы к ним использовать !! Или что
у меня не так ! :(((
А еще чуть не забыл компилятор 2005 Architect может он с
ошибками !? :(
Заранее большое спасибо !
API (2006-03-02 01:29:00) [1]
и что нужно использовать метод mainform.RELEASE
Попробуйте:
MainForm.Release;
Application.ProcessMessages;
и
только после этого- FreeLibrary.
P.S. На самом деле, очень невнятно описано и слишком много
восклицательных знаков.
Наверх 
ЧАТ |
Орешник |
|
