Van egy egyszerü megoldás két applikáció közötti adatátvitelre, 2 integer tipusu szám átvitele, a PostMessage -val.

PostMessage( másik Applikáció handle-ja , message -csatorna , adat1:integer , adat2:integer );
Üzenetküldő Applikáció:

uses Messages,WinProcs
const messa = wm_app +1;
. . .

procedure TForm1.Button1Click(Sender: TObject);
var HWND:THandle;
begin
  HWND:=FindWindow('TForm1','atlanta'); // a másik applikáció form1.caption -ja "atlanta" !!
  if HWND<> 0 then
  begin
    PostMessage(HWND,messa,888,999);
  end;
end;

Üzenet fogadó Applikáció:
{a form caption-ja legyen "atlanta", mert ezt fogja keresni a hívó Applikáció!!!}

const messa = wm_app +1;

private
procedure uzenet(var msg:Tmsg); message messa;

{$R *.DFM}

procedure Tform1.uzenet;
var a,b:integer;
begin
  a:=msg.message; //az egyik integer (888)
  b:=msg.wparam; //a másik integer (999)
end; 

Megjegyzés:
Az üzenetküldő proggi először is megkeresi a másik üzenet fogadó applikáció handle-ját
a form1.caption -ja alapján, aminek "atlanta" -nak kell lennie. A többi világos. 
Én szöveget is át szoktam vele küldeni ugy,
hogy a szöveg karaktereit (byte) egyesével átküldöm, a tuloldalon pedig összerakom. 
Egy pillanat alatt megvan.