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;

Спасибо!

Dialog & dll Найти похожие ветки