Серьезная тема и Серьезные задачи
Вообщем задача такая у меня есть главная форма formStyle=fsMDIForm
ну и куча дочерних форм Formstyle=fsMDIChild....
есть на форме типо дерево проводника в котором из базы вытягиваются все названия форм MDIChild...вопрос как мне для конкретного наименования подставить нужный код создания формы
например в дереве есть узел c названием fAdmin значимт по его клику необходимо написать fAdmin:=TFadmin.Create(Application)
но форм очень много и я не хочу для каждой писать условия типа
if treenode.caption='fAdmin'
then
fAdmin:=TfAdmin.Create(application)
if treenode.caption='fConductor'
then
fConductor:=TfConductor.create(application)
и т.д.
|