Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

dll+newform


CrazyAngel ©   (2002-08-23 19:21:00) 

Нарисовал dll с функцией которая создает новую форму,
Вызываю енту функцию из своей программы а когда закрываю
созданную форму закрывается вся программа :(
Можно-ли енто как-нибудь побороть ?


CrazyAngel   (2002-08-27 11:15:00) [1]

Собственно вот кусочек:
В главной проге загружаю библиотечку проверяю наличие TCLPlugin()
если есть то вызываю Process()
библиотеку освобождаю при выходе из проги
Правда написано с KOL но принцип п том что форма создается
с тем же handle что и главная прога при выходе (нажимаем на крестик) закрывается все :(
а если сделать кнопочку и на нее нажимать делая form.free
то говорит мол acces violation там-то там-то :(
Может енто не в тот форум но ....

library test;
uses
Windows,
messages,
KOL;

{$R *.RES}

var
form:PControl;

function Process():boolean;
begin
form:=NewForm(applet,"Test");
form.Width:=335;
form.Height:=190;
Form.Style := WS_BORDER or WS_SYSMENU or WS_VISIBLE;
form.ShowModal;
end;

Function TCLPlugin():shortstring;
begin
TCLPlugin:="test";
end;

exports
TCLPlugin,
Process;

begin
end.



Юрий Зотов   (2002-08-23 21:53:00) [2]

> Бегинер © (23.08.02 19:33)

В опциях КАКОГО проекта - DLL или EXE? Как Вы считаете?

> CrazyAngel © (23.08.02 19:21)

Побороть можно все, кроме моей лени. Если бы еще хоть кусочек кода увидеть...

В частности, интересуют обработчики OnClose, OnCloseQuery и OnDestroy библиотечной формы (если они есть), код "ентой" функции и код ее вызова. А также текст сообщений об ошибках, если они возникают.


Бегинер   (2002-08-23 19:33:00) [3]

Нужно выбрать другую главную форму в Project|Options...|Forms свойство Main Form


Наверх

Титульная страница Поиск, карта сайта Написать письмо