Section courante

A propos

Section administrative du site

COPY

Copie
Delphi/Kylix/Lazarus System

Syntaxe

Function Copy(S:String; Index, Count: Integer):String; Chaîne de caractères
Function Copy(Source : array; StartIndex, Count:Integer):array; Tableau

Paramètres

Nom Description
S Ce paramètre permet d'indiquer la chaîne de caractères
Index Ce paramètre permet d'indiquer la position dans la chaîne de caractères. Pour la copie de chaîne de caractères, une valeur inférieur à 1 est traité comme 1.
Count Ce paramètre permet d'indiquer la longueur du morceau de la chaîne de caractères

Description

Cette fonction permet d'extraire une sous-chaîne de caractères dans une chaîne de caractères ou copie une partie d'un tableau. Ainsi, la fonction copy a 2 syntaxes : dans le premier syntaxe, il crée une nouvelle chaîne de caractères à partir d'une partie d'une chaîne de caractères existante. Dans le deuxième syntaxe, il crée un nouveau tableau à partir d'une partie d'un tableau existant.

Remarques

Exemples

Voici quelques exemples typiques de l'utilisation de cette fonction :

  1. Program CopySamples;
  2.  
  3. {$APPTYPE CONSOLE}
  4. Uses SysUtils;
  5.      
  6. Const
  7.  chaine:String = 'Bonjour le monde !';
  8.      
  9. BEGIN
  10.  WriteLn(Copy(chaine,1,255));
  11.  WriteLn(Copy(chaine,4,255));
  12.  WriteLn(Copy(chaine,4,7));
  13. END.

on obtiendra le résultat suivant :

Bonjour le monde !
jour le monde !
jour le

L'exemple suivant permet de copier un tableau d'octets dans un autre tableau et d'afficher le résultat :

  1. Program CopyArraySamples;
  2.  
  3. {$APPTYPE Console}
  4.  
  5. Var
  6.  Source,Target:Array of Byte;
  7.  I:Integer;
  8.  
  9. BEGIN
  10.  SetLength(Source,10);
  11.  FillChar(Source,0,10);
  12.  For I:=0 to 3 do Source[5+I] := 65 + I;
  13.  Target:=Copy(Source,5,4);
  14.  WriteLn('Liste des elements du tableau destinataire : ');
  15.  For I:=0 to Length(Target)-1 do WriteLn('Target[',I,']:=',Target[I]);
  16. END.

on obtiendra le résultat suivant :

Liste des elements du tableau destinataire :
Target[0]:=65
Target[1]:=66
Target[2]:=67
Target[3]:=68

Voir également

Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - AnsiReplaceStr
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Concat
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Delete
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Insert
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Move
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - StringOfChar
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - StringReplace
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - StuffString
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - WrapText


Dernière mise à jour : Mercredi, le 18 février 2015