Thema: Delphi Text aus ShowMessage

Einzelnen Beitrag anzeigen

KLS

Registriert seit: 20. Jun 2004
Ort: Berlin
89 Beiträge
 
Delphi 7 Enterprise
 
#8

Re: Text aus ShowMessage

  Alt 25. Mär 2005, 14:30
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
  wnd : HWND;
  Buf : string;
begin
  wnd := 2491570; //mein beispielhandle
  SetLength(Buf,SendMessage(wnd,WM_GETTEXTLENGTH,0,0)+1);
  SendMessage(wnd,WM_GETTEXT,length(Buf),Integer(@buf[1]));
  ShowMessage(buf);
end;
So wird jedoch "nur" die Caption ausgelesen. Wenn ich mich nicht irre, kann man den sonstigen text nicht auslesen.
Thomas H.
  Mit Zitat antworten Zitat