diff --git a/lcl/include/customlabel.inc b/lcl/include/customlabel.inc index bc269a88fd..4204880b20 100644 --- a/lcl/include/customlabel.inc +++ b/lcl/include/customlabel.inc @@ -206,7 +206,7 @@ end; constructor TCustomLabel.Create(TheOwner: TComponent); begin inherited Create(TheOwner); - ControlStyle := [csSetCaption, csClickEvents, csDoubleClicks, csReplicatable]; + ControlStyle := [csCaptureMouse, csSetCaption, csClickEvents, csDoubleClicks, csReplicatable]; with GetControlClassDefaultSize do SetInitialBounds(0, 0, CX, CY); FShowAccelChar := True;