Форум: "Основная";
Текущий архив: 2002.09.05;
Скачать: [xml.tar.bz2];
Внизdll+newform Найти похожие ветки
← →
CrazyAngel (2002-08-23 19:21) [0]Нарисовал dll с функцией которая создает новую форму,
Вызываю енту функцию из своей программы а когда закрываю
созданную форму закрывается вся программа :(
Можно-ли енто как-нибудь побороть ?
← →
Бегинер (2002-08-23 19:33) [1]Нужно выбрать другую главную форму в Project|Options...|Forms свойство Main Form
← →
Юрий Зотов (2002-08-23 21:53) [2]> Бегинер © (23.08.02 19:33)
В опциях КАКОГО проекта - DLL или EXE? Как Вы считаете?
> CrazyAngel © (23.08.02 19:21)
Побороть можно все, кроме моей лени. Если бы еще хоть кусочек кода увидеть...
В частности, интересуют обработчики OnClose, OnCloseQuery и OnDestroy библиотечной формы (если они есть), код "ентой" функции и код ее вызова. А также текст сообщений об ошибках, если они возникают.
← →
CrazyAngel (2002-08-27 11:15) [3]Собственно вот кусочек:
В главной проге загружаю библиотечку проверяю наличие 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.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.09.05;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c