Section courante

A propos

Section administrative du site

INSERT

 Insère
Virtual Pascal System

Syntaxe

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

Paramètres

Nom Description
ch1 Ce paramètre permet d'indiquer la chaine de caractères allant subir l'insertion
ch2 Ce paramètre permet d'indiquer la chaine de caractères à insérer
pos Ce paramètre permet d'indiquer le 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é.

Exemple

Cet exemple permet d'effectuer une simple insertion :

  1. Program InsertSamples;
  2.      
  3. Var
  4.  S:String;
  5.      
  6. BEGIN
  7.  S:='Gladir';
  8.  Insert('.com',S,7);
  9.  WriteLn('Insert("Gladir",".com",7) = ',S);
  10.  S:='Gladir';
  11.  Insert('.ca',S,7);
  12.  WriteLn('Insert("Gladir.com",".ca",7) = ', S);
  13.  S:='Gladir';
  14.  Insert('ateu',S,6);
  15.  WriteLn('Insert("Gladir.com","ateu",6)= ', S);
  16. 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

Dernière mise à jour : Vendredi, le 29 juillet 2016