procedure UTF8Insert(const InsertStr: String; var TargetStr: String; StartCharIndex: LongInt)
Вставляет строку InsertStr в строку-приемник TargetStr в позицию StartCharIndex. Позиция начинается с 1. Если позиция меньше или равна 1, текст вставляется в начало. Если позиция больше длины строки-приемника, то текст вставляется в конец.
Параметры: