Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.11.30;
Скачать: CL | DM;

Вниз

как Определить активное окно, но хитро - позже клика?   Найти похожие ветки 

 
Vlad Oshin ©   (2008-10-17 12:53) [0]

вот так делаю
 case MSG.message of
   WM_LBUTTONDOWN,WM_RBUTTONDOWN:
   begin
     GetWindowText(GetForegroundWindow,@PA,255);
     //LastWindow:=strpas(pansichar(@PA));
     WriteToLog("Верхнее окно текст"+strpas(pansichar(@PA)));
     GetClassName(msg.hwnd,@PA,255);
     s:="Клик по окну класса:"+strpas(pansichar(@PA));
     GetWindowText(MSG.hwnd,@PA,255);
     s:=s+"(текст:"+strpas(pansichar(@PA))+")<BR>";
     hwnd:=MSG.hwnd;
     while (GetParent(hwnd)<>0) do begin
        hwnd:=GetParent(hwnd);
        if GetWindowTextLength(hwnd)>1
         then begin
            GetClassName(hwnd,@PA,255);
            s:=s+" подокно класса:"+strpas(pansichar(@PA));
            GetWindowText(hwnd,@PA,255);
            s:=s+"(текст:"+strpas(pansichar(@PA))+")<BR>";
         end;
     end;
//       GetWindowModuleFileName(msg.hwnd,@PA,255);
//       s:=s+" "+ExtractFileName(strpas(pansichar(@PA)));
     WriteToLog(s);

но,
Когда происходит клик, я определяю верхнее окно, а там срабатывает механизм какой-то, и верхним становится другое.
Например, щелкаем по кнопке на form1, которая вызывает form2.show.

Все правильно фиксируем,
- Клик на кнопка1, form1

А еще неплохо бы как-то зафиксировать какое после клика активное окно стало?


 
Правильный$Вася   (2008-10-17 12:58) [1]


> зафиксировать какое после клика активное окно стало?

а если оно станет активным через пару минут, после долгого мурыженья данных и сложных матрасчетов?
какие-то у тебя странные задачи
ты что, заранее не знаешь, что у тебя по кнопке вылезти должно?


 
Vlad Oshin ©   (2008-10-17 13:29) [2]


> заранее не знаешь, что у тебя по кнопке вылезти должно?

нет.
Динамически меняется


> а если оно станет активным через пару минут, после долгого
> мурыженья данных и сложных матрасчетов?

вот и именно
А надо бы..



Страницы: 1 вся ветка

Текущий архив: 2008.11.30;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.004 c
15-1222535144
Анонимм
2008-09-27 21:05
2008.11.30
Шахматная задачка из ветки


2-1224663021
Vunda
2008-10-22 12:10
2008.11.30
Toolbar под Explorer


6-1195160742
homm
2007-11-16 00:05
2008.11.30
TWebBrowser: Вызов процедуры на дельфи


2-1224219089
Mamed
2008-10-17 08:51
2008.11.30
SQL Server table changed


2-1224231868
NieL
2008-10-17 12:24
2008.11.30
COM и 1С





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский