Помогите юзать чужие окна.....

← →
SamProf © (2005-06-21 12:19) [0]

Допустим у чужого окна есть батоны и едиты.... короче всякие визуальные компоненты...
У меня есть Хандла окна, очень бя хотелося получить все компоненты в этом окне и получить к ним доступ... ну к примеру текст изменить или положение....
Если можно, то напишите кусок кода!
Пасибо!!!!!

← →
DVM © (2005-06-21 12:23) [1]

> получить к ним дост

FindWindowEx()

> ну к примеру текст изменить

WM_SETTEXT

> или положение

SetWindowPos()

← →
SamProf © (2005-06-21 12:25) [2]

А как их всех пересчитать?

← →
PVOzerski © (2005-06-21 12:39) [3]

EnumChildWindows. Кстати, тогда можно и FindWindowEx не использовать.

← →
Eugene74 (2005-06-21 13:07) [4]

Посмотри книгу "Delphi глазами хакера". Там есть несколько примеров на эту тему.

SamProf © (21.06.05 12:19)
к примеру узнать открытый Урл, по хендлу:

function GetURL(t:Thandle):string;
var
ie,toolbar,combo,
comboboxex,edit,
worker,toolbarwindow:hwnd;
begin
ie :=t;// FindWindow(pchar("IEFrame"),nil);
worker := FindWindowEx(ie,0,"WorkerA",nil);
toolbar := FindWindowEx(worker,0,"rebarwindow32",nil);
comboboxex := FindWindowEx(toolbar, 0, "comboboxex32", nil);
combo := FindWindowEx(comboboxex,0,"ComboBox",nil);
edit := FindWindowEx(combo,0,"Edit",nil);
toolbarwindow := FindWindowEx(comboboxex, 0, "toolbarwindow32", nil);

result := GetText(edit); end;

Помогите юзать чужие окна..... Найти похожие ветки