Source position: typshrdh.inc line 145
function TRect.SplitRect(
SplitType: TSplitRectType;
ASize: LongInt
):TRect;function TRect.SplitRect(
Percent: Double
):TRect;