Editeur Javascript - Auto-complétion-

Version imprimable

13/04/2007, 09h56
Appwal

Editeur Javascript - Auto-complétion-

Bonjour à tous,

Je travaille actuellement sur un editeur de code javascript et je souhaiterais y intégrer un outil d'auto-complétion comme celui présent dans VB (lorsqu'on tape monObjet. )...

Je ne vois pas vraiment par ou attaquer le problème... Donc si jamais vous avez des pistes... ;)

Merci d'avance
13/04/2007, 10h25
La Praline

Salut,

J'ai trouvé ceci dans la FAQ...
Estce que cela te convient ?
13/04/2007, 10h36
Appwal

Je recherche plutôt pour une Textbox.

Merci quand même ;)
13/04/2007, 10h45
La Praline

L'adaptation de ce code pour ue TextBox n'est pas faisable ???
13/04/2007, 10h48
Appwal

Je suis entraint d'étudier la chose... :P

Le truc, c'est que dans une textbox il fut tester le debut du mot en cours (donc jusqu'au dernier espace) contrairement à la combobox ou il suffit de tester combo.text

Sinon comment pourrais-je m'y prendre pour avoir la même petit box que dans VB pour l'auto completion?
13/04/2007, 11h08
La Praline

Salut,

Bon j'ai pris deux secondes pour chercher un peu partout sur mon ami :google: et voici pelle-mêle trois lien interessant, je pense, à fouiller...
J'espère que tu parles un minimum anglais sinon ca risque d'être raide...

http://www.microsoft.com/mspress/books/index/4068.aspx

http://www.tech-archive.net/Archive/.../msg00106.html

http://www.vbforums.com/showthread.php?t=342035

Cordialement
13/04/2007, 11h14
Appwal

Merci pour ces liens.

J'avais déjà fouillé un peu sur vbforums mais j'avais zappé ce topic... :lol:
13/04/2007, 11h20
La Praline

hihi

Ben à priori il se sert d'une fonction faite en C++ dans son code en VB6... enfin bon, je te laisse déguster ça ^^
13/04/2007, 11h29
Appwal

Oué.. :lol:

Sinon une idée pour la petite box pour afficher les différentes possibilités de complétion??
13/04/2007, 12h27
Vld44

bah tu mets une textbox sur plusieurs niveaux ....... Positionnée selon le curseur -.-
13/04/2007, 13h29
La Praline

Ou même si tu veux rendre le truc un peu classe, tu fais des cadres de textbox "design" ;)
13/04/2007, 13h45
OhMonBato
ben pourquoi ne pas mettre une listbox à laquelle tu donnes le focus ?

Et tu mets ça en plus pour quand meme continuer la saisie des caractères au clavier (enfin un truc du style) :
Code:

1 2 3 Private Sub List1_KeyPress(KeyAscii As Integer) Text1 = Text1 & Chr(KeyAscii) End Sub
13/04/2007, 13h52
La Praline

Je sais que ce n'est pas mon post OhMonBato mais... Je comprend pas ton résonnement là:oops:

Tu pourrais pas m'expliquer (et pis ca pourrait servir à d'autre qui sait^^... la dernière fois que j'ai dis ça, t'as été obligé de poster dans la FAQ !!! mais t'as vu, hier encore on a eu la même question!!! LA PRALINE PRESIDENT !!!:aie: )

Merci d'avance ;) (tu peux m'envoyer balader si t'as pas envie, tu l'sais ;) )
13/04/2007, 13h59
OhMonBato

8O
Là c'est moi qui comprend rien !!
votre auto complétion c'est bien le fait de taper dans l'éditeur de VB et d'avoir une listbox qui s'affiche pour aider à compléter ce qu'on veut mettre ??

Donc l'éditeur VB c'est bien une zone texte en quelque sorte qui affiche une listbox pour aider à compléter ce qu'on tape non ? C'est moi qui suis à côté de la plaque ou quoi là ?
13/04/2007, 15h00
La Praline

Non non l'idée c'est ça, et j'avais compris que tu avais compris :fou:

Seulement, et j'ai oublié de le préciser, excuse-moi, c'est ton code qui, dans mon cerveau, pêche...
Je ne comprend pas comment avec ce petit bout de code, ca fait une auto complétion...

~~ La Praline ~~
... un choco à coté de ses pompes ;)
13/04/2007, 15h06
OhMonBato

J'ai jamais dit que ca faisait une auto completion, je dois pas parler français...

Je disais simplement que quand le listbox à le focus ben si tu tapes, il ne se passe rien dans le controle text, pour que les lettres continuent de s'afficher dans le controle text faut ajouter un truc du style, c'est tout.

Voilà peut être de quoi te donner une idée pour ton auto complétion. La liste déroulante n'est pas positionnée correctement mais c'est juste histoire de donner une piste de départ éventuellement.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
 Option Explicit
Dim DebMot As Integer
Dim FinMot As Integer
 
Private Sub List1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 13, 32
  Text1 = Left(Text1, FinMot) & List1.List(List1.ListIndex)
  Text1 = Text1 & Chr(KeyAscii)
  List1.Visible = False
Case 8
  Text1 = Left(Text1, Len(Text1) - 1)
Case Else
  Text1 = Text1 & Chr(KeyAscii)
  Debug.Print KeyAscii
End Select
Text1.SelStart = Len(Text1)
End Sub
 
Private Sub Text1_Change()
Dim Ch As String
 
DebMot = InStrRev(Text1, " ")
FinMot = InStrRev(Text1, vbCrLf)
If FinMot < DebMot Then List1.Visible = False : Exit Sub
FinMot = InStrRev(Text1, ".")
If FinMot < DebMot Then List1.Visible = False : Exit Sub
Ch = LCase(Mid(Text1, DebMot + 1, FinMot - DebMot))
Select Case Ch
Case "me."
  CompleteList "me"
Case "text1."
  CompleteList "text1"
Case Else
  List1.Visible = False
End Select
If List1.Visible = True Then List1.SetFocus
End Sub
 
Public Sub CompleteList(Ch As String)
List1.Visible = True
Select Case Ch
Case "me"
  List1.Clear
  List1.AddItem "ActiveControl"
  List1.AddItem "BackColor"
  List1.AddItem "BorderStyle"
  List1.AddItem "Caption"
  List1.AddItem "Circle"
  List1.AddItem "Cls"
  List1.AddItem "DrawStyle"
  List1.AddItem "Enabled"
  List1.AddItem "Font"
Case "text1"
  List1.Clear
  List1.AddItem "Alignment"
  List1.AddItem "Appearance"
  List1.AddItem "BorderStyle"
  List1.AddItem "DataField"
  List1.AddItem "DataFormat"
  List1.AddItem "Enabled"
  List1.AddItem "DrawStyle"
  List1.AddItem "Height"
  List1.AddItem "Index"
End Select
End Sub

16/04/2007, 09h26
Appwal

Merci de votre aide ;)

Par contre, comment pourais-je faire pour placer la listbox au niveau du curseur de la textbox??
16/04/2007, 10h25
La Praline

Bonjour,

Je pense que ça doit être possible en te servant des coordonnées X et Y de la souris dans ton MouseMove...

Et tu donne ces coordonnées au propriétés Left et Top de ta ListBox...
Avec un peu de bidouille ca doit se faire facilement...

Cordialement
16/04/2007, 10h36
Appwal

Je ne pense pas que la position du curseur de la textbox puisse se retrouver à partir de la position du curseur de la souris non?
16/04/2007, 10h51
OhMonBato

Je ne pense pas non plus.
Je me demande si tu ne vas pas devoir chercher le numéro de ligne (c'est un controle richTextBox ?), ce qui te permettrait deja de placer verticalement ta liste, pour l'horizontal je n'ai pas d'idée sur le moment et je suis un peu à la bourre aujourd'hui, désolé de ne pouvoir aider plus.
16/04/2007, 10h56
Appwal

Mon contrôle est une TextBox..

Par contre, lorsque l'on tape du texte dans une TextBox, le curseur de la souris disparait. Donc peut-être que de récuperer les coordonnées de la souris marcherait quand même!

Je vais tester

Edit: marche pas... :cry:
16/04/2007, 11h32
La Praline

Arf !!

Si le curseur ne disparaissait pas, tu pourrais t'en servir pour l'affichage ??
Je demande ça car il m'a semblé voir qu'on pouvait choisir ou non si le curseur disparaissait durant la frappe...
16/04/2007, 11h39
Appwal

Non, le but est d'afficher la listbox au niveau du mot courant, comme dans l'editeur VB6
16/04/2007, 13h23
La Praline

Oui oui, ca j'avais compris. Et justement!
Je voulais dire que si tu connais la position du curseur, tu peux t'en servir pour afficher ta ListBox d'auto-complétion...

Et c'est donc pour ça que je te signalais qu'il me semble qu'on peut faire afficher le curseur durant la frappe...
Tu comprend mieux?
Ou alors c'est toujours moi qui suis à coté de mes pompes(chose largement possible^^)?

Cordialement
16/04/2007, 13h34
Appwal

Si je te suis bien, la listbox sera affichée au niveau de la souris?

Si c'est ca, c'est pas toujours idéal, la souris n'est pas forcément au centre de l'écran..

Ou alors je suis à coté de la plaque (chose encore plus possible chez moi :lol: )
16/04/2007, 13h36
OhMonBato

Ce n'est peut etre qu'un détail mais je persiste à penser qu'un RichTextBox serait plus adapté (ne serait-ce que pour le formatage des couleurs par exemple si tu veux le faire plus tard).
Sinon peut etre que ça pourrait te donner un coup de main de connaitre le N° de ligne et de Colonne de ton curseur (qui n'est pas le curseur de la souris) ? Si oui je crois que à cette adresse il y a le truc fait pour :

http://blackbeltvb.com/index.htm?free/rtbpos.htm
16/04/2007, 13h53
Appwal

Ok je vais essayer avec une RichTextBox.

Par contre, je ne pense pas pouvoir afficher ma listBox avec les numéros de colonne et de ligne dans la richtextbox
16/04/2007, 14h03
OhMonBato

Ben peut etre que si quand meme, a toi de te depatouiller avec mais si tu as le N° de colonne, tu peux savoir ou placer ta listebox horizontalement non ?
Si tu as le N° de ligne et que tu sais quelle ligne est affichée en haut du richtext box, tu dois pouvoir calculer la position verticale en coordonnées "feuille".
Y'a peut etre un moyen plus simple mais perso c'est tout ce que je vois.
16/04/2007, 14h43
La Praline

Citation:

Envoyé par Appwal

Si je te suis bien, la listbox sera affichée au niveau de la souris?

... non...

Citation:

Envoyé par Appwal

Ou alors je suis à coté de la plaque (chose encore plus possible chez moi :lol: )

... en effet :mouarf:

Citation:

Envoyé par OhMonBato

N° de ligne et de Colonne de ton curseur (qui n'est pas le curseur de la souris)

Lui, il a bon lui !!! :king:

C'est les coordonnées du curseur de frappe de texte qui importe. Bien évidement pas celui de la souris^^

Je pense aussi("SLURP !!!"... pour ceux qui connaissent la blague...) qu'il va falloir que tu ailles dans cette direction, si tu connais l'emplacement de ton curseur DE FRAPPE (:lol:), tu connais l'emplacement de ta ListBox d'auto complétion...
16/04/2007, 14h56
Appwal

Merci de votre aide, mon problème est résolu ;)

Voici un petit lien qui m'a également aidé