Source position: flcStrings.pas line 253
procedure SetLengthAndZeroB(
var S: RawByteString;
const NewLength: Integer
);