Текущий архив: 2002.03.07;
Скачать: CL | DM;
Вниз
Как вытащить текст из эдита чужого окна??? Найти похожие ветки
← →
nikkie © (2002-01-10 12:08) [9]попробую я объянить. кидаешь на форму Edit + Timer. пишешь обработчик таймера.
procedure TForm1.Timer1Timer(Sender: TObject);
var
h : HWND;
n : integer;
s : string;
begin
h := WindowFromPoint(Mouse.CursorPos);
if h <> 0 then begin
n := SendMessage(h, WM_GETTEXTLENGTH, 0, 0) + 1;
SetLength(s, n);
SendMessage(h, WM_GETTEXT, WPARAM(n), LPARAM(PChar(s)));
Edit1.Text := s;
end;
end;
ничего сложного нет - надо только внимательно читать документацию.
про GetWindowText SDK говорит:
This function cannot retrieve the text of an edit control in another application.
эксперимент показывает, что не только из edit control :)
то же самое в MSDN
However, GetWindowText cannot retrieve the text of a control in another application.
эксперимент показывает, что из некоторых контролей (например, button или static) все-таки вытаскивает :)
чудесны и неисповедимы пути MS! что там внутрях GetWindowText творится - неизвестно. но документация все же ясно говорит, что надо использовать WM_GETTEXT
Страницы: 1 вся ветка
Текущий архив: 2002.03.07;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.014 c
