<html>
<head>
<title>OnConstrain</title>
<link rel="stylesheet" href="../../../../../../Styles/Default.css" type="text/css">
</head>

<body bgcolor="#FFFFFF">
<p class="Decl"><b>property</b> OnConstrain: TRBConstrainEvent;</p>
<p class="Decl"><b>type</b> TRBConstrainEvent = <b>procedure</b>(<br>
&nbsp;&nbsp;Sender: TObject; <b><br>
&nbsp;&nbsp;const</b> OldLocation: TFloatRect;<br>
&nbsp;&nbsp;<b>var</b> NewLocation: TFloatRect; <br>
&nbsp;&nbsp;DragState: TDragState;<br>
&nbsp;&nbsp;Shift: TShiftState) <b>