Discussion :

[BenoitM]

Bonjour,

J'ai crée un UserControl qui à une propriété DataSourceOfMyListBox.
Cette DataSource est initialisé avec des valeurs par défaut dans le constructeur de mon UserControl

Quand j'utilise le UC dans une form le designer met à chaque fois
MyUC.DataSourceOfMyListBox = Nothing

Comment puis-je dire au designer de ne pas modifier cette propriété?
En laissant biensur ma propriété en ReadWrite

[fregolo52]

salut,

DataSourceOfMyListBox est accessible dans le designer ? (c'est une propriété browsable ?)

Si le designer fait MyUC.DataSourceOfMyListBox = Nothing, à l'excécution que devient la valeur ? Toujours Nothing ? Elle ne prend pas la valeur que tu passes dans le constructeur ?

Pour comprendre mieux, il faudrait peut-être que tu nous mettes la déclaration de ton UC dans ta form et le code du contructeur avec la déclaration local de DataSourceOfMyListBox.

[BenoitM]

Pour le code dans mon UC

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
 
#Region " Windows Form Designer generated code "
    Public Sub New()
        MyBase.New()
        'This call is required by the Windows Form Designer.
        InitializeComponent()
        'Add any initialization after the InitializeComponent() call
        InitializeTooltips()
        Try
            Dim arr As ArrayList
            arr = CType(ConfigurationSettings.GetConfig("MessagesQueueManager/ServersList"), ArrayList)
            ServerListDataSource = arr
        Catch ex As Exception
        End Try
    End Sub
 
<Description("The Items in the Server list box")> _
    Public Property ServerListDataSource() As Object
        Get
            Return ComboBoxServerList.DataSource
        End Get
        Set(ByVal Value As Object)
             ComboBoxServerList.DataSource = Value
        End Set
    End Property

Quand je l'ajoute le designer

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
        '
        'UserControlServerSelection1
        '
        Me.UserControlServerSelection1.ServerListDataSource = Nothing

[BenoitM]

Finalement j'ai résolu mon problème en mettant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
<Description("The Items in the Server list box"),ReadOnlyAttribute(True)> _
    Public Property ServerListDataSource() As Object
    ...
    End Property

D'après ce que j'ai "vu/tester" on ne sait que :

1. Mettre une valeur par défaut et l'utisateur pourra la changer au design
2. Mettre l'attribut ReadOnly (mais alors impossible à changer au design)
3. Ne rien mettre et l'utisateur pourra introduire une valeur design mais part défaut le designer mettra Nothing : |