Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.01.14;
Скачать: CL | DM;

Вниз

дочерняя форма в dll   Найти похожие ветки 

 
kroner   (2006-12-23 17:08) [0]

Нашел в инете вроде бы несколько решений этой проблемы, но не работает ни одно. Например вот http://citforum.ru/programming/digest/dlldelphi.shtml

При попытке создать дочернее окно в dll выдает "Cannot create form. No MDI forms are currently active"
BDS2006 up1

library Project1;

uses SysUtils, Forms, CHILDWIN, Windows,  Classes;
var  DllApp : TApplication;

{$R *.res}

procedure MyDLLProc(Reason: Integer);
begin   if Reason = DLL_PROCESS_DETACH then
          if Assigned(DllApp) then
             Application := DllApp;
end;

procedure ShowMDIChild(MainApp : TApplication);
var     Child : TMDIChild;
begin
       if not Assigned(DllApp) then begin
               DllApp := Application;
               Application := MainApp;
       end;
       Child := TMDIChild.Create(Application.MainForm);
       Child.Show;
end;

exports ShowMDIChild;

begin
     DLLProc := @MyDLLProc;
end.


 
Palladin ©   (2006-12-23 17:38) [1]

Надо же... он нашел несколько решений... а на критику по сабжу он ни разу не наткнулся... и это не проблемма, это неосозная (может быть) ошибочная задумка... используй bpl...


 
kroner   (2006-12-23 17:44) [2]


> Palladin ©   (23.12.06 17:38) [1]
> Надо же... он нашел несколько решений... а на критику по
> сабжу он ни разу не наткнулся

натыкался, еще натыкался что у кого-то вроде бы получилось, но кода не нашел

> используй bpl...

можно подробнее, я все-таки начинающий...


 
kroner   (2006-12-23 22:09) [3]


> Palladin ©   (23.12.06 17:38) [1]
> используй bpl.

а вообще спасибо, bpl это вещь!
вот здесь хорошо написано в общих чертах http://softwarer.ru/packages.html



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

Текущий архив: 2007.01.14;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
2-1167067759
Troan_81
2006-12-25 20:29
2007.01.14
Класс окна


15-1165853702
ProgRAMmer Dimonych
2006-12-11 19:15
2007.01.14
Вопрос, наверное, не новый...


6-1155724949
KygECHuK
2006-08-16 14:42
2007.01.14
Mapi


2-1166808842
ezorcist
2006-12-22 20:34
2007.01.14
Что означает ошибка "RLINK32" Out of memory!


15-1166899037
ferr
2006-12-23 21:37
2007.01.14
"Убийственный MessageBox от Мелкомягких"