title: SendMessage to Application.Handle not working
body: <p>I've created an class that should propagate to the entire application a customized message when its going to be freed.
  I did it with <code>PostMessage</code> and it worked with few bugs</p>
  
  <pre><code>PostMessage(Application.Handle, UM_MYMESSAGE, 0, 0);
  </code></pre>
  
  <p>then I realized it should be synchronous - via <code>SendMessage</code>.</p>
  
  <pre><code>SendMessage(Application.Handle, UM_MYMESSAGE, 0, 0);
  </code></pre>
  
  <p>On my Form I was handling the messages with a <code>TApplicationEvents</code> component, but just switching <code>SendMessage</code> to <code>PostMessage</code> didn't make it handle the message</p>
  
  <pre><code>procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
    var Handled: Boolean);
  begin
    if Msg.message = UM_MYMESSAGE then
    begin
      ShowMessage('Ok');
  
      Handled := True;
    end;
  end;
  </code></pre>
  
  <p>It works if I pass the Form Handle but not working with <code>Application.Handle</code>...
  What am I doing wrong?</p>