Главная страница
    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.005 c
2-1224576210
Вопрошающий
2008-10-21 12:03
2008.11.30
ExportGridToExcel не экспортирует второй уровенть


2-1224600668
romychk
2008-10-21 18:51
2008.11.30
dat файлы


9-1175880657
GLProg
2007-04-06 21:30
2008.11.30
Ошибка в GL программе


2-1224760314
azamat
2008-10-23 15:11
2008.11.30
работа с типами данных


2-1224240499
Fynjy
2008-10-17 14:48
2008.11.30
При печати выводит диалог с запросом сохранения файла





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский