Source position: ELSizeControl.pas line 57
type TMouseDownEvent = procedure(
Sender: TObject;
Target: TControl;
TargetPt: TPoint;
var handled: Boolean
) of object;