[ANN] Tabax 0.1 -- панель задач для Axapta

[blokva]

Цитата:

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

...Плюс он легко вставляется в табакс (или оформляется плагином - по желанию) и превращается в одну легкую универсальную кнопочку...

ага вот это было бы здорово

[sukhanchik]

Цитата:

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

ага вот это было бы здорово

"Это" - это что? как кнопка - это оформляется легко - достаточно создать кнопку и в метод clicked скопировать мой код.
А чтобы плагин сделать - это нужно сделать класс с методом main (+соответствующий пункт меню), куда выложить сей код и заменить строку element.currentFormRun() на infolog.setLastActivatedForm().
После чего - положить иконку с соответствующим названием в папочку плагинов.

2belugin: Я правильно понял что нужно доделать чтобы эта кнопка в плагин переросла?

[belugin]

Цитата:

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

2belugin: Я правильно понял что нужно доделать чтобы эта кнопка в плагин переросла?

Сделать иконку
Сделать пункт меню
Сделать класс, форму или джоб

поюзать currentFormRun из табакса как тут: http://erpkb.com/Axapta/Tabax/files?...estructure.zip

public void init()
{
    TableID tableID;
    super();
    if (this.args().caller() && classIdGet(this.args().caller())==classNum(SysSetupFormRun) &&
        conFind(['Tabax', 'GDL_Tabax'], this.args().caller().name())
    )
    {
        tableID = this.args().caller().currentTable();
        if (tableID)
            element.tableName(true, tableID2Name(tableID));
    }
    else
    {
        element.tableName(true,
            (this.args() && this.args().parm())?
                this.args().parm()
                :
                tableStr(InventTable)
        );
    }
}

[belugin]

Цитата:

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

...
    if (this.args().caller() && classIdGet(this.args().caller())==classNum(SysSetupFormRun) &&
...

Вот так, кстати, неправильно - не будет работать с таксрекордером и русскими адресами в четверке. Надо SysDictClass::is

[DSPIC]

2Sukhanchik. Всё-всё, молчу. Я просто предложил. Производительность не учел - каюсь. Не реагируйте так остро.

[sukhanchik]

2DSPIC: Это просто вылилось... Извините. В свое время просто это была больная мозоль - когда делал себе какой-нибудь инструмент.... А его не разрешали оставить в версии, но при этом говорили "Работай".
Поэтому получился столь резкий ответ.

А вообще - я мирный И за мир во всем мире . И за (фут,волей,пейнт ..)бол после работы

[sukhanchik]

Оформил сие плагином.
FormCountRecords.zip

[Denicce]

что-то не работает в 4.0SP2ЕЕ функция urlEscape() из формы Tabax. Скопировал в job, также не работает; в 3.0 все ОК. В 4.0 выводит пустую строку.

static void JobTabaxUrlEscape(Args _args)
{
    str _s = "dsfsdfsdf ndfghghdf";
    DLL             dll = new DLL("shlwapi.dll");
    DLLFunction     URLEscape = new DLLFunction(dll, "UrlEscapeA");
    Binary          escaped = new Binary(strlen(_s)+1);
    Binary          cnt = new Binary(4);
    #define.E_POINTER(0x80004003)
    ;
    URLEscape.arg(ExtTypes::String, ExtTypes::Pointer, ExtTypes::Pointer, ExtTypes::DWord);
    URLEscape.returns(ExtTypes::DWord);
    cnt.dWord(0, strlen(_s)+1);
    if (URLEscape.call(_s, escaped, cnt, 0) == #E_POINTER)
    {
        escaped = new Binary(cnt.dWord(0)+1);
        URLEscape.call(_s, escaped, cnt, 0);
    }
    info(escaped.string(0));
}

ЗЫ Заменил

        if (URLEscape.call(_s, escaped, cnt, 0) == #E_POINTER)

на

        if (URLEscape.call(_s, escaped, cnt, 0) == any2int(#E_POINTER))

и все заработало.

[Denicce]

Забыл добавить, с чего я вообще в этот метод полез: не работала функция "Reopen recently closed window" в табаксе, если открывался редактор методов таблиц. В мапе открытых форм и их АОТ адресов хранился путь с "Data dictionary", а этот метод должен пробелы заменить на "%20", чего он не делал (возвращал пустую строку). Поэтому хранился путь только к АОТ.
В 4.0 новый появился тип int64, в который и переводился #E_POINTER при сравнении. А URLEscape.call() возвращает int.

[sukhanchik]

Так написать-то уже давно все написано - идею предлагал уже видя код и зная что он работает
Просто непосредственно код посыла окну Editor-а собщения для запуска showScripts (для 3.0) или getApplicableScripts (для 4.0 и 2009) автор кода посыла сообщения (а это был не я) просил меня не выкладывать данный код на форум - поэтому я и ограничился лишь идеей - по принципу - кто захочет - тот докопается, зная идею.

[alex55]

После стольких лет совместной жизни с Tabax для 2009-ой, мне неожиданно стало очень не хватать функции закрепления окон для их исключения при обработке по нажатию "Закрыть все, кроме". Обычно работаю с 2-3-мя табами постоянно, хотелось их сохранять постоянно открытыми. Допилил код на коленке - жить стало лучше, жить стало веселей.

Идея простая - собираем ID-ки табов в Set по дополнительному контекстному меню Pin tab и передаем в контейнере в функцию закрытия.

Мысли по теме приветствуются.

[andy.plsql]

Друзья, как я понимаю erpkb прикрыли и скачать последний tabax не получается, могли бы вы поделиться сием чудом здесь на форуме? Спасибо!

[Alex_KD]

Цитата:

Сообщение от andy.plsql

Друзья, как я понимаю erpkb прикрыли и скачать последний tabax не получается, могли бы вы поделиться сием чудом здесь на форуме? Спасибо!

Можно качнуть отсюда вместе с другими тулзами -

https://dax2012toolset.codeplex.com/

[andy.plsql]

Цитата:

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

Можно качнуть отсюда вместе с другими тулзами -

https://dax2012toolset.codeplex.com/

Для 2009ой хотелось бы tabax, может есть в закромах?

[Link]

Цитата:

Сообщение от andy.plsql

Для 2009ой хотелось бы tabax, может есть в закромах?

Есть для 2009 своя кастомная версия. Уже давно не работаю в 2009 и что там менял не помню.

[belugin]

Нашел в почте первую непубличную версию Tabax, которую я отправил AndyD ровно 10 лет назад.

Здесь покорректнее, добавлено переключение между окнами, но все равно
с иконками промахивается и

Exportfile for AOT version 1.0 or later
Formatversion: 1

***Element: FRM

; Microsoft Business Solutions-Axapta Forms unloaded at ×åòâåðã 31.08.2006; --------------------------------------------------------------------------------
FRMVERSION 5

FORM #Tabax
PROPERTIES
Name #Tabax
ENDPROPERTIES

[RSrd]

А есть у кого-нибудь Tabax для AX4 под рукой?