Formulartitelleiste

[sakura]

Hi Stinger,

dazu musst Du die Windows-Botschaft WM_NCMOUSEMOVE abfangen

Delphi-Quellcode:

type
  TForm1 = class(TForm)
  private
    { Private declarations }
  protected
    procedure WmNcMouseMove(var Msg: TWMNCMouseMove); message WM_NCMOUSEMOVE;
  public
    { Public declarations }
  end;

...

procedure TForm1.WmNcMouseMove(var Msg: TWMNCMouseMove);
begin
  ShowMessage('Maus in Form ausserhalb des Client Bereiches');
  inherited;
end;

Damit wird allerdings auch erkannt, wenn die Mouse den Rand berührt, aber das kann man ja abgfangen...

......