Свойства элемента управления в отладчике.

[Logger]

Коллеги кто нибудь знает способ как можно посмотреть на лету свойства произвольного контрола формы.

Чтобы было понятнее опишу проблему:
На форме после определенных действий слетает до нуля ширина контрола. Чтобы проконтролировать причину, хотелось бы иметь метод который выведет в инфолог все актуальные свойства для данного элемента управления на текущий момент.

Есть какой нибудь готовое решение или полуфабрикат решения ? Чтобы тупо не перечислять все свойства в коде.

В отладчике их к сожалению не видно.
Хочу сравнить как меняются свойства контрола после того как его внешний вид "сломался".

[dech]

Что за контрол, какого типа? И что за действия?
По идее можно инфологи в горячих точках понаставить:

info(strfmt("Ширина контрола: %1",
    element.design().controlName("MyControl").width(0, 0)
    ));

[DSPIC]

Вот такой вот метод за кружкой чая накидал.
Не идеальный, но условно работает

//DSPIC
static void showControlProperties(FormControl _formControl)
{
    TreeNodePath    treeNodePath = "\\System Documentation\\Classes\\";
    TreeNode        treeNode;
    SysDictClass    dictClass;
    str             allPropertiesStr, methodName;
    ;

    if (!_formControl)
        return;

    dictClass = new SysDictClass(classIdGet(_formControl));

    if (dictClass)
    {
        treeNodePath += dictClass.name();
        treeNode      = TreeNode::findNode(treeNodePath);
    }

    if (!treeNode)
        return;

    treeNode = treeNode.AOTfirstChild();
    while (treeNode)
    {
        if (treeNode.AOTbitmapId() == 866) //check, is property method?
        {
            methodName = treeNode.treeNodeName();

            try
            {
                if (dictClass.hasObjectMethod(methodName) &&
                    methodName != "width"   &&
                    methodName != "height"  &&
                    methodName != "left"    &&
                    methodName != "top")
                {
                    allPropertiesStr += strFmt("%1: %2\n", methodName, dictClass.callObject(methodName, _formControl));
                }
            }
            catch{}
        }

        treeNode = treeNode.AOTnextSibling();
    }

    info (allPropertiesStr);
}

[AndyD]

Чуть более универсально, но тупо

client static void GetControlProperties(FormControl _control)
{
    DictClass   dictClass;
    DictMethod  dictMethod;
    int         i;
    Types       returnType;
    str         fheader;
    ;
    if (_control)
    {
        dictClass = new DictClass(_control.handle());
        if (dictClass)
        {
            SetPrefix(_control.name());
            info(strfmt('Control Name: "%1"\nClass Name: "%2"', _control.name(), dictClass.name()));
            for (i = 1; i <= dictClass.objectMethodCnt(); i++)
            {
                dictMethod = dictClass.objectMethodObject(i);
                if (dictMethod.propertyMethod())
                {
                    if(dictMethod.returnType() == Types::USERTYPE)
                        returnType = new DictType(dictMethod.returnId()).baseType();
                    else
                        returnType = dictMethod.returnType();
                    if (returnType != Types::void && returnType != Types::Class && 
                        returnType != Types::Record && returnType != Types::Container)
                    {
                        fheader = infolog.helpGenerator().funcHeader('Kerndoc://classes/'+dictClass.Name()+'/'+dictMethod.name());
                        if (!match("(.+\\ +\\[", fheader))
                            info(strfmt('Property:"%1"\tValue: "%2"', dictMethod.name(), dictClass.callObject(dictMethod.name(), _control)));
                    }
                }
            }
        }
    }
}

[Logger]

Спасибо, всем ответившим.

Ситуация была такова :
на форме создания заказа при выборе адреса из кода X++ подставлялось значение в контрол отображающий поле salesTable.deliveryAddress

После такой подстановки для некоторых клиентов контрол становился очень узким- несколько пикселей или совсем невидимым. Собственно я пытался понять что с ним происходит, может быть какое-нить свойство слетает, но тупо перебирать все было лениво.

В итоге выяснил, что для слишком длинных текстов ядро пытается нарисовать сбоку элемента управления вертикальную полосу прокрутки (высота контрола была 3 символа и не все адреса помещались в FormStringEdit высотой 3 символа и шириной 30). После такое прорисовки проявлялся глюк.

Рецепт лечения: после изменения значения - принудительно добиться перерисовки контрола с нуля вызовом

ctrl.visible(false);
ctrl.visible(true);

[Logger]

Цитата:

Сообщение от dech

Что за контрол, какого типа? И что за действия?
По идее можно инфологи в горячих точках понаставить:

info(strfmt("Ширина контрола: %1",
    element.design().controlName("MyControl").width(0, 0)
    ));

Ну примерно так и сделал вчера.

Посадил на нажатие кнопки вывод в инфолог значений

    info4([
        ctrl.visible(),
        SalesTable_ds.object(fieldNum(SalesTable, DeliveryAddress)).visible(),
        ctrl.widthMode(),
        ctrl.widthValue(),
        ctrl.displayLengthMode(),
        ctrl.displayLengthValue(),
        ctrl.text(),
        SalesTable.deliveryAddress,
        ctrl.dataField(),
        ctrl.dataMethod(),
        ctrl.dataSource(),
        ctrl.xml()
    ]);

ничего не менялось !

[Logger]

Цитата:

Сообщение от AndyD

Чуть более универсально, но тупо

client static void GetControlProperties(FormControl _control)
{
    DictClass   dictClass;
    DictMethod  dictMethod;
    int         i;
    Types       returnType;
    str         fheader;
    ;
    if (_control)
    {
        dictClass = new DictClass(_control.handle());
        if (dictClass)
        {
            SetPrefix(_control.name());
            info(strfmt('Control Name: "%1"\nClass Name: "%2"', _control.name(), dictClass.name()));
            for (i = 1; i <= dictClass.objectMethodCnt(); i++)
            {
                dictMethod = dictClass.objectMethodObject(i);
                if (dictMethod.propertyMethod())
                {
                    if(dictMethod.returnType() == Types::USERTYPE)
                        returnType = new DictType(dictMethod.returnId()).baseType();
                    else
                        returnType = dictMethod.returnType();
                    if (returnType != Types::void && returnType != Types::Class && 
                        returnType != Types::Record && returnType != Types::Container)
                    {
                        fheader = infolog.helpGenerator().funcHeader('Kerndoc://classes/'+dictClass.Name()+'/'+dictMethod.name());
                        if (!match("(.+\\ +\\[", fheader))
                            info(strfmt('Property:"%1"\tValue: "%2"', dictMethod.name(), dictClass.callObject(dictMethod.name(), _control)));
                    }
                }
            }
        }
    }
}

Здорово !

А подскажите что делает вот эта проверка ?

if (!match("(.+\\ +\\[", fheader))

т.е. зачем она поставлена ?

[AndyD]

В некоторых пропертях в вызов метода в обязательном порядке необходимо передавать параметры

public final int height(int _value [, int _mode] )

public final int heightMode( [int _value] )

Этой проверкой я смотрю, есть ли дополнительный текст между круглой и квадратной скобкой помимо пробела в определении вызова. Если есть, то считаю что это дополнительный параметр/параметры и не вызывают этот метод

К сожалению, не нашел возможность проверять это с помощью каких-либо методов.
В общем, я же говорю: тупо

[DSPIC]

Цитата:

Сообщение от AndyD

В некоторых пропертях в вызов метода в обязательном порядке необходимо передавать параметры

public final int height(int _value [, int _mode] )

public final int heightMode( [int _value] )

Этой проверкой я смотрю, есть ли дополнительный текст между круглой и квадратной скобкой помимо пробела в определении вызова. Если есть, то считаю что это дополнительный параметр/параметры и не вызывают этот метод

К сожалению, не нашел возможность проверять это с помощью каких-либо методов.
В общем, я же говорю: тупо

Думаю, это можно проверить методами класса DictMethod:

parameterCnt
parameterId
parameterName
parameterOptional
parameterType

[Logger]

Еще немного и мы свой отладчик напишем

[AndyD]

Цитата:

Сообщение от DSPIC

Думаю, это можно проверить методами класса DictMethod:

parameterCnt
parameterId
parameterName
parameterOptional
parameterType

В тройке нет метода parameterOptional, к сожалению