Section courante

A propos

Section administrative du site

DELETE

 Efface
Turbo Pascal pour Windows System

Syntaxe

Procedure Delete(S:String;Pos,nbre:Integer);

Paramètres

Nom Description
S Ce paramètre permet d'indiquer la chaîne de caractères
Pos Ce paramètre permet d'indiquer la position dans la chaîne de caractères
nbre Ce paramètre permet d'indiquer la longueur du morceau de la chaine de caractères

Description

Cette procédure permet de supprimer une partie des caractères contenus dans la chaine de caractères spécifiés.

Exemple

Voici un exemple de l'utilisation de cette fonction :

  1. Program DeleteSamples;
  2.  
  3. Uses WinCrt;
  4.  
  5. Var
  6.  Prenom:String;
  7.  NomDomaine:String;
  8.  
  9. BEGIN
  10.  Prenom := 'SYLVAIN';
  11.  Delete(Prenom,2,6);
  12.  WriteLn(Prenom,'MALTAIS');
  13.  NomDomaine:='gladir.com';
  14.  Delete(NomDomaine,7,4);
  15.  WriteLn('Delete(''gladir.com'',7,4) = ',NomDomaine);
  16. END.

on obtiendra le résultat suivant :

SMALTAIS
Delete('gladir.com',7,4) = gladir

Dernière mise à jour : Dimanche, le 10 décembre 2017