Recibir texto de un control externo?

[Reasen]

Por ejemplo si tengo 2 aplicaciones diferentes de delphi iniciadas como consigo el texto de un TEdit del otro proceso? Intente algo como esto pero sin suerte:

Código Delphi [-]
var
  winn:HWND;
  winn2:HWND;
    HoldString: PChar;
  HoldString__: String;
begin
winn:= FindWindow('','Aplicacion');
 winn2:=FindWindowEx(winn,0,'Edit',''); // recibimos el handle del control
 SendMessage(winn2,WM_GETTEXT,200,lparam(HoldString));
 HoldString__ := HoldString__ + ' ' + String(HoldString);
ShowMessage( HoldString__);
end;

Cualquier ayuda o consejo me sirven, saludos!