Типы элементов управления на форме

[LMA]

Как в runtime узнать типы элементов управления на форме (FormControl), в том числе и динамически созданных?

[Hezl]

PHP код:

FormControl fc;
sysFormRun::controlType(classidget(fc)); 


[demID]

В качестве примера привожу обработчик события clicked на кнопке в форме.
Данный пример перебирает все контролы в форме и ищет среди них контролы с определенными типами.

PHP код:


void clicked()
{
    FormControl c;
    int         i;
    FormRun     formRun;
    ;
    super();
    formRun = element;
    for (i=0; i<formRun.design().controlCount(); i++)
    {
        c = formRun.design().controlNum(i);
        switch(classidget(c))
        {
            case classnum(FormGridControl):
                info("Объект " + c.name() + " имеет тип FormGridControl");
                break;
            case classnum(FormComboBoxControl):
                info("Объект " + c.name() + " имеет тип FormComboBoxControl");
                break;
            case classnum(FormButtonControl):
                info("Объект " + c.name() + " имеет тип FormButtonControl");
                break;
        }
    }
} 


[LMA]

Спасибо!

[gefr]

можно еще короче:

void clicked()
{
    FormControl c;
    int         i;
    FormRun     formRun;
    ;
    super();
    formRun = element;
    for (i=0; i<formRun.design().controlCount(); i++)
    {
        c = formRun.design().controlNum(i);
        info("Объект " + c.name() + " имеет тип Form" +
              sysformrun::controltypestr(classidget(c))+"Control");    
    }
}

[valentino]

Мысль хорошая! но...

во первых, у меня срабатывает только при
for (i = 1; i <= formRun.design().controlCount();

во вторых, дополнительный вопрос: а как перебрать контролы, которые содержатся в дрогом котроле, например в Tab содержатся Fields. Делать как-то рекурсию?

[gefr]

про 'i=' - извиняюсь, правил текст из форума, в реале не проверил
дык контролы сначала содержатся на форме, а потом в табе.
отсюда смена задачи - отобразить контролы в иерархической структуре, как в AOT....
задача вроде как решается посредством каких-нидь парентов (предварительная сборка в контайнере, выборочный перебор.......)

[valentino]

можешь привести примерчик парент - чилд?
дело в том что если у меня на форме один Tab и один ButtonGroup, в табе есть 2 закладки, в первой закладке грид, на второй - 10 полей; а в ButtonGroup - 5 кнопок, то твой пример выдает только 2 результата: Tab и ButtonGroup, т.е. 2 парента. А хочу еще и все поля просмотреть которые находятся на 2й закладке таба, и все кнопки которые находятся в ButtonGroup.

[kashperuk]

Тип элемента еще можно определять как c.handle();
А про перебор узлов формы - посмотри класс TreeNodeTraverser

[belugin]

А чего бы не посмотреть как \Forms\SysSetupForm строит дерево (это форма, которая вызывается при Правая кнопкаъ\Настройка)