bonjour à tous ,je rencontre un problème avec une combo avec saisie + fenetre popup.
la fenêtre popup contient une table issu d'une requete.
Lorsque je saisie dans la combo, la fenetre popup avec la table s'affiche ce qui est normale et lorsque je double clique sur un élément de la table ,la combo ne se ferme pas ,mais lorsque je clique ailleurs sur l'interface (pas sur les champs de la fenêtre) la combo se ferme avec la fenetre popup et le prompt est toujours dans la combo.
Cependant quand je veux cliquer sur un bouton de la fenetre la combo s'ouvre avec la fenêtre popup.
mon problème est: j'aimeraie que si la combo s'ouvre et que je double clique sur une ligne de la fenêtre popup la combo doit se fermer et me
permettre de pouvoir cliquer sur tout champs de la fenetre.
voici mes codes :
Pour la fenêtre popup + table:
Déclaration Globale de FEN_Popup1
Fermeture de FEN_Popup1
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 PROCEDURE RempliTable(variabl) TANTQUE PAS HEnDehors() TableAjouteLigne(TABLE_REQ_CompteClient_Param1,REQ_CompteClient_Param1.AdressClient,REQ_CompteClient_Param1.CodCompte,... REQ_CompteClient_Param1.CodeClient,REQ_CompteClient_Param1.Contact,REQ_CompteClient_Param1.Contact2,... REQ_CompteClient_Param1.idcateg_clt,REQ_CompteClient_Param1.idClient,REQ_CompteClient_Param1.idCompte,... REQ_CompteClient_Param1.Identite,REQ_CompteClient_Param1.mailClient,REQ_CompteClient_Param1.MontantVerse,... REQ_CompteClient_Param1.NomClient,REQ_CompteClient_Param1.PrenomClient,REQ_CompteClient_Param1.Solde ) HLitSuivant(REQ_CompteClient_Param1) FIN
pour la Table sur la fenêtre popup
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 ComboFerme(FEN_main2.COMBO_Combo2) DonneFocus(FEN_main2.BTN_Fich_Depot)
Bouton gauche double-clic(WM_LBUTTONDBCLICK)
pour la combo:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 FEN_main2.SAI_Idclient_Retour=COL_IdClient FEN_main2.SAI_IdClients=COL_IdClient FEN_main2.COMBO_Combo2=COL_Identite Ferme(FEN_Popup1) RENVOYER COL_Identite
A chaque modification de COMBO_Combo2
Merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 HExécuteRequête(REQ_CompteClient_Param1,hRequêteDéfaut,COMBO_Combo2) OuvrePopupPosition(FEN_Popup1,poSelonChamp,COMBO_Combo2,Val(COMBO_Combo2))
Partager