к таблице можно прицепить МенеджерТабличногоДокумента из tabledoc - там есть события
извиняюсь не сразу понял, что требуется

Ага, а как координаты окна по хендлу находить - см. здесь: http://www.1cpp.ru/forum/YaBB.pl?num=1227526095

Почти.

Сразу после загрузки 1С скрипт почему-то показывает в ТЗ те окна, которые были открыты в предыдущем сеансе. Как это???

Хотя в реальности ничего не открыто.

alyuev писал(а) 11. Сентября 2013 :: 08:50:

а не MDI окна не интересуют? модальнооткрытые формы и прочие диалоги

alyuev писал(а) 11. Сентября 2013 :: 12:29:


А ты ловишь нажатие глобальной процедурой "ПриНажатииКнопкиМыши"?

alyuev писал(а) 11. Сентября 2013 :: 13:55:

А в результате что нужно получить - хэндл окна по которому щелкнули?

Рабочее поле это MDI окно?

alyuev писал(а) 12. Сентября 2013 :: 08:14:


Понятно, это MDI окно.

но можно попробовать так:
получить hwnd MDIClient - это в примере есть
и получить hwnd WindowFromPhysicalPoint, если DynamicWrapper позволяет передавать структуры в качестве параметров
и сравнить

chessman писал(а) 12. Сентября 2013 :: 11:31:

в двух словах, как ?
тут http://www.script-coding.com/dynwrapx.html#inparams не нашел

это передача указателя, а если структура в функцию передается непосредственно через стек, как POINT в WindowFromPhysicalPoint, тоже сработает?

понятно что через стек, но ты предлагаешь передать через стек указатель на структуру, тогда как я говорю про передачу структуры через стек

понятно. хитро

Небольшой класс для определения класса окна под мышкой.

На одной из машин, на которой Win Serv 2003 класс выдает такую ошибку:

"КлассОкна=класс.ПолучитьКлассОкна();
{Глобальный модуль(63404)}: DWX.ClickOnWindow::ПолучитьКлассОкна() : Microsoft VBScript runtime error: Object doesn't support this property or method: 'Wrap.GetCursorPos'
Возврат ScrptCtrl.Run("GetClassName");
{D:\copy\CopyAC\ACIni\Classes\Systems\DWX.ClickOnWindow.ert(83) }"

С чем бы это могло быть связано?

Замени на WindowFromPoint в 2 местах.

Появился еще вопрос: как получить hwnd для MDIClient?

Я пока сделал так:

    Враппер = СоздатьОбъект("DynamicWrapper");
    Враппер.Register("user32.dll",	"FindWindowExA",			"i=llsl",	"f=s", "r=l");
    Враппер.Register("user32.dll",	"FindWindowW",				"i=ll",		"f=s", "r=l");
    Враппер.Register("user32.dll",	"GetWindow",				"i=ll",		"f=s", "r=l");
    Враппер.Register("user32.dll",	"GetParent",				"i=l",		"f=s", "r=l");
    Враппер.Register("User32.dll",	"GetWindowThreadProcessId",	"i=ll",		"f=s", "r=l");
    Враппер.Register("kernel32.dll", "GetCurrentThreadId", "f=s", "r=l");
    Хендл = Враппер.FindWindowW(0, 0);
    Пока Хендл <> 0 Цикл
	  Если Враппер.GetParent(Хендл)=0 Тогда
		Нить=Враппер.GetWindowThreadProcessId(Хендл, 0);
		Если Нить=Враппер.GetCurrentThreadId() Тогда
		    Прервать;
		КонецЕсли;
	  КонецЕсли;
	  Хендл = Враппер.GetWindow(Хендл, 2);
    КонецЦикла;
   Дескриптор_MDIClient=Враппер.FindWindowExA(Хендл,0,"MDIClient",0);
   Возврат Дескриптор_MDIClient; 

А зачем Find используешь?

На счет GetMainFrame был неправ (уже забыл). Она возвращает указатель на CWND приложения.


Вот скритп, возвращающий хэндл главного окна и MDI

	ТекстМодуля = "
		|Public Const GW_CHILD					= &h5
		|
		|Set Wrap = CreateObject(""DynamicWrapperX"")
		|Wrap.Register ""kernel32"", ""LoadLibrary"" 	,	""i=s"", ""r=h""
		|Wrap.Register ""kernel32"", ""GetProcAddress"" ,	""i=hs"", ""r=u""
		|Wrap.Register ""user32"", ""GetWindow""	, ""i=hl"", ""r=l""
		|
		|handle  = Wrap.LoadLibrary(""frame"")
		|func    = Wrap.GetProcAddress(handle, ""?GetMainFrame@@YAPAVCMDIFrameWnd@@XZ"") 'GetMainFrame(void)
		|r 	= Wrap.RegisterAddr(func, ""GetMainFrame"", ""f=s"", ""r=p"")
		|h1C	  = Wrap.NumGet(Wrap.GetMainFrame(), 32)
		|
		|MsgBox Hex(h1C)
		|
		|hMDI = Wrap.GetWindow(h1C, GW_CHILD)
		|
		|MsgBox Hex(hMDI)
		|";
 

так то там чайлдов (у фрейма главного окна) кроме МДИКлиента еще 6 штук: 4 контролбара, статусбар и панел окон
может быть в этом дело?
хотя МДИКлиент вроде бы всегда первый

Spy++ нет. Просто попробуй сравни результаты двух вариантов.

alyuev писал(а) 02. Октября 2013 :: 11:11:


Ты в терминалке тестируешь?

alyuev писал(а) 02. Октября 2013 :: 12:08:


что же там MDI не первое доченее окно у Приложения?
хендл 1С-ки то правильный?

а поищи по хэндлу, из моего варианта, что это за окно?

alyuev писал(а) 02. Октября 2013 :: 12:20:


а поищи по хэндлу в SPY++, из моего варианта MDI, что это за окно?

Да, держи в курсе...просто это очень странно.

alyuev писал(а) 02. Октября 2013 :: 14:51:


А картинку из SPY++ выложи.

Можно попробовать действовать не через WinAPI ::GetWindow(..., GW_CHILD),
а через MFC класс CMDIFrameWnd коим является фрейм главного окна
У него есть такой член:
public:
     HWND m_hWndMDIClient;       // MDI Client window handle

trad писал(а) 03. Октября 2013 :: 05:24:


&hC0

Еще в продолжение этой темы.

Задача похожая. Как определить, что кликнули на пункте меню?

Возникла ситуация, когда перехватываю клик мыши на шапке табличной части, и поверх шапки как раз выведено меню. Так вот, когда кликаешь на пункт меню, который над шапкой - срабатывал не выбор, а обработка шапки. Т.е. меню становилось прозрачным для клика.

Пока выкрутился так. У нас есть глобальная функция по выводу меню. Так вот в ней поднимаю глПеременную, что мол сейчас обрабатываем меню.

Да, точно такой же. Можно и так выловить.