Hi,
winspy gibt dir direkt den delphi code aus.
Selbsterklärende beschreibung + winspy im anhang
MfG - Ghost007
[Edit für christian]
Delphi-Quellcode:
function TForm1.GetText(wnd:Thandle):string;
var
caption:PChar;
length:integer;
begin
length:=SendMessage(wnd,WM_GETTEXTLENGTH,0,0);
if length <> 0 then
begin
GetMem(caption, length+1);
SendMessage(wnd,WM_GETTEXT,length+1,Integer(caption));
result:=caption;
FreeMem(caption);
end;
end;
[/Edit]