![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#2
|
||||
|
||||
![]() Цитата:
решил вопрос таким путём: в главной форме для компонента ApplicationEvents: Код:
procedure TfMain.AppMessage(var Msg: tagMSG; var Handled: Boolean); begin if Msg.message = BM_CLICK then begin DonePlugin; FreeLibrary(FLib); end; end; в DLL в событии OnDestroy для моей формы: Код:
procedure TfSett.FormDestroy(Sender: TObject); begin PostMessage(FindWindow('TfMain',nil),BM_CLICK,0,0); end; Может у кого-то есть лучшие варианты ??? Цитата:
Поживу - увижу, Доживу - узнаю, Выживу - учту. ![]() [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
Последний раз редактировалось Yurk@, 06.11.2009 в 19:14. |