Где же это поле?! (Form digger)

[DSPIC]

Очередной гаджет для удобства работы в системе. Уверен, пригодится как разработчикам, так и консультантам\конечным пользователям.

Основное предназначение - мгновенный и очень удобный поиск любого поля на любой форме аксапты, в т.ч. в TableBrowser.
Искать можно по метке поля на форме, либо по системному имени поля таблицы, отображаемого где-то на форме.

Возможности:

• поиск полей на любой форме с авто позиционированием и визуальным выделением (красная рамка) искомого поля.
• доступ к свойствам поля и копирование в буфер обмена.
• доступ к стандартному контекстному меню разработчика.
• быстрый доступ к редактированию формы в AOT.
• быстрый снимок формы (snapshot).

Подробное описание здесь

Доступны версии для DAX 3.0, 4.0. Для DAX 2009 пока не решена проблема с визуальным выделением полей на форме, но это на 70% красивость и на 30% нужность. А так, в принципе, можно пользовать.

Хочу также отметить, что это beta версия, буду благодарен за сообщения о найденных ошибках\замечаниях.

[miklenew]

В Tabax-e есть кнопки которые быстро открывают активную форму и активный элемент.

[DSPIC]

Цитата:

В Tabax-e есть кнопки которые быстро открывают активную форму и активный элемент.

Суть не в этом. Инструмент для поиска полей, а не для просмотра активного элемента.
Пример: Вы не знаете, где на SalesTable находится поле "RMA-номер". Для поиска вам нужно прощелкать и просмотреть чуть ли не все закладки\поля.
В данном случае, открыв форму SalesTable, вы нажимаете "Alt+~" и вводите несколько букв искомого поля: "RM". FormDigger автоматически откроет нужную закладку на SalesTable и обведет поле "RMA-номер" красной рамкой.

[Lucky13]

Цитата:

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

Очередной гаджет для удобства работы в системе. Уверен, пригодится как разработчикам, так и консультантам\конечным пользователям.

Прикольно. Только я думаю будет лучше убрать из проекта класс SysSetupFormRun, а изменения, которые в нем делаются, выложить сюда. А то по ошибке можно лишиться изменений в этом классе.

[DSPIC]

Цитата:

Будет лучше убрать из проекта класс SysSetupFormRun, а изменения, которые в нем делаются, выложить сюда. А то по ошибке можно лишиться изменений в этом классе.

OK. Итеграция очень простая: одна строка в стандартный класс SysSetupFormRun,
метод \Classes\SysSetupFormRun\task

//EVO: 31.01.09 #DEV02 Find from control by name -->
if (!FormDigger::overloadButton(this, _p1))
//EVO: 31.01.09 #DEV02 Find from control by name <--
        ret = super(_p1);

Т.е. отслеживаем нажатие комбинации кнопок и блокируем вызов super(). Вообще, блокировка super() не обязательна для комбинации "Alt+~", Так что сам if можно брать, оставив только

FormDigger::overloadButton(this, _p1)

[Logger]

Странно, безобидное сравнение слоев перед импортом - сломало класс sysSetupFormRun

Аккуратнее. Изменения в этом классе лучше внести руками.

[Lucky13]

Предлагаю внести небольшие изменения в метод initFromFormControl таблицы FormDiggerTmpData, а то получается не очень информативно, если на форме несколько источников

void initFromFormControl(Object _formControl, int _parentId = 0, FormRun _fr)
{
    ;

    if ( !_formControl)
        return;

    this.Name     = _formControl.userPromptText() ? _formControl.userPromptText() : _formControl.labelText();
    this.Id       = _formControl.id();
    this.ParentId = _parentId;

    if (FormDigger::formControlIsDataBound(_formControl))
    {
        this.IsDataBound = NoYes::Yes;

        if (_formControl.dataField())
        {
//добавляем имя источника
           this.FieldMethodName = _fr.form().dataSource(_formControl.dataSource()).name()+'.'+fieldId2name(_fr.form().dataSource(_formControl.dataSource()).table(), _formControl.dataField());
        }
        else
        {
            if ( !this.FieldMethodName)
            {
//добавляем имя источника и скобки к имени метода
                this.FieldMethodName = _fr.form().dataSource(_formControl.dataSource()).name()+'.'+_formControl.dataMethod()+'()';
                this.isMethod        = NoYes::Yes;
            }
        }
    }
}

[DSPIC]

Цитата:

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

Предлагаю внести небольшие изменения в метод initFromFormControl таблицы FormDiggerTmpData, а то получается не очень информативно, если на форме несколько источников

Согласен, только не совсем удачное место. Дело в том, что по контекстному меню доступны функции копирования, которые используют поле временной таблицы FieldMethodName. Поэтому в clipboard попадет доп. информация, что нежелательно. Поэтому лучше это на форме делать, чисто для отображения:

\Forms\FormDigger\Methods\addListItem
Но нужно во временную таблицу добавить поле для имени источника данных.
Спасибо, учтем в след. версии.
Да, ещё заметил, что здесь 2й if() лишний...

[lev]

Цитата:

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

Подробное описание здесь

читал ссылку, заметил в одном месте опечатку... фраза:
"Если флаг "Find by field" («По полю») не установлен, поиск/фильтрация выполняется по наименованию поля (его пользовательской метке), если не установлен – по имени поля таблицы."

Обратите внимание дважды написано "НЕ установлен", так, в каком случае как работает? Правильно ли я понял, что если Установлен флаг то поиск по имени поля таблицы, если НЕ установлен то по наименованию поля (метке)?

[DSPIC]

Цитата:

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

Странно, безобидное сравнение слоев перед импортом - сломало класс sysSetupFormRun

Аккуратнее. Изменения в этом классе лучше внести руками.

Да, полностью согласен, есть такая неприятность...

[DSPIC]

Цитата:

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

читал ссылку, заметил в одном месте опечатку... фраза:
"Если флаг "Find by field" («По полю») не установлен, поиск/фильтрация выполняется по наименованию поля (его пользовательской метке), если не установлен – по имени поля таблицы."

Обратите внимание дважды написано "НЕ установлен", так, в каком случае как работает? Правильно ли я понял, что если Установлен флаг то поиск по имени поля таблицы, если НЕ установлен то по наименованию поля (метке)?

Да, Вы правильно поняли.
Поправил, спасибо.

[lev]

Цитата:

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

Да, Вы правильно поняли.
Поправил, спасибо.

Это Вам спасибо! отличная утилита!

[blokva]

Цитата:

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

Суть не в этом. Инструмент для поиска полей, а не для просмотра активного элемента.
Пример: Вы не знаете, где на SalesTable находится поле "RMA-номер". Для поиска вам нужно прощелкать и просмотреть чуть ли не все закладки\поля.
В данном случае, открыв форму SalesTable, вы нажимаете "Alt+~" и вводите несколько букв искомого поля: "RM". FormDigger автоматически откроет нужную закладку на SalesTable и обведет поле "RMA-номер" красной рамкой.

Дык неплохо бы еще и в виде плагина к Табаксу сделать

[kashperuk]

А почему на сайте блога нету самих проектов??

[Lucky13]

Маленькое дополнение, если кто-то пойдет моим путем:

if ( !this.FieldMethodName)
{
  if (_formControl.dataSource())
     this.FieldMethodName =    _fr.form().dataSource(_formControl.dataSource()).name()+'.'+_formControl.dataMethod()+'()';
  this.isMethod        = NoYes::Yes;
}

Добавляем проверку свойства datasource как указано выше на случай того, если контрол не связан с источником вообще. И еще увеличиваем размер поля FieldMethodName, а то в 40 символов может не влезть

[DSPIC]

Цитата:

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

А почему на сайте блога нету самих проектов??

Честно говоря, не хватило терпения разобраться, как на blogspot можно файлы аттачить (можно ли вообще?). Дойдут руки - выложу на axaptapedia.com и в блог ссылки добавлю. Пока сорри

[kashperuk]

Цитата:

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

И еще увеличиваем размер поля FieldMethodName, а то в 40 символов может не влезть

40 символов - предельное значение для любого объекта АОТ

[Lucky13]

Цитата:

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

40 символов - предельное значение для любого объекта АОТ

Для объекта АОТ да, но к имени объекта еще добавляется имя источника, поэтому в сумме длина может превысить 40 символов

[DSPIC]

Цитата:

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

Маленькое дополнение, если кто-то пойдет моим путем:

if ( !this.FieldMethodName)
{
  if (_formControl.dataSource())
     this.FieldMethodName =    _fr.form().dataSource(_formControl.dataSource()).name()+'.'+_formControl.dataMethod()+'()';
  this.isMethod        = NoYes::Yes;
}

Добавляем проверку свойства datasource как указано выше на случай того, если контрол не связан с источником вообще. И еще увеличиваем размер поля FieldMethodName, а то в 40 символов может не влезть

Есть проблема.
Дело в том, что в режиме поиска по полю происходит фильтрация именно по "this.FieldMethodName". Поэтому, дописав сюда дополнительные буквы вы сломаете фильтрацию... Ещё раз повторюсь, что эту доработку лучше сделать в месте, где формируется FormListControl, а не на таблице. При этом в таблицу можно добавить новое поле для имени таблицы датасорса.

[konfet]

Большое спасибо за Ваш труд! Очень полезная утилита. Непонятно - почему что-то похожее не было реализовано разработчиками, на системном слое.

Что бы хотелось видеть в следующей версии, если она будет (новое/исправленное):

1. Если запустить formDigger из формы (при этом курсор находится в поле "Id") - поле "Id" окружается красной рамочкой. Но позиционирования в formDigger на поле "Id" не происходит - то есть оно не оказывается первым в списке подобно тому как это происходит в Аксапте при "переходе к основной таблице". Оно правда, выделяется серым фоном - но как-то незаметно.
2. Если после открытия formDigger перейти в host-форме на другое поле, то перепозиционирования в formDigger на это поле не происходит, и красная рамочка вокруг него в host-форме не появляется.
3. Функция копирования скриншота host-формы в буфер обмена переносит со скриншотом красную рамочку, но не всегда. В частности, она не делает это на полях-галочках (типа NoYes) и в некоторых других случаях (смотрелось на форме "Обработка/Отборочная накладная" в закупке) .
4. При щелчке правой кнопкой мыши по любому элементу formDigger происходит перерисовка host-формы.
5. Хотелось бы видеть сортировку и/или фильтрацию по типу элемента (поле, display/edit метод и тд), а также по datasource-у контрола (см. ниже).
6. Хотелось бы видеть в formDigger информацию (в виде еще одной колонки) о datasource и/или к таблице, к которой относится выбранный контрол.
7. При выборе пункта "свойства" в контестном меню на элементе, происходит открытие окна свойств контрола в форме. Хотелось бы иметь возможность открывать свойства поля на таблице, если контрол представляет собой табличное поле. Если же контрол - дисплей-метод на таблице или на датасурсе формы, то по двойном щелчке на нем открывается соответствующий код.
8. Галочка Find By Field имхо практически не нужна, так как label всегда на русском, а системное имя поля - английское. Точнее так: поиск лучше производить и по label и по fieldname без необходимости переключать Find By Field.