Data binding - Pour lier une textbox à une propriété.

Version imprimable

09/09/2011, 13h14
Gualino

Data binding - Pour lier une textbox à une propriété.

Bonjour à tous,

J'essaie de binder des propriétés à des contrôles de windows form.

J'ai cette ligne de commande comme modèle:

Code:

myMainForm.txtmass.DataBindings.Add(New Binding("Text", myCar, "_mass", True, DataSourceUpdateMode.OnPropertyChanged, 0))

Mais elle est trop contracter pour moi et j'ai du mal à la décrypter.

Quelqu'un pourrait il me la décomposer en plusieurs lignes?

Code:

1
2
3
myBinding As Binding 
myBinding=New Binding("Text", myCar, "_mass", True, DataSourceUpdateMode.OnPropertyChanged, 0)
myMainForm.txtmass.DataBindings.Add(myBinding)

Pense pas que ca va t'aider bcp

09/09/2011, 13h47
Gualino
Bonjour Benoit,

Si çà va dejà mieux...

çà veux donc dire aussi
Code:

1 2 myBinding as New Binding("Text", myCar, "_mass", True, DataSourceUpdateMode.OnPropertyChanged, 0) myMainForm.txtmass.DataBindings.Add(myBinding)
C'est la signature n°4, avec 6 paramètres.

et c'est ressemble dejà plus à l'exemple de l'aide:
Code:

1 2 3 4 Dim data1 As New MyData(DateTime.Now) Dim binding1 As New Binding("MyDataProperty") binding1.Source = data1 Me.myText.SetBinding(TextBlock.TextProperty, binding1)
Encore que...il n'existe aucune signature de binding qui ne compte qu'un seul paramètre. Pas terrible c'est aide en ligne...
09/09/2011, 14h41
Gualino
En utilisant la premiere signature de "binding"

J'ai fais ceci:
Code:

1 2 Dim data1 As New SetupSpreadsheet.ChassisTab Dim binding As New Binding("Text", data1, "TotalMass")
data1 est une instance de la classe ChassisTab qui contient la propriété TotalMass dont le nom est en type string en 3e pamrametre de la methode binding.
Text est le nom de la propriété du controle
data1 est le l'objet qui contient la propriété à binder.

Mais il me manque la suite que je ne comprend pas:

Code:

myMainForm.txtmass.DataBindings.Add(myBinding)

Au final c'est pour binder une propriété à une textbox
09/09/2011, 14h45
BenoitM

1)Tu crées le Binding désiré
Ici une propriété "Text" doit-être remplie avec la propriété TotalMass de l'objet data1

Code:

New Binding("Text", data1, "TotalMass")

2)Tu assignes ce binding à un composant ici le control txtmass

Code:

partmyMainForm.txtmass.DataBindings.Add(myBinding)

et la mise-à-jour du binding s'effectue quand
DataSourceUpdateMode.OnPropertyChanged est lancé
donc quand tu change la valeur de TotalMass il faut faire un NotififyPropertyChange
09/09/2011, 15h16
tomlev
Citation:
Envoyé par Gualino

et c'est ressemble dejà plus à l'exemple de l'aide:

Code:

1 2 3 4 Dim data1 As New MyData(DateTime.Now) Dim binding1 As New Binding("MyDataProperty") binding1.Source = data1 Me.myText.SetBinding(TextBlock.TextProperty, binding1)

Encore que...il n'existe aucune signature de binding qui ne compte qu'un seul paramètre. Pas terrible c'est aide en ligne...
Ce n'est pas l'aide qui n'est pas terrible, c'est toi qui sais pas l'utiliser ;)
L'exemple que tu montres concerne les bindings WPF, pas ceux de Windows Forms... La doc des bindings WinForms est ici :
http://msdn.microsoft.com/en-us/libr...s.binding.aspx
09/09/2011, 15h27
BenoitM

En même temps avec les différentes versions du framework,
les composants Wpf Form,
les composants Windows Form,
les composants Web,
les composants Silverlight,

l'aide devient de plus en plus difficile à utiliser :?
ou du moins faire bien attention :roll:
09/09/2011, 15h46
Gualino

Citation:

Envoyé par tomlev

Ce n'est pas l'aide qui n'est pas terrible, c'est toi qui sais pas l'utiliser ;)
L'exemple que tu montres concerne les bindings WPF, pas ceux de Windows Forms... La doc des bindings WinForms est ici :
http://msdn.microsoft.com/en-us/libr...s.binding.aspx

Effectivement...
09/09/2011, 15h49
Gualino
Citation:

Envoyé par BenoitM

En même temps avec les différentes versions du framework,
les composants Wpf Form,
les composants Windows Form,
les composants Web,
les composants Silverlight,

l'aide devient de plus en plus difficile à utiliser :?
ou du moins faire bien attention :roll:

oui pour moi c'est:

Chinois

I) Chinois
Chinois, chinois with chinois and chinois so chinois:
- Chinois
- Chinois
- Chinois
09/09/2011, 16h18
Gualino
J'ai essayé ceci:
Code:

1 2 3 4 Dim data1 As New SetupSpreadsheet.ChassisTab Dim binding As New Binding("Text", data1, "TotalMass") TotalMass_tbox.DataBindings.Add(binding)
et ceci:

Code:

TotalMass_tbox.DataBindings.Add("Text", Chassis, "TotalMass")

et dans les deux cas j'ai:

Citation:

This causes two bindings in the collection to bind to the same property.
Parameter name: binding

Pfffffffffffff.............:calim2:

Quelle collection?
Quels 2 bindings?
09/09/2011, 16h25
BenoitM

euh faut mettre qu'un des 2 ;)
09/09/2011, 16h28
Gualino

Citation:

Envoyé par BenoitM

euh faut mettre qu'un des 2 ;)

un des deux quoi? ce sont deux code différents que je n'ai pas utilisé ensemble.
09/09/2011, 16h40
BenoitM

ah bizzare :)

fait une recherche sur "DataBindings" pour voir si il y en aurai pas un qui traine et sur TotalMass_tbox.Text
09/09/2011, 17h04
Gualino

çà aurait pu être çà car avant j'avais tenter de faire du binding avec le menu, mais j'avais bien tout supprimer, j'ai fait une recherche sur tout le projet, mais je n'ai rien trouvé.

J'ai trouvé pourquoi j'avais:

Citation:

This causes two bindings in the collection to bind to the same property.
Parameter name: binding

==>C'est une histoire de "Clear"

Mais j'ai un autre problème:

J'ai fait le bind sur une textbox qui donne une valeur de sortie

Si je fais:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
  Private Sub calling() Handles MyBase.Load
        Call DisplayChassisTabResults()
    End Sub
 
    Private Sub DisplayChassisTabResults() Handles Button1.Click
 
        Dim Chassis As New SetupSpreadsheet.ChassisTab
 
PercentageOfAntiRollStiffnessFromSpring_Front_tbox.DataBindings.Clear()
 
        Dim binding As New Binding("Text", Chassis, "PourcentageOfAntiRollTorqueCommingFromSpring_Front")
        PercentageOfAntiRollStiffnessFromSpring_Front_tbox.DataBindings.Add(binding)

La textbox bindé, donne le résultat au chargement du form, mais au click sur le bouton 1, elle affiche "Non numérique".

et si je fais :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
  Private Sub calling() Handles Button1.Click
        Call DisplayChassisTabResults()
    End Sub
 
 
    Private Sub DisplayChassisTabResults()
 
        Dim Chassis As New SetupSpreadsheet.ChassisTab
 
PercentageOfAntiRollStiffnessFromSpring_Front_tbox.DataBindings.Clear()
 
        Dim binding As New Binding("Text", Chassis, "PourcentageOfAntiRollTorqueCommingFromSpring_Front")
        PercentageOfAntiRollStiffnessFromSpring_Front_tbox.DataBindings.Add(binding)

ou même:

Code:

1
2
3
4
5
6
7
8
Private Sub DisplayChassisTabResults() Handles Button1.Click
 
        Dim Chassis As New SetupSpreadsheet.ChassisTab
 
PercentageOfAntiRollStiffnessFromSpring_Front_tbox.DataBindings.Clear()
 
        Dim binding As New Binding("Text", Chassis, "PourcentageOfAntiRollTorqueCommingFromSpring_Front")
        PercentageOfAntiRollStiffnessFromSpring_Front_tbox.DataBindings.Add(binding)

cela affiche "non numérique" dès le click! :aie:

alors que, selon moi l'evenement mybase.load, n'est que la conséquencede l'ouverture du form par la sub:

Code:

1
2
3
4
5
6
7
8
9
Public Class MainForm
 
    Private Sub MainFormSub(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Main.Click
 
        Dim form As New SetupForm
        SetupForm.Show()
 
    End Sub
End Class

Interpretation : Le bind ne fonctionne correctement que si la sub "DisplayChassisTabResults()" est appelé par un événement mybase.load...

:arf:

10/09/2011, 17h13
Gualino

Compris!:ccool:

C'était un problème de chronologie : avec mybase.load le code est lu et collecte toute les valeurs d'entrée puis exécute la sub.

Alors que avec le l’événement click, la sub est exécutée en premier, du fait qu'elle soit en tête de page...