Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];

Вниз

Не работает GetWindow?!   Найти похожие ветки 

 
Alibaba   (2001-12-21 12:10) [0]

Всем привет.
Не работает следующий кусок :

Handle,Wnd : hWnd;
Wnd := GetWindow(Handle, gw_HWndFirst);

здесь Wnd равен 0 !!!!

Подскажите, плиз.


 
McSimm   (2001-12-21 12:21) [1]

If no window exists with the specified relationship to the specified window, the return value is NULL


 
Fellomena   (2001-12-21 16:06) [2]

Если не работает один кусок - пробуем другой ;)

var
Wnd : hWnd;
begin
Wnd := GetWindow(Handle, gw_HWndFirst);
while Wnd <> 0 do begin
if (Wnd <> Application.Handle) and
(GetWindow(Wnd, gw_Owner) = 0)
then
begin
// as U wish 8)))
end;
Wnd := GetWindow(Wnd, gw_hWndNext);
end;

end;

Дело в том, что при первом вызове GetWindow(Handle, gw_HWndFirst); первым параметром является указатель на окно твоего приложения. А уже затем ты используешь полученный wnd для поиска следующего окна Wnd := GetWindow(Wnd, gw_hWndNext);
Ты переопределяешь Handle, в результате переменная Handle содержит вовсе не дескриптор твоего окна 8)
Мысль ясна ?



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

Форум: "WinAPI";
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.004 c
1-66529
TAN
2002-02-06 13:24
2002.02.21
DBGrid


3-66445
Dim
2002-01-28 11:51
2002.02.21
Вот это проблема :)


6-66635
SemFLY
2001-12-03 23:08
2002.02.21
Мастера, подскажите, как шифровать траффик между Клиент Сервер


6-66643
Jaya1
2001-11-30 20:15
2002.02.21
ASP or ISAPI


7-66690
RaZEr
2001-11-18 10:30
2002.02.21
Перехват команд с AVerMedia RC





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