Форум: "Основная";
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];
ВнизДочерняя форма в Dll Найти похожие ветки
← →
McSimm (2002-02-15 10:59) [3]Не то. Этого не достаточно.
var
OldApp: TApplication;
OldScr: TScreen;
При инициализации DLL передаем в нее из EXE переменные Appplication и Screen.
procedure InitMyDll(Hostapp: TApplication; HostScr: TScreen)
begin
OldApp := Application;
OldScr := Screen;
Application := HostApp;
Screen := HostScr;
// .....
end;
Перед выгрузкой DLL, но после закрытия MDIChild формы:
Application := OldApp;
Screen := OldScr;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.005 c