Overføre værdier mellem 2 vinduer/programmer.

Bruger et købe program, hvor der er en formular med 20 felter.
Ønsker at lave et program, der kan udregne valuta, og overføre det til et bestem felt i formularen.
Har brugt denne programstump til at teste med, som flytter vædien.

procedure TJakobForm1.JakobButton1Click(Sender: TObject);
var
  pHandle: HWND;
begin
  pHandle := FindWindowEx(FindWindow('TLissiForm1', nil ), 0, 'TEdit', nil);
  SendMessage(pHandle, WM_SETTEXT, 0, integer(JakobEdit1.Text));
end;

Det virker, så fremt der kun er 1 felt i formularen. Er der flere felter i formulare vil dette programstump
overføre værdien til det sidste felt på formularen.
Hvordan overfører jeg en værdi fra mit program, til et bestemt felt i det andet program??
Jeg har et program, der kan aflæse handle og navn i hver af felterne. Alle felterne har det samme navn 'Edit', og
handlen ændre sig jo, hver gang man åbner vinduet.


Hilsen Jakob-s