PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 2024 → Modif de texte dans une combo !
Modif de texte dans une combo !
Iniciado por Jean Serrière, ago., 05 2004 10:24 AM - Sem resposta
Publicado em agosto, 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