Blocage Combo

Posté par fabou3377 le 13/8/2006 12:45:12
Bonjour,
la procédure ci-dessous permet de remplier mon combo. J'aimerais que l'utilisateur puisse taper la valeur désirée mais que celle-ci ne correspondent uniquement à une valeur contenu dans la liste du combo. La saisie permet en fait de recherche rapidement le code couleur. Cependant il ne faut pas que l'utilisateur puisse rentrer une valeur ne faisant pas partie de la liste. Est-ce qu'il y a une astuce??

PROCEDURE _MAJComboCouleur()
// Cette procédure met à jours les champs du Combo_Famille


ResSQL est un booléen
txtREQ est une chaîne

//On établit la connexion à la base

_SQLEtablirConnexion()

// On efface tous les éléments du combo

ListeSupprimeTout(COMBO_CouleurProduit)

txtREQ="SELECT Norme +' '+ Code AS CodeCouleur FROM dbo.tb_couleurs ORDER BY Norme, Code ASC"

ResSQL=SQLExec(txtREQ,"REQ1")


SI PAS ResSQL  ALORS
	SQLInfoGene("REQ1")
	Info("Erreur sur la requête"+SQL.MesErreur)	
SINON
	
	TANTQUE SQLAvance("REQ1") =0
		ListeAjoute(COMBO_CouleurProduit,SQLLitCol("REQ1",1))	
	FIN
	
	
	
FIN

SQLFerme("REQ1")
SQLDéconnecte()

Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=17&topic_id=4476&post_id=18514