Показать сообщение отдельно
  #21  
Старый 30.10.2011, 15:45
unity unity вне форума
Прохожий
 
Регистрация: 14.07.2011
Сообщения: 43
Репутация: -2279
По умолчанию

Цитата:
Сообщение от Pilot_Red
wnd как находишь??

Адресок то нужный нашел??

Код:
procedure TForm1.zahvatClick(Sender: TObject);
begin
hwndtmr.Enabled:= Not(hwndtmr.Enabled);
end;

procedure TForm1.hwndtmrTimer(Sender: TObject);
begin
 if (getasynckeystate($24)<>0)  then  //условия на то чтоб было нажатие кнопки
  begin
    GetCursorPos( Pos ); //определяет координаты курсора
    Wnd:= WindowFromPoint( Pos );//запоминает хвид окна который под курсорам
    hwndtmr.Enabled:= Not(hwndtmr.Enabled);
    ShowMessage('окно захваченно!');
    hwndpole.Caption:=inttostr(wnd);
end
end;

хэндл окна находи правельно и pid тоже вроде правельно

а какой адресок надо еще искать?
Ответить с цитированием