TEXTBOX AUTOCOMPLETE - ZONE DE TEXTE PRÉREMPLISSABLE LORS DE LA SAISIE UTILISATEUR [MODULE DE CLASSE]

Commentaire de PCPT le 29/10/2008 20:07:47 administrateur CS

ptit rigolo ^^

merci :p

Commentaire de us_30 le 29/10/2008 22:28:22

Bonsoir à tous,

Juste une petite remarque... en VBA, une combobox (ou listbox) possède la propriété MatchEntry qui mis sur 1 (frmMatchEntryComplete) permet de faire exactement la même chose que cette présentation. Bien sûr, il faudrait peut être bricoler qlq chose pour une textbox...
Maintenant une simple idée... Comme en vb6, cette propriété est absente (pour une combo). Ne pourrait-on pas intégrer et utiliser les contrôles de VBA sous VB6 ?

Sinon, sur le programmation en elle-même, c'est trop propre pour dire autre chose que cela est parfait... Néanmoins, plus structurellement, je me pose la question de savoir, si avec un dictionnaire plus important (env 30 000 mots) si cette programmation serait encore performante en terme de temps de recherche... peut-être qu'il faudrait mettre une stratégie de recherche, plutôt que de passer toutes la liste de mot en revue...

En extension du prog, il faudrait voir comment traiter une vraie saisie dans un traitement de texte. Cela est un peu plus compliqué que pour un simple mot...
De plus, tj en extension, voir une sélection sur les sylables en cas de faute orthographique...

10/10 !

Amicalement,
Us.

Commentaire de Charles Racaud le 29/10/2008 23:16:19

Code simple et commenté, résultat parfait.

Un petit plus : pouvoir naviguer dans la liste avec les touche haut/bas.
__
Kenji

Commentaire de neo2k2 le 30/10/2008 10:11:51

Un tout petit "nice to have":

ajouter le dictionnaire de mots sous forme d'un fichier texte externe...

Commentaire de PCPT le 30/10/2008 14:16:50 administrateur CS

merci à tous, je ne pensais pas que cette petite classe aurait tant de succès ^^


us_30 -> j'ai un doute pour les contrôles VBA... aussi sur l'utilité d'ailleurs :)
et pour un fonctionnement plus "stratégique", ce n'était pas bon besoin (1000 mots grand maximum) mais tu as tout à fait raison, j'explorerai cette piste dès que j'en aurai le temps :p


Charles Racaud -> déplacement dans la collection, pas bête du tout. pas possible dans ces conditions, je regarderai en même temps donc ;)
si possible à double usage dans ce cas : déplacement dans l'ordre de remplissage (historique de messenger par exemple), et déplacement depuis le préfixe tapé.


neo2k2 -> le remplissage par fichier, c'est le cas par la méthode FillByFile


asimengo -> la classe n'a pas à être attachée "de force" à un autre control ou avoir un tableau multidimensionnel
à toi de faire une classe qui va hériter de celle-ci et qui elle aura ton label, ou plus simplement de stocker en propriété le dernier accès à GetLikeItem, ou de passer cette fonction en public, pour ensuite aller lire ton tableaux(retour+1,2 et 3)
effectuer tes modifications enlèverait toute généricité à la classe ;)


merci à tous pour vos commentaires, n'hésitez pas, je ferai au mieux pour répondre à vos attentes

++

Commentaire de PCPT le 31/10/2008 15:54:11 administrateur CS

salut us_30,

les compo forms2..., je les avais zappé tien, et pour cause : "La Fm20.dll est  non  redistribuable"

http://support.microsoft.com/kb/224305


pour ton exemple avec une combo(box), ceci est aussi plus ou moins faisable avec les compo intrinsèques de VB6.
mettre la combo sur le style 1 (simple), ce qui lui fait ressembler à une textbox, puis à la saisie on a la navigation dans la liste par les flèches directionnelles.
çà rapproche unique l'idée, ce n'est pas non plus ce rendu que je voulais

mon envie était vraiment uniquement de la proposition d'autocomple(ti)tion, pas avec une liste déroulante qui viendrait masquer d'autres composants et qui aurait nécessité un click ou un navigation

mais si mon code t'inspire alors fais-toi plaisir :p
c'est vrai qu'un contrôle type intellisense appelable alors n'importe où, çà peut être très sympa ;)

bon courage
++

Commentaire de chapata le 03/11/2008 13:34:51

Salut à tous.
Merci pour cette source !
Est'il possible d'ajouter cette fonctionnalité en VBA ? Et quels seraient les changements au niveau du code ? Car j'ai mon form qui est identique, intégrer le module de classe, mais cela ne fonctionne pas. Et je n'ai pas d'erreur d'éxecution ....
Merci

Commentaire de chapata le 05/11/2008 13:38:58

Bonjour,
merci pour ta réponse PCPT.
J'ai effectué les changement cités, mais marche pas (suis sous VBA Access) ya des messages d'erreur.
J'ai donc fait des petits tests uniquement sur : AfComplete_Txt ...

Private Sub Form_Load()

Set AfComplete_Txt = New AfCls_TBAComplete
dim AppPath as string

AppPath = "D:\Donnees\programmation\vba\Auto complete"

With AfComplete_Txt
  Set .TBox = text1
  .FillByFile AppPath & "\mots_de_5_lettres.dat"
End With

End Sub

Quand je regarde dans les variables, j'ai bien la collection oColl des mots qui sont biens remplis, le contrôle TBox avec toutes ses propriétées, mais sur l'evenement TBox "OnKeyDown" je n'ai rien, il ne va pas chercher la private sub TBox_KeyDown.
Et je ne sais pas d'ou pourrait provenir le problème ...
Si une personne a réussit ou est calée sur ce point, je lui en serrait très reconnaissant.

PS : j'aime bien ta source, on dirait de l'AJAX, c'est l'éffet voulu :)

ChaPaTa