Devexpress的Datalayout控件

1)DataLayout可以自动根据绑定的数据生成需要的label和Text. 不过它需要设计时支持. 

我研究了下如何动态绑定, 上代码:

x = New InterviewersService

Dim t As Interviewers = x.GetByIntid("100002")Dim y As New BindingList(Of Interviewers)y.Add(t)Me.DataLayoutControl1.DataSource = yMe.DataLayoutControl1.RetrieveFields()

2)那么在修改后如何写回去呢?继续上:

Dim a As CurrencyManager = CType(Me.DataLayoutControl1.BindingContext(Me.DataLayoutControl1.DataSource, Me.DataLayoutControl1.DataMember), CurrencyManager)Dim b As Interviewers= CType(a.Current, Interviewers)x.Save(b) 

3) 如何修改自动生成的Datalayout呢?

'设置生成的label的文本

Me.DataLayoutControl1.Items(2).Text = "访问员编号"

For Each baseItem As BaseLayoutItem In DataLayoutControl1.ItemsDim item As LayoutControlItem = TryCast(baseItem, LayoutControlItem)If Not item Is Nothing ThenIf item.Control.DataBindings(0).BindingMemberInfo.BindingField = "EntityId" Or item.Control.DataBindings(0).BindingMemberInfo.BindingField = "Tag" Or item.Control.DataBindings(0).BindingMemberInfo.BindingField = "Error" Then'Hide this itemDataLayoutControl1.AddToHiddenItems(item)End IfEnd IfNext baseItem太纠结了, 省的时间估计还没有用的多...算了还是手写拖控件吧, 至少更灵活

 

转载于:https://www.cnblogs.com/hzb2001/archive/2011/05/27/2060056.html

总结

以上是生活随笔为你收集整理的Devexpress的Datalayout控件的全部内容，希望文章能够帮你解决所遇到的问题。

如果觉得生活随笔网站内容还不错，欢迎将生活随笔推荐给好友。