Форум: "WinAPI";
Текущий архив: 2003.10.06;
Скачать: [xml.tar.bz2];
ВнизGetParent, a kak poluchit GetChild Найти похожие ветки
← →
Delphi5.01 (2003-08-01 20:26) [0]Dobroe vrema sutok!
kak mojno poluchit Hanlde lubogo dochernogo okna znaia ego parent!
poluchit parent mojno s pomoshu funqcii
HWND GetParent(
HWND hWnd // handle of child window
);
Spasibo.
← →
ZrenBy (2003-08-01 20:31) [1]EnumChildWindows
← →
Delphi5.01 (2003-08-01 20:35) [2]da no mne nujen HWND a ne ukazatel, ili v dannom sluchae eto odno i toje? izvenite za lamerski vopros.
P.S. esli mojno primerchik. Pleaseeeeeeeee.
Spasibo.
← →
ZrenBy (2003-08-01 20:43) [3]Что-то типа этого
function U_ECWProc(hW:HWND;lP:LPARAM):Boolean;stdcall;
procedure TfMain.FormShow(Sender: TObject);
begin
StringList.Clear;
WinExec("calc.exe",SW_SHOWNORMAL);
Sleep(100);
hCalc := FindWindow(nil,LPSTR("Калькулятор"));
if(hCalc=0)then raise Exception.Create("...");
EnumChildWindows(hCalc,@U_ECWProc,LPARAM(StringList));
end;
function U_ECWProc(hW:HWND;lP:LPARAM):Boolean;stdcall;
var S:String;
begin
SetLength(S,SendMessage(hW,WM_GETTEXTLENGTH,0,0)+1);
SetLength(S,SendMessage(hW,WM_GETTEXT,Length(S),LPARAM(S)));
TStringList(lP).Add("Child = "+S+" HWND = "+IntToStr(hW));
Result := True;
end;
← →
Delphi5.01 (2003-08-01 21:00) [4]Spasibo bolshoe, lublu primerchiki :-)))))!
← →
Delphi5.01 (2003-08-01 23:40) [5]Vso ok no pochemuto windi ne pravilno daiut sodirjimi tekst, oni na odno okoshko vpered daut tekst, znachit xendl dannogo okna vozrashaet tekst sleduiushego okna! a pochemu?
Spasibo.
← →
Delphi5.01 (2003-08-01 23:51) [6]Prinoshu svoi izvenenia, eto u mena oshibka v proge bila!
Sorry
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2003.10.06;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c