Source position: kfunctions.pas line 717
procedure StringDelete(
var ASource: TKString;
At: Integer;
Count: Integer
);