Section courante

A propos

Section administrative du site

INSERT

 Insère
Turbo Pascal pour Windows System

Syntaxe

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

Paramètres

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

Description

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

Exemple

Cet exemple permet d'effectuer une simple insertion :

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