Bonjour,

J'ai un petit souci de recherche incrémentale qui ne fonctionne pas...

Je veux afficher dans une table le premier film d'un fichier soit en cherchant par code, soit par titre.

Quand on entre dans le champ "Code", et qu'on commence à taper un code, la table affiche les films en commençant par le code indiqué ; quand on passe au champ "Nom" pour rechercher par nom, la table liée au fichier affiche en fonction du nom.

J'utilise la propriété "Filtre" de la table et "Rubrique parcourue" qui change selon que l'on entre dans la zone "Code" ou dans la zone "Nom".

Et ça ne fonctionne pas... la table reste "blanche" (elle est remplie en mode édition de programme).

Quelqu'un aurait-il une idée sur l'origine du problème ?

Merci...

-- André

Bonjour andré,

J'utiliserais plutôt la fonction "hlitrecherche" sur le fichier indéxé suivant (code ou nom).
Dans l'analyse, ton fichier "film" doit être indéxé sur code et nom.

Dans la variable "recherchecode"

"A chaque modification" tu mets ceci :

hlitrecherche(film,code,recherchecode)
tableaffiche(nomdela table,taCourantPremier)


Tu fais la même chose avec la variable rechercheNom



@+
chonchon,

Bonjour André

Avant de modifier les propriétés, il faut d'abord les libérer - cfr Propriétés

// TableContact est une table fichier
// Code repris dans le sélecteur
// ... A chaque modification
// gsCléParc : variable globale à la fenêtre

TableContact..Filtre = ""
TableContact..RubriqueParcourue = ""
TableContact..FichierParcouru = ""

SELON MoiMême // Sélecteur de choix
CAS 1 : gsCléParc = "Nom"
CAS 2 : gsCléParc = "Ville"
CAS 3 : gsCléParc = "CodePostal"
CAS 4 : gsCléParc = "Activité"
FIN

TableContact..RubriqueParcourue = gsCléParc
TableContact..FichierParcouru = "Contact"

Cela fonctionne sans problèmes

J'espère avoir répondu à ton problème

Bon développement

A+

Albert

Merci à tous les deux pour votre aide.

Je n'ai cependant pas pu résoudre le problème... et je bute "bêtement" sur ce qui doit être simple.

-J'ai la version 80315P.
-Mon fichier "Films" est bien indexé sur Code et Titre
-Ma table est liée au fichier "Films"
-Mes deux champs de saisie "sCodeFilm" et "sTitreFilm" comportent le code suivant (corrigé d'après vos messages)

-- Entrée de sCodeFilm
Table_Films..RubriqueParcourue = ""
Table_Films..RubriqueParcourue = Films.TitreFilm

Table_Films..Filtre = ""
Table_Films..Filtre = sTitreFilm
TableAffiche(Table_Films,taCourantPremier)

-- A chaque modification de sTitreFilm
Table_Films..Filtre = ""
Table_Films..Filtre = sTitreFilm
TableAffiche(Table_Films,taCourantPremier)

idem pour sCodeFilm, avec le champ CodeFilm.

Le code devrait fonctionner ainsi:
je commence à taper dans le champ code, la table affiche les films dont le code commence par le code saisi, et s'affine au fur et à mesure de la frappe.
Si je "passe" dans le champ de saisie Titre, la table est retriée selon le titre et le même principe d'affichage selon les caractères tapés est repris.

Ma table reste désespérément vierge à l'exécution.
Si je clique sur la loupe ou l'entête de tri, par contre, elle se remplit bien.... je ne comprends plus !

J'espère avoir été assez clair... merci en tout cas pour vos idées !

-- André

Salut,
a tout hasard, est ce que tu as essayé de redessiner ton tableau ?
A+

Je viens de redessiner le tableau... sans effet.

J'ai aussi retiré les lignes
--entrée dans sTitreFilm
Table_Films..RubriqueParcourue = ""
Table_Films..RubriqueParcourue = Films.TitreFilm

(et idem pour sCode).

Ca ne marche pas mieux, SAUF... si je clique d'abord sur l'entête de colonne pour la trier. Et là ça fonctionne !

J'avoue ne pas bien comprendre... et j'aimerais m'affranchir du clic de souris pour proposer la recherche...

-- André

Bonjour André,

Votre code ne saurait pas fonctionner correctement

-- Entrée de sCodeFilm
>Table_Films..RubriqueParcourue = ""
>Table_Films..RubriqueParcourue = Films.TitreFilm

>Table_Films..Filtre = ""
>Table_Films..Filtre = sTitreFilm
>TableAffiche(Table_Films,taCourantPremier)

-- A chaque modification de sTitreFilm
>Table_Films..Filtre = ""
>Table_Films..Filtre = sTitreFilm
>TableAffiche(Table_Films,taCourantPremier)

Il faut bien respecter l'ordre des codes

L'aide en ligne précise bien
******************************************************
Modifier les propriétés liées au parcours d'une table, liste ou combo fichier

Pour modifier les propriétés RubriqueParcourue, Filtre et FichierParcouru, il est conseillé de :

1. Stopper le parcours en affectant une chaîne vide ("") à la propriété FichierParcouru.

2. Modifier les propriétés nécessaires.

3. Relancer le parcours avec la propriété FichierParcouru.

Cette méthode permet d'optimiser les modifications réalisées. En effet, chacune des modifications effectuée individuellement relance le parcours. Ces opérations peuvent vite devenir lentes sur des fichiers de taille importante.
****************************************************

Vous devriez revoir et suivre correctement le code que je vous ai indiqué et qui fonctionne et de surcroit tres rapide

Rappel :

en premier lieu

Table_Films..FichierParcouru = ""
Table_Films..RubriqueParcourue = "NomRubrique"
donc "TitreFilm"
Table_Film.. FichierParcouru = "NomFichier"
donc "Film"

Il faut reprendre respectivement dans l'ordre
le nom de la rubrique de parcours puis le nom du fichier

Supprimer > TableAffiche(Table_Films,taCourantPremier)

Le parcours de la table est relancé par
Table_Films..FichierParcouru = "Film"

@+
Albert

Bonjour André

Nom du fichier : Contact
Nom de la rubrique : Nom < clé de parcours >
Nom de la table fichier : Table_Contact

Recherche introduite dans un champ de saisie dont le code est

// A chaque modification
Table_Contact..FichierParcouru = ""
Table_Contact..RubriqueParcourue = "Nom"
Table_Contact..Filtre = MoiMême
Table_Contact..FichierParcouru = "Contact"

Si tu respectes l'ordre cette procédure toute simple
tu n'auras aucun problème

@+
Albert

ReBonjour André

Excuse moi, mais j'ai oublié une ligne de code dans mon exemple.

En effet, il ne faut pas perdre de vue que comme il s'agit d'un filtre, il faut le désactivier notamment si tu changes de clé de parcours

Nom du fichier : Contact
Nom de la rubrique : Nom // Clé de parcours >
Nom de la table fichier : Table_Contact

Recherche introduite dans un champ de saisie dont le code est :

// A chaque modification
Table_Contact..Filtre = "" // désactive le filtre
Table_Contact..FichierParcouru = ""

Table_Contact..RubriqueParcourue = "Nom" // Clé de parcours
Table_Contact..Filtre = MoiMême
Table_Contact..FichierParcouru = "Contact"

@+
Albert

Bonjour.
Quand on vois que les outil de recherches non sont utilisés...
ici même 'Filtre Table' et lancer donne cet article paru il y a fort fort longtemps.

Bonjour Albert,

Merci pour cette correction, qui effectivement fonctionne. Ca me semblait un peu bête de devoir "déconnecter" le fichier pour changer de filtre, mais la solution est à l'évidence là.
Encore tous mes remerciements pour ton aide.

Cher R&B,
Je fais partie de ceux qui cherchent longtemps et en profondeur avant de poser une question... et la recherche dépend aussi des mots-clés qu'on utilise.
Désolé si j'ai provoqué ton couroux, mais il me semble qu'un forum sert à s'entraider...
Et ça ne m'empêche pas de vous féliciter pour ce site des plus utiles !

-- André