Discussion :

[fredalva]

Bonjour à tous,

J'aurai besoin pour un projet de créer un champ de saisie pour permettre à l'utilisateur de saisir les 3 premières lettre de sa ville et ainsi lui afficher une liste des villes commençant par ces lettres.Puis lorsqu'il sélectionne une ville dans la liste son nom s'affiche dans le champ de saisie.

En fait il faudrait que la liste de mette à jour en fonction du nombre de lettres que l'utilisateur tape(A partir de 3 pour ne pas avoir trop de résultats).
J'ai parcourus la doc et les forums mais rien d'explicite la plupart utilise des combo reliés.


Merci pour votre aide

[SevenSoftware]

Bonjour,

Il y a plusieurs solutions:

Soit c'est une liste fichier liée au fichier CodePostal (par ex.):
la rubrique parcourue de la combo est Ville
Dans les déclaration globales de la page, faire Liste_Ville..fichierparcouru=""
(ça évite d'initialiser la combo avec toutes les villes !)
Dans le code de modification du champ de saisie:

Code :

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

1
2
3
4
5
6
7
 
Si moimême..taille>=3
 HFiltreCommencepar(CodePostal,Ville,MoiMême)
 Liste_Ville..fichierparcouru="CodePostal"
SINON
 Liste_Ville..fichierparcouru=""
FIN

a chaque modif de ..fichierparcouru, la liste est actualisée.
Ensuite, dans le code de sélection d'une ligne de la liste,
affecter le champ de saisie avec ListeVille..ValeurAffichée

Autre méthode :
La liste est une liste mémoire
dans le code de modification du champ:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
req est une source de données
SI MoiMême..taille>=3
  SI PAS HExecuteRequeteSQL(req,"SELECT Ville FROM CodePostal WHERE Ville LIKE '"+MoiMême+"%'"
    Erreur(HErreurInfo())
    RETOUR
  FIN
  ListeSupprimeTout(Liste_Ville)
  POUR TOUT req
    ListeAjoute(Liste_Ville,req.Ville)
  FIN
FIN

Même code que précédemment pour la sélection d'une ligne de la liste.

Patrick