Langage de programmation - Turbo Pascal - Référence de procédures et de fonctions

INSERT	Insère
Turbo Pascal 1+	System

Syntaxe

Procedure Insert(ch1:String; Var ch2:String;pos:Integer);

Paramètres

Nom	Description
ch1	Ce paramètre permet d'indiquer la chaine de caractères à insérer
ch2	Ce paramètre permet d'indiquer la chaine de caractères allant subir l'insertion
pos	Ce paramètre permet d'indiquer la position à laquelle sera inséré la chaine de caractères

Description

Cette procédure permet d'insérer une chaine de caractères dans une autre chaine de caractères à l'endroit spécifié.

Remarques

Si la valeur de la position (paramètre pos) est supérieur à 255 ou inférieur à 1, une erreur d'exécution se produira.
Si la position (paramètre pos) est a une valeur plus grande que la longueur de la première chaine de caractères (paramètre ch1), alors la deuxième chaine de caractères (paramètre ch2) est mit à la fin de la première chaine de caractères (paramètre ch1).
Si la première chaine de caractères (paramètre ch1) est plus courte que la somme des longueurs de deux chaines de caractères (paramètre ch1 et ch2), alors le résultat sera tronqué à la droite de la chaine de caractères.

Exemple

Cet exemple permet d'effectuer une simple insertion :

Essayer maintenant !



Program InsertSamples;

 
Var

 S:String;


 
BEGIN

 S:='Gladir';

 Insert('.com',S,7);


 WriteLn('Insert("Gladir",".com",7) = ',S);

 S:='Gladir';


 Insert('.ca',S,7);

 WriteLn('Insert("Gladir.com",".ca",7) = ', S);


 S:='Gladir';

 Insert('ateu',S,6);


 WriteLn('Insert("Gladir.com","ateu",6)= ', S);

END.

on obtiendra le résultat suivant :

Insert("Gladir",".com",7) = Gladir.com Insert("Gladir.com",".ca",7) = Gladir.ca Insert("Gladir.com","ateu",6)= Gladiateur

Référence

Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 260.

Dernière mise à jour : Dimanche, le 25 janvier 2015

Section courante

A propos

Section administrative du site

INSERT