GetMessage
От: Blacker77  
Дата: 25.09.02 23:23
Оценка:
Уважаемые Гуру хэндлинга! Прошу грандиозной помощи в обуздании Subja!
Есть такой код:


procedure TForm1.Button5Click(Sender: TObject);
var
Msg:TMsg;
h:hwnd;
begin
h:=FindWindow('WMPlayerApp',nil);
GetMessage(Msg,h,0,0);
ShowMessage(inttostr(Msg.message));
end;


Получаем Handle Windows Media Player. И запрашиваем любые события с ентого хэндлу! Но нет...нет событий и получасовые шаманские движения над плеером мышой не помогают. В чем проблема?
Может в руках?
Заранее Tahks!
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.