Identifier l'évènement d'une textbox dans une collection

Version imprimable

12/04/2013, 12h38
joel64230

Identifier l'évènement d'une textbox dans une collection

Bonjour, j'ai une collection de 300 textbox dans un frame; je veux intercepter l'évènement de chaque textbox (click ou textchanged); en définissant un tag pour chaque textbox, je les identifie et je lis le contenu dans "sender". Le problème, c'est que dans le "Handles" qui intercepte l'évènement, je dois mettre la liste complète des textbox:

Code:

Private Sub TextBox_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.Click, TextBox2.Click '.......

Y a t'il un moyen plus élégant et d'éviter la longue liste des 300 textbox dans le "Handles".
Je vous remercie par avance.
Cordialement.
12/04/2013, 12h58
Sankasssss

Bonjour,

il faut enlever les Handles et boucler sur tous les controles pour leurs lier l’événement via addHandler

http://msdn.microsoft.com/fr-fr/libr...=vs.80%29.aspx
12/04/2013, 13h37
Pol63

de la même manière tu aurais pu poser les 300 textboxes en 3 lignes de code plutot que de les poser à la main :aie:
12/04/2013, 18h05
joel64230

Citation:

Envoyé par Pol63

de la même manière tu aurais pu poser les 300 textboxes en 3 lignes de code plutot que de les poser à la main :aie:

Merci, je suis preneur de la méthode, il n'est jamais trop tard pour bien faire! Les créer, pas de problème, mais c'est pour les positionner en juxtaposition...Et en plus, il faut que la première box en haut à gauche soit la première dans la collection.
Cordialement.

Citation:

Envoyé par Sankasssss

Bonjour,

il faut enlever les Handles et boucler sur tous les controles pour leurs lier l’événement via addHandler

http://msdn.microsoft.com/fr-fr/libr...=vs.80%29.aspx

Merci Sankasssss, sans être débutant, je ne suis pas expert, pouvez vous me guider un petit peu, j'ai essayé, mais c'est assez flou pour moi, et je ne trouve pas le bon fonctionnement avec addHandler.
Cordialement.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
private _TxtB as new list(of textbox)
 
private sub CreateTextboxes
  for x as integer = 1 to 10
    for y as integer = 1 to 10
      dim t as new textbox
      _TxtB.Add(t)
      t.left = x * 100
      t.top = y * 20
      t.size = new drawing.size(100,20)
      AddHandler t.Click, AddressOf TextboxClick
      me.controls.add(t)
    next
  next
end sub
 
private sub TextboxClick(sender as object, e as system.Eventargs)
   dim LeTextboxCliqué as textbox = directcast(sender, textbox)
   '
end sub

sinon il existe des container de positionnement permettent de ne pas avoir à manipuler top et left (tablelayoutpanel, flowlayoutpanel etc...)

12/04/2013, 21h47
joel64230

Citation:

Envoyé par Pol63

sinon il existe des container de positionnement permettent de ne pas avoir à manipuler top et left (tablelayoutpanel, flowlayoutpanel etc...)

Merci pour l'aide, c'est ok pour l'utilisation de AddHandler; je vais maintenant fouiller autour de la création automatique des Textbox, surtout de leur positionnement par rapport aux besoins de mon projet.
Encore Merci.:ccool: