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