Hi,
so wie es aussieht brauche ich noch das parenthandle - wenn ich den wert manuell einsetze
dann funktioniert es - aber wie kann ich ihn automatisch ermitteln
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
hwnd,
handle, parenthandle: thandle;
buffer:
array[0..1024]
of Char;
begin
hWnd := FindWindow(
nil, '
Globalserver - Desktop Edition by Omega Research');
handle := handlefromid(hwnd,5191);
parenthandle:=
{??? wie ermittle ich dieses ?};
handle:=getdlgitem(parenthandle,5191);
// parenthandle, controlid
sendmessage(
handle,WM_gettext,sizeof(buffer),Integer(@buffer));
label1.Caption:='
Status: '+
string(buffer);
end;
Danke für die Hilfe
Ralf