Section courante

A propos

Section administrative du site

DELETE

Efface
Turbo Pascal 1+ System

Syntaxe

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

Paramètres

Nom Description
S Ce paramètre permet d'indiquer la chaine de caractères
Pos Ce paramètre permet d'indiquer la position dans la chaine 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 contenu dans la chaine de caractères spécifié.

Remarques

Exemple

Voici un exemple de l'utilisation de cette fonction :

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

on obtiendra le résultat suivant :

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

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 139.
Le grand livre du Turbo & Borland Pascal 7.0, Edition Micro Application, Reiner Scholles, 1993, ISBN: 2-86899-873-9, page 1221.

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