![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Dialog & dll [D6, Win2k]
DNT © (2001-12-15 16:20:00)Ребята, как запихнуть диалог AboutBox в dll и затем вызвать из программы?
DNT (2001-12-15 17:43:00) [1]Спасибо!
MARcoDEN (2001-12-15 17:27:00) [2]Инструкции + пример:
1. File -> New -> DLL
2. File -> New Form
Для вызова формы из другого приложения нужно создать её динамически, т.к. обычные механизмы Дельфи не работают в DLL библиотеках. Поэтому надо описать новую процедуру:
procedureShowMyForm(AOwner: TComponent);
varMyForm: TForm2;
begin
MyForm:=TForm2.Create(AOwner);
MyForm:=ShowModal;
MyForm.Free;
end;
Включим созданную процедуру в список экспорта:
exportsShowMyForm;
Теперь переключимся на проект Project2.exe и укажем новую импортированную процедуру:
procedureShowMyForm(AOwner: TComponent);
external"Project1.dll";
Потом можешь создавать обработчик, например:
procedure
begin
ShowMyForm(Self);
end;