Form schliessen wenn die Maus das Form verlässt.

[Kostas]

sorry, aber so geht es nicht.
WMMouseLeave wird einfach nicht ausgeführt.
Irgend eine Idee warum?

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    //Prozeduren und Objekte
  private
    { Private-Deklarationen }
    Procedure WMMouseLeave(Var Msg: TMessage); Message WM_MOUSELEAVE;
  public
    { Public-Deklarationen }

//...

procedure TForm1.WMMouseLeave(var Msg: TMessage);
begin
  Form1.close;
end;