POS |
Position |
|---|---|
| Turbo Pascal 1+ | System |
Syntaxe
| Function Pos(search,source:String):Integer; |
Paramètres
| Nom | Description |
|---|---|
| search | Ce paramètre permet d'indiquer la sous chaine de caractères à rechercher |
| source | Ce paramètre permet d'indiquer la chaine de caractères dans lequel la recherche doit avoir lieu |
Description
Cette fonction permet d'indiquer la position à laquelle se trouve une sous-chaine de caractères dans une chaine de caractères de format standard Pascal.
Remarques
- Si la fonction ne est appelé avec une chaine de recherche vide, la fonction retournera 0.
- La recherche s'effectue de la gauche vers la droite ou du début vers la fin et s'arrête dès que la sous-chaine de caractères est trouvé.
Exemples
Voici un exemple d'une utilisation typique de cette fonction :
Essayer maintenant !
- Program PosSamples;
-
- BEGIN
- WriteLn('Pos(''Mal'',''Sylvain Maltais'')= ',Pos('Mal','Sylvain Maltais'));
- WriteLn('Pos(''a'',''Sylvain Maltais'') = ',Pos('a','Sylvain Maltais'));
- WriteLn('Pos(''l'',''Sylvain Maltais'') = ',Pos('l','Sylvain Maltais'));
- WriteLn('Pos(''S'',''Sylvain Maltais'') = ',Pos('S','Sylvain Maltais'));
- END.
on obtiendra le résultat suivant :
Pos('Mal','Sylvain Maltais')= 9Pos('a','Sylvain Maltais') = 5
Pos('l','Sylvain Maltais') = 3
Pos('S','Sylvain Maltais') = 1
Voici un exemple permettant de vérifier les chemins contenant des caractères génériques (* ou ?) :
Essayer maintenant !
- Program WildCardSamples;
-
- Function IsWildCard(Path:String):Boolean;Begin
- IsWildCard:=(Pos('*',Path)>0)or(Pos('?',Path)>0)
- End;
-
- BEGIN
- WriteLn('WILDCARD.PAS=',IsWildCard('WILDCARD.PAS'));
- WriteLn('?ILDCARD.PAS=',IsWildCard('?ILDCARD.PAS'));
- WriteLn('?ILDCARD.*=',IsWildCard('?ILDCARD.*'));
- WriteLn('*.PAS=',IsWildCard('*.PAS'));
- END.
on obtiendra le résultat suivant :
WILDCARD.PAS=FALSE?ILDCARD.PAS=TRUE
?ILDCARD.*=TRUE
*.PAS=TRUE
Voir également
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - CONCAT
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - COPY
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - DELETE
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - INSERT
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - LENGTH
Références
Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 329.
L'indispensable pour Turbo Pascal sur PC - Version 3, 4, 5, Edition Marabout, J. Morleghem, 1990, ISBN: 2-501-01275-1, page 226.