Source position: unit_miscellaneous.pas line 48
procedure FuncBox(
Box: Rect;
var Outbox: Rect;
BoxSize: Integer
);