Höhe der Caption einer Form

[SirThornberry]

du kannst mit windowfrompoint prüfen welches fenster sich unter dem cursor befindet. Wenn als Handle das handle des panels zurück geliefert wird weißt du das sich der cursor über dem panel befindet.

Delphi-Quellcode:

procedure TForm1.FormMouseWheel(Sender: TObject; Shift: TShiftState;
  WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
begin
  if WindowFromPoint(MousePos) = Panel1.Handle then
    caption := 'Maus über Panel'
  else
    caption := 'Maus über was anderem';
end;