Source position: GPCStrings.pas line 363
procedure DeleteStr63(
var theDest: Str63;
theStart: Integer;
theCount: Integer
);