PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WINDEV 2024 → Modif de texte dans une combo !
Modif de texte dans une combo !
Started by serriere, Aug., 05 2004 10:24 AM - No answer
Posted on August, 05 2004 - 10:24 AM
Bonjour à tous!
Prenons une combo alimentée par une requête ou directement par fichier.L'utilisateur
souhaite ajouter une partie de texte à la suite d'un élément selectionné.
Exemple : toto
ona joute cette proposition :tata pour obtenir dans la prochain déroulant
: toto
toto tata
Mon code fonctionne :

VL_Responsable est une chaîne
VL_Responsable = ""
VL_Responsable = SansEspace(Combo_Responsable..ValeurAffichée)
VLR, Vl_tr sont des booléen

SI VL_Responsable<>""
VLR = HLitRecherchePremier(Responsable,Responsable,VL_Responsable)

SI PAS HTrouve() ALORS

SI OuiNon("Ce nom n'est pas un élément de la liste","Souhaitez-vous l'ajouter?")
= Oui ALORS
Responsable.Responsable = Vl_Responsable
HAjoute(Responsable)

FIN

FIN
FIN

Le problème ?
Avec deux combos identiques : même description exactement
l'une accepte l'effet de la barre d'espace pour entrer "tata", l'autre "bloque"
sur l'espace. Il faut pour ajouter du texte taper la première lettre "t"
revenir devant le "t" et là la barre d'espace fonctionne. Ceci sur 7,5 et
8 .
Merci de votre patience
JS