Нешуточная задача

[Wamr]

Цитата:

В caption главного окна Axapta выводить информацию о номере сеанса. Эта информация аналогична информации, которая отображается в окне "Активные пользователи", колонка "сеанс" напротив активного пользователя

Решение кажется очевидным - используя SetWindowText подправить caption окна.
Вот тут возникают проблемы
1. Как получить hwnd приложения? Использовать GetTop или GetForeground можно, но если после набора пароля юзер быстренько перейдет в другое приложение, то caption поменяется у открытого окна.
2. В какой момент менять caption? Если это сделать в startupPost, то изменение быстренько затрется

[mad_pilot]

Можно узнать, чем вызвана такая задача?

[Wamr]

Цитата:

Это нужна для того, чтобы пользователь мог видеть какое приложение Axapta у него подвисло, когда он уже ничего не может открыть, но caption у него еще виден.

Задача поставлена админом. Часто пользователи запускают по 3-4 Аксапты на однотипные задачи, которые в конечном итоге друг друга блокируют. Админ может определить spid и сеанс блокирующего приложения, после чего просит юзера закрыть повисшую (и вешающую других) задачу... а как определить какое из окошек нужно кильнуть, если все чем-то заняты?

[mad_pilot]

На каких именно задачах наблюдается блокировка?

[Wamr]

Цитата:

На каких именно задачах наблюдается блокировка?

Не знаю, чем это поможет
При создание + регистраия маршрутных карт + создание накладных и счетов-фактур.

[Андре]

К сожалению совсем нет времени, чтобы самому попробовать решить эту задачу

Но общие мысли такие: Как я понял проблема в идентификации конкретного окна Аксапты. Последовательность как я понимаю такая:

1. При загрузке Аксатпа ищет все окна, где в заголовке встречается Navision/Microsoft/Micro$oft Axapta.
2. Смотрим, есть ли в заголовке этого окна идентификатор сессии (например "ID=")
3. Если есть, то это уже загруженная Аксапта с проставленным идентификатором сессии. Если нет, то это та, только что загруженная Аксапта - изменяем ее заголовок - ставим туда идентификатор сессии.

Таким образом, как мне кажется, все будет работать, за исключением того случая, когда пользователь ОДНОВРЕМЕННО ЗАПУСТИТ, два экземпляра Аксапты. Работать одновременно они могут - ради бога, главное одновременно не запускать. Хотя я не уверен, что у пользователя вообще получится ОДНОВРЕМЕННО ЗАПУСТИТЬ два экземпляра программы.

Цитата:

Если это сделать в startupPost, то изменение быстренько затрется

А можно про это поподробнее. Чтобы это случилось, кто-то должен сказать SetWindowsText. Кто это делает ? Неужели Аксапта переодически устанавливает свой заголовок окна ?

[Wamr]

Цитата:

А можно про это поподробнее...
Неужели Аксапта переодически устанавливает свой заголовок окна ?

При загрузке приложения (окно ввода пароля) в заголовке окна написано только
Damgaard/Navision/Microsoft/Micro$oft Axapta
А после открытия главного меню (или перед этим, но после startupPost) в заголовок прописывается держатель и название приложения

Цитата:

Чтобы это случилось, кто-то должен сказать SetWindowsText. Кто это делает ?

Сам бы хотел знать

[Андре]

Можно попробовать создать табличку с двумя полями - идентификатор сессии, handle главного окна Аксапты.

В startupPost - добавлять туды информацию о запускаемом приложении.

В дальнейшем регулярно, например при открытии каждого окна Аксапты (также как ты делал Micro$oft) по идентификатору сессии находить хэндл в таблице и уже по этому хэндлу обновлять заголовок.

Не пробовал, но по моему должно сработать. Таблицу можно заменить чем нибудь другим - идея в том, что пока заголовок уникален(а я понимаю, это в момент запуска Аксапты) нужно где то запомнить идентификатор сессии и соответствующий ему handle. Если с таблицей получатся плохо(блокировки) - можно попробовать файл на локальном компе или что-то вроде этого.

P.S. Как я понимаю, вариант написания внешнего приложения не рассматривается ?

[Wamr]

Спасибо за предложения
Как мне кажется, решение должно быть адекватно задаче..
Т.е. если задача вывести в caption окна какой-то текст, то это не должно порождать создание таблиц (массивов, контейнеров и т.д.) и поддержку в ней актуальных значений.

Вчера я пришел к некоторому решению, которое пока меня устроило (если не найду более простого)
1. hwnd окна можно получить infolog.hwnd()
2. Вызвать процедуру переименования по setTimeOut. Прикол в том, что в классе Application на 3х уровневой конфе он не работает.. а вот в Info работает (кстати, Info объявлен final, но пришлось в него добавить метод)