Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)
-   -   Получить текст под курсором (http://forum.oszone.net/showthread.php?t=49367)

wolfaleks 16-05-2005 16:04 324621
Получить текст под курсором
 
Ниже приведеный код позволяет получить информацию об окнах
под курсором, а как получить текст в окне ? ( Это web страница,загруженая в WebBrowser)
HELP !!!
Код:
procedure TMainForm.ShowHwndAndClassName(CrPos: TPoint);
var
  hWnd,hWnd1: THandle;
  aName: array [0..255] of Char;
  WName:array [0..255] of Char;
begin
  hWnd := WindowFromPoint(CrPos);
  hWnd1:= ChildWindowFromPoint(hWnd,CrPos);
  Label1.Caption := 'Handle : ' + IntToStr(hWnd);
  Label4.Caption := 'Child :' + IntToStr(hWnd1);
  GetWindowText(hWnd,WName,50);
  Label3.Caption := 'WinText : ' +string(WName);
  if Boolean(GetClassName(hWnd, aName, 256)) then
        Label2.Caption := 'ClassName : ' + string(aName)
  else
        Label2.Caption := 'ClassName : not found';
end;

Savant 16-05-2005 17:06 324645
wolfaleks
Цитата:
как получить текст в окне ?
А что у тебя появляется в Label3 ?

wolfaleks 16-05-2005 17:33 324653
в Label3 я ставлю для пробы разные параметры

В данном случае сюда вывожу Текст окна т.е название.

uStick 17-05-2005 02:05 324770
wolfaleks

хм... дык вроде GetWindowText и вернет тебе текст из окна, т.е. не его название, а содержимое... только вот... вряд ли с WebBrowser-ом это пройдет...

Кстати, если используем бразуер типа IE =) можно порыться в msdn... тама куча полезной информации... так что ждем подробного описания проблемы...

wolfaleks 17-05-2005 13:36 324921
GetWindowText возвращает текст названия окна (код я привел выше)

Я так понимаю проблема гораздо глубже
В окне WebBrowser при наведении на любую точку ,Handle окна верхнего
уровня и Child одинаковые и не меняются по всему полю,
а мне надо отловить на web странице слово под мышиным курсором...


Время: 06:37.

Время: 06:37.
© OSzone.net 2001-