Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Неработающий GetWindowText [D6, Win2k]

programer © (2004-07-13 00:06:00)
Дарова всем. Скажите plizz, как узнать, какой адрес в IE открыт в ActivPage. GetWindowText показывает, что в строке Адреса ничего нет.

VMcL (2004-07-13 23:41:00) [1]
P.S. Вообще-то в справке по GetWindowText буржуйским по белому написано:
This function cannot retrieve the text of an edit control in another application.

Cobalt (2004-07-13 22:02:00) [2]
2 Ertong ©
> почему тогда SendMessage пашет?
В целях совместимости

Ertong (2004-07-13 21:57:00) [3]

> Наверное, потому что целевое окно в АП другого процесса
> находится.

Да, но почему тогда SendMessage пашет?

VMcL (2004-07-13 13:26:00) [4]
>>Ertong © (13.07.04 01:03) [3]

Наверное, потому что целевое окно в АП другого процесса находится.

programer (2004-07-13 01:21:00) [5]
И вправду заработало! Спасибо!

Ertong (2004-07-13 01:03:00) [6]
var
wnd: HWnd;
clas, name: array[0..max_path] of char;

begin
wnd:=FindWindow('IEFrame',nil);
wnd:=getwindow(wnd,GW_CHILD);
wnd:=getwindow(wnd,GW_CHILD);
wnd:=getwindow(wnd,GW_CHILD);
while wnd<>0 do
begin
getclassname(wnd,@clas,50);
if clas='ComboBoxEx32' then
begin
// getwindowtext(wnd,@name,sizeof(name));
sendMessage(wnd,WM_GETTEXT,sizeof(name),Cardinal(@name));
getclassname(wnd,@clas,sizeof(clas));
messagebox(0,@name,@clas,0);
end;
wnd:=getnextwindow(wnd,GW_HWNDNEXT);
end;
end;

Не знаю почему getwindowtext не пашет, но SendMessage заработало.

programer (2004-07-13 00:17:00) [7]
program GetPage;

uses
Windows, SysUtils, Messages;

var
wnd: HWnd;
clas, name: array[0..50] of char;

begin
wnd:=getforegroundwindow;
wnd:=getwindow(wnd,GW_CHILD);
wnd:=getwindow(wnd,GW_CHILD);
wnd:=getwindow(wnd,GW_CHILD);
while wnd<>0 do
begin
getclassname(wnd,@clas,50);
if clas='ComboBoxEx32' then
begin
wnd:=getwindow(wnd,GW_CHILD);
wnd:=getnextwindow(wnd,GW_HWNDNEXT);
wnd:=getwindow(wnd,GW_CHILD);
getwindowtext(wnd,@name,50);
getclassname(wnd,@clas,50);
messagebox(0,@name,@clas,0);
end;
wnd:=getnextwindow(wnd,GW_HWNDNEXT);
end;
end.

Ertong (2004-07-13 00:10:00) [8]
А можно посмотреть код?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »