Description
PSCCenterRect is a global function for calculating and placing a rectangle in the other rectangle. PSCCenterRect do not draw rectangle anywhere but it is useful for centering of the rectangles. Example: If OwnerFormCenter and (ParentForm<>nil) then begin FDialog.Position:=poDesigned; R:=PSCCenterRect(FDialog.BoundsRect,ParentForm.BoundsRect); FDialog.BoundsRect:=PSCEnsureRectInWorkArea(R); end;