Универсальный создатель формы
Обратите внимание на методы FindClass/GetClass и RegisterClass. С помощью их
вы можете эффективно перевести строку (имя класса формы) в тип класса этой
формы, и затем выполнить такую команду:
MyForm := TForm(FindClass(SomeString)).Create(Self);
|
|