Discussion :

[tunizar]

Bonjour,
Sur un combo alimenté par programmation, comment rendre la recherche dessus sensible à la casse ?

Code :

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

1
2
 
ListSeek(MonCombo"SOCIéTE",True)

Et

Code :

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

1
2
 
ListSeek(MonCombo"SOCIETE",True)

Renvoient la même chose !

[yoshi570]

Dans l'aide http://doc.pcsoft.fr/fr-FR/?3049003 , on trouve:

Majuscules/Minuscules
•Si le champ est un champ Liste mémoire, la recherche ne tient pas compte des majuscules et des minuscules.
•Si le champ est un champ Liste fichier, la recherche sur les rubriques de type "Clé" tient compte des "Options de recherche" définies dans l'éditeur d'analyses (onglet "Général" de la description de la rubrique).

Donc pour ce que tu cherche a faire, il faut passer par une combo Liste fichier avec les bonne option dans l'analyse du fichier.

[tunizar]

Dans l'aide http://doc.pcsoft.fr/fr-FR/?3049003 , on trouve:


Donc pour ce que tu cherche a faire, il faut passer par une combo Liste fichier avec les bonne option dans l'analyse du fichier.

Bonjour,
Je n'ai pas d'analyse liée au projet, quant au combo il s'agit simplement d'une liste alimentée par programmation.
En tout cas au final j'ai été obligé à la sortie de ce champ combo, de parcourir la liste et la comparer à sa valeur affichée.
D'autres sont le bienvenu

[Invité]

En tout cas au final j'ai été obligé à la sortie de ce champ combo, de parcourir la liste et la comparer à sa valeur affichée.

Le mieux serait de passer par des glien, c'est plus sécurisant

[tunizar]

Le mieux serait de passer par des glien, c'est plus sécurisant

chat alors !
cha marche pas !!
lol
j'ai essayé

[Invité]

chat alors !
cha marche pas !!
lol
j'ai essayé

tu procèdes comment?

En faisant quelque chose comme cela:

Code windev :

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

1
2
ListeAjoute(MonCombo"SOCIéTE"+glien("SOC1"))
ListeAjoute(MonCombo"SOCIETE"+glien("SOC2"))

Si tu fais

Code windev :

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

ListeCherche(MonCombo, "SOC1")

et

Code windev :

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

ListeCherche(MonCombo, "SOC2")

Tu auras 2 résultats différents

[tunizar]

Bonjour,
Pour glien je fais ça

Code :

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

ListAdd(MonCombo,"SOCIETE"+gLink("SOCIETE"))

[Invité]

J'ai fais le test suivant en version 21 (39n) :

Code windev :

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

1
2
3
4
5
6
7
8
ListeAjoute(COMBO_SansNom1,"SOCIETE"+gLien("SOCIETE"))
ListeAjoute(COMBO_SansNom1,"SOCIéTE"+gLien("SOCIéTE"))
gLienActive(COMBO_SansNom1,Vrai)
LOCAL
	l_Resultat1 est un entier=ListeCherche(COMBO_SansNom1,"SOCIETE",Vrai)
	l_Resultat2 est un entier=ListeCherche(COMBO_SansNom1,"SOCIéTE",Vrai)
 
Info(l_Resultat1,l_Resultat2)

Les résultats sont en effet identiques, je fais la migration vers 59n, je refais le test et je contacte le support technique pour reporter cela, mais pour l'instant, pour y remédier, il faudrait mettre des valeurs de glien différents sans prendre en compte les caractères accentués, ou bien, faire une recherche "à la main"

[tunizar]

Bonjour,
vous avez toute à fais raison "faire une recherche à la main"
Je pense que je surchargerai la fonction

Code :

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

ListeCherche

Est ce que c'est bonne idée ?

[LeonCosnyd]

Et en transformant vos chaines en ASCII ?

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
 
PROCEDURE ConvertirEnAscii(sChaine est une chaîne)
	sChaineAscii est une chaîne
	POUR i = 1 _A_ Taille(sChaine)
		sChaineAscii += Asc(sChaine[[i]])		
	FIN
	RENVOYER(sChaineAscii)
FIN
 
ListeAjoute(COMBO_SansNom1,"SOCIETE"+gLien(ConvertirEnAscii("SOCIETE")))
ListeAjoute(COMBO_SansNom1,"SOCIéTE"+gLien(ConvertirEnAscii("SOCIéTE")))
gLienActive(COMBO_SansNom1,Vrai)
 
l_Resultat1 est un entier=ListeCherche(COMBO_SansNom1,ConvertirEnAscii("SOCIETE"))
l_Resultat2 est un entier=ListeCherche(COMBO_SansNom1,ConvertirEnAscii("SOCIéTE"))
 
Info(l_Resultat1,l_Resultat2)