Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
Вниз
Dialog & dll
DNT (2001-12-15 16:20) [0]Ребята, как запихнуть диалог AboutBox в dll и затем вызвать из программы?
MARcoDEN (2001-12-15 17:27) [1]Инструкции + пример:
1. File -> New -> DLL
2. File -> New Form
Для вызова формы из другого приложения нужно создать её динамически, т.к. обычные механизмы Дельфи не работают в DLL библиотеках. Поэтому надо описать новую процедуру:
procedure ShowMyForm(AOwner: TComponent);
var MyForm: TForm2;
begin
MyForm:=TForm2.Create(AOwner);
MyForm:=ShowModal;
MyForm.Free;
end;
Включим созданную процедуру в список экспорта:
exports ShowMyForm;
Теперь переключимся на проект Project2.exe и укажем новую импортированную процедуру:
procedure ShowMyForm(AOwner: TComponent);
external "Project1.dll";
Потом можешь создавать обработчик, например:
procedure
begin
ShowMyForm(Self);
end;
DNT (2001-12-15 17:43) [2]Спасибо!
Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
Память: 0.71 MB
Время: 0.023 c
