Source position: bctools.pas line 24
procedure CalculateTextSize(
const AText: string;
AFont: TBCFont;
out ANewWidth: Integer;
out ANewHeight: Integer;
AShadowMargin: Boolean = True
);