Höhe der Caption einer Form

[MrKnogge]

Hallo,

ich möchte im OnMouseWheel-Ereigniss einer Form feststellen,
ob sich der Cursor über einem Panel befindet.

Delphi-Quellcode:

procedure TForm2.FormMouseWheel(Sender: TObject; Shift: TShiftState;
  WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
begin
  if (MousePos.X > (Form2.Left + Form2.Panel2.Left)) and
     (MousePos.X < Form2.Left + Form2.Panel2.Left + Form2.Panel2.Width) and
     (MousePos.Y > (Form2.Top + Form2.Panel2.Top)) and
     (MousePos.Y < Form2.Top + Form2.Panel2.Top + Form2.Panel2.Height) then
    ShowMessage('Ich bin über Panel 2');
end;

Nun musste ich aber leider feststellen, das sich mein Rechteck was ich oben "definiert" habe,
um die Captionhöhe nach oben verschoben ist, wisst ihr wie ich die Höhe herausbekommen kann ?

Ich dachte schon an Form2.Height-Form2.ClientHeight aber da müsste ja auch der untere Rand dabei sein.


gruss