Discussion :

[Lorenzo77]

salut,

je me demande comment arriver a utiliser in avec un tableau afin de verifier si une valeur fait bien partie des valeurs du tableau, ex :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
const
	tbMinus: Array[0..25] of Char = ('a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z');
 
.........
.........
 
    EditPasse.Text := EditPasse.Text + chLettre;
 
    // ceci ne fonctionne pas
    if chLettre in tbMinus then inTotalPossible := inTotalPossible * length(tbMinus)
 
    // je dois faire ca ce qui est pas tres pratique :
    if chLettre in ['a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z'] then inTotalPossible := inTotalPossible * length(tbMinus)

merci

[sjrd]

Déjà tu peux utiliser les ensembles décrits avec .. plutôt qu'en extension :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

if chLettre in ['a'..'z'] then

Ensuite tu as les fonctions AnsiMatchText et AnsiMatchStr. Voir pour plus d'infos

[Pascal Jankowski]

En complément de ce que Sébastien vient de te donner:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
if chLettre in ['a'..'z','A'..'Z','+','-','0'..'9'] then

est une combinaison possible avec []

[Lorenzo77]

je ne veux justement pas utiliser les ensembles pour pouvoir rechercher directement la valeur dans le tableau !

j'ai essayé AnsiMatchStr mais j'ai erreur de type .... evidemment, mes tables sont des tableaux de CHAR, je suis sur que ca vient de la
mais cette soluce me semble la bonne


comment faire pour transtyper un tableau de char en string temporairement ?

[Graffito]

Bonjour,

Voir les Tstringlist.

Utiliser my_Tstringlist.add(my_string) pour ajouter un element et my_Tstringlist.IndexOf(my_searched_string) pour la recherche.

[Lorenzo77]

si j'avais su ceci avant j'aurai peut etre pris cette direction mais maintenant la question est : comment faire pour transtyper un tableau de char en string temporairement ?

s'il n'existe pas de methode pour le faire je suis obligé de faire une boucle sur toutes les valeurs afin de les inserer dans un ensemble ?


---
de plus j'ai deja utilisé les TstringList mais j'ai trouvé ca tres lent pour les grandes listes