Source position: lclproc.pas line 334
procedure UTF8Delete(
var s: String;
StartCharIndex: PtrInt;
CharCount: PtrInt
);