Memo einer anderen Anwendung auslesen..

[Luckie]

Delphi-Quellcode:

var
  szText: PChar;
begin
  GetMem(szText, SendMessage(hFremdesMemo, WM_GETTEXTLENGTH, 0, 0));
  try
    SendMessage(hFremdesMemo, WM_GETTEXT, length(szText), Integer(@szText));
    Memo1.Text := String(szText);
  finally
    FreeMem(szText);
  end;