Einzelnen Beitrag anzeigen

th_bone

Registriert seit: 16. Jun 2004
172 Beiträge
 
Delphi 2005 Professional
 
#8

Re: Text aus Drittprogramm auslesen

  Alt 30. Nov 2005, 13:30
Hi

irgendwan sollte man auch mal Pause machen...

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');
  label1.caption:='FindwindowHandle '+inttostr(hwnd);
  handle := handlefromid(hwnd,5191);
  label2.caption:='HandlefromID '+inttostr(handle);
  sendmessage(handle,WM_gettext,sizeof(buffer),Integer(@buffer));

  label1.Caption:='Status:'+string(buffer);
end;
das reicht natürlich aus...

'HandelfromID' ist eine function die ich hier im Board mal gefunden habe, die anhand der ControlID
den Handle ermittelt

getdlgitem ging aber nicht - keine ahnung was hier der Unterschied zu HandlefromID ist...

Tschüss und nochmals Danke

Ralf
  Mit Zitat antworten Zitat