Source position: kcontrols.pas line 1326
procedure SetControlClipRect(
AControl: TWinControl;
const ARect: TRect
);