![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как автоматизировать процесс создания однотипных форм [D7]
Layner © (2005-06-16 08:35:00)D7, требуется создать ~20 MDIChild форм, с одинаковыми OnClose обработчиками, например у всех надо прописать
procedure Tft.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
ft:=nil;
end;
И ещё пару свойств.
Это конечно можно сделать как, сделать 1 форму как надо, потом копировать её DFM и PAS файл под другим названием, потом автоматически менять название форм в блокноте... Но может быть есть решение проще?
Kerk (2005-06-16 08:37:00) [21]наследование