![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Тупичек:( Надо из окна IE взять адрес(URL)?
Владик_1 © (2002-12-25 13:47:00)Найти нужный хендл я могу. Даже функцией GetWindowText могу узнать… сами понимаете что. А дальше тупичек...
Владик_1 (2003-01-16 17:56:00) [1]а...все правильно- Пробовал комбинировать GetWindow, GetClassName.
Замахался уже:)
Владик_1 (2003-01-16 17:54:00) [2]поправка GetWindow :)
Владик_1 (2003-01-16 17:50:00) [3]Все было замечательно, НО FindWindowEx на 2000 отказалась работать. Да и в ее описании есть что НТ не поддерживает.
По ряду причин воспользоваться способом Opuhshii © (25.12.02 15:06) не могу.
Пробовал комбинировать GetWindow, GetClassName.
Пока тупик...
Dimast (2003-01-08 04:23:00) [4]var
S : String;
wHandle: HWND;
begin
wHandle := FindWindow("IEFrame", nil);
repeat
wHandle := FindWindowEx(wHandle, 0, "WorkerW", nil);
until isWindowVisible(wHandle); // несколько их там, невидимых
wHandle := FindWindowEx(wHandle, 0, "ReBarWindow32", nil);
wHandle := FindWindowEx(wHandle, 0, "ComboBoxEx32", nil);
Memo1.Lines.Add(IntToHex(wHandle, 8));
SetLength(S, 1000);
SetLength(S, SendMessage(wHandle, WM_GETTEXT, 1000, integer(@s[1])));
Memo1.Lines.Add(s);
Reindeer Moss Eater (2002-12-25 15:08:00) [5]GetWindowText() может взять текст только из окон своего процесса.
Вовсе нет. Это справедливо только для одного единственного класса окон.
Opuhshii (2002-12-25 15:06:00) [6]Uses SHDocVw....
var
I:Integer;
SW:Variant;
begin
SW:=CoShellWindows.Create;
for I:=1 to SW.Count-1 do begin
Showmessage(SW.Item(I).LocationURL);
end;
end;
пример получения Title,..
Showmessage(SW.Item(I).Document.Title);
вот,...
Владик_1 (2002-12-25 14:41:00) [7]Яндекс знает все. Буду пробовать. Если кому интересно...
http://www.sources.ru/delphi/delphi_grab_url_from_ie.shtml
Song (2002-12-25 14:29:00) [8]GetWindowText() может взять текст только из окон своего процесса.
Используйте WM_GETTEXT