INSERT |
Insère |
---|---|
Delphi/Kylix/Lazarus | System |
Syntaxe
Procedure Insert(Source:String; Var S:String; Index:Integer); |
Paramètres
Nom | Description |
---|---|
Source | Ce paramètre permet d'indiquer la chaîne de caractères à insérer |
S | Ce paramètre permet d'indiquer la chaîne de caractères allant subir l'insertion |
Index | 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 :
- Program InsertSamples;
-
- {$APPTYPE CONSOLE}
- Uses SysUtils;
-
- Var
- S:String;
-
- BEGIN
- S:='Gladir';
- Insert('.com',S,7);
- WriteLn('Insert("Gladir",".com",7) = ',S);
- S:='Gladir';
- Insert('.ca',S,7);
- WriteLn('Insert("Gladir.com",".ca",7) = ', S);
- S:='Gladir';
- Insert('ateu',S,6);
- WriteLn('Insert("Gladir.com","ateu",6)= ', S);
- END.
on obtiendra le résultat suivant :
Insert("Gladir",".com",7) = Gladir.comInsert("Gladir.com",".ca",7) = Gladir.ca
Insert("Gladir.com","ateu",6)= Gladiateur
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 - Copy
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 - 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