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