Daten übertragen von DLL nach EXE

[sniper_w]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  dwMsg := RegisterWindowMessage('{6A64733D-6DAE-4972-9668-0181419AE58D}');
  fSendMsg(Form1.Handle);
end;

??
Vielleicht nur so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  fSendMsg(Form1.Handle);
end;

In fSendMsg wird   dwMsg := RegisterWindowMessage('{6A64733D-6DAE-4972-9668-0181419AE58D}'); sowieso aufgerufen.

edit:
Ich denke dwMsg sollte global/ als public Feld von TForm1 deklariert sein.