PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV (versões anteriores) → Urgent : Réaliser une complétion automatique de saisie
Urgent : Réaliser une complétion automatique de saisie
Iniciado por Christian Cherbuy, ago., 30 2004 9:51 AM - 3 respostas
Publicado em agosto, 30 2004 - 9:51 AM
Bonjour,

Comment faire en sorte qu'un champ de saisie fonctionne en complétion automatique
en puisant dans HyperFile ?

Par avance, grand merci.
Publicado em agosto, 30 2004 - 11:44 AM
Avec Windev 5.x ce n'est pas prévu.
Le seul moyen est de faire les recherches dans le code de modification
de votre champ de saisie et d'afficher le résultat dans le champ si vous
avez trouvé un enregistrement correspondant. Toutefois, vous n'aurez pas
la meme convivialité qu'avec windev 8


Christian Cherbuy wrote:
Bonjour,

Comment faire en sorte qu'un champ de saisie fonctionne en complétion automatique
en puisant dans HyperFile ?

Par avance, grand merci.




Publicado em agosto, 30 2004 - 3:28 PM
C'est automatique en 8. y a une case à cocher.

A+
Adrien.


"Christian Cherbuy" <christian.cherbuy@devnetpro.fr> wrote:


Bonjour,

Comment faire en sorte qu'un champ de saisie fonctionne en complétion automatique
en puisant dans HyperFile ?

Par avance, grand merci.




Publicado em agosto, 30 2004 - 6:14 PM
"Christian Cherbuy" <christian.cherbuy@devnetpro.fr> a écrit dans le message
de news:4132c04c$1@news.pcsoft.fr...


Bonjour,

Comment faire en sorte qu'un champ de saisie fonctionne en complétion

automatique
en puisant dans HyperFile ?

Par avance, grand merci.

// Ptit bout de code qui marche en 5.5 et + si affinité
A Chaque Modification du champ MonChamp

SI MonChamp <> "" ALORS
HLitRecherche(MaBase,MaBase.Rubrique,MonChamp)
SI HTrouve ALORS
St est une chaîne = MaBase.Rubrique
HLitSuivant(MaBase,MaBase.Rubrique)
SI PAS HTrouve ALORS

Sel1 est un entier = Taille(MonChamp)
Sel2 est un entier = Taille(App)

MonChamp = St

// Modifier la sélection :
em_setsel est un entier = 0xB1

// sélection du caractère X à Y
SendMessage(Handle("MonChamp"), em_setsel , Sel1 , Sel1+Sel2 )
FIN
FIN
FIN

Cordialement
Vincent Barré