Insert

Insertion d'une chaîne de caractères dans une autre chaîne de caractères à partir d'un index spécifié.

procedure Insert(src: String; var S: String; index: Integer)

index : Position de S à laquelle sera insérée la chaîne src.

var S : Chaîne dans laquelle on fait une insertion de la chaîne src.

src : Chaîne insérée dans la chaîne S.

Remarques

L'index commence à 1.

S'il est supérieur au nombre de caractères contenus dans S, la chaîne src s'insèrera directement après S.
S'il est inférieur ou égal à 1, la chaîne src sera insérée juste devant S.

var s:string;

S:='Orignal';
insert('i', s, 5); // S est devenu 'Original'

S:='cône';
insert('i', s, 1); // S vaut maintenant 'icône'