title: Delphi: SendMessage don't send to FMX
body: <p>I successfully send message cross apps. But the code doesn't work in FMX. I can find the FMX form but no message receive at dest.</p>
  
  
  
  <p>Sender code:</p>
  
  <pre><code>  CDS.dwData:= 0;   //Identify message
    CDS.cbData:= ByteLength(Str);
    CDS.lpData:= PChar(Str);
  
    if DstHandle=0 then
      DstHandle := Winapi.Windows.FindWindow(nil, PChar(TargetFormCaption));
  
    if DstHandle&lt;&gt;0 then
    begin
      Res := SendMessage(DstHandle, WM_COPYDATA, Handle, NativeInt(@CDS));
      Result:= True;
    end
    else
      Result:= False;
  </code></pre>
  
  <p>Result is true but <code>WMGetData</code> is not triggered.
  Receiver code:</p>
  
  <pre><code>procedure WMGetData(var Msg : TWMCopyData) ; message WM_COPYDATA;
  ...
  procedure TForm3.WMGetData(var Msg: TWMCopyData);
  begin
    Caption:= 'Got something !';
  end;
  </code></pre>