Source position: CGGeometry.pas line 391
procedure CGRectDivide(
rect: CGRect;
var slice: CGRect;
var remainder: CGRect;
amount: CGFloat;
edge: CGRectEdge
);