我需要在devExpress网格控件(grdDisb)中使用一个无线电组(rdoChargeOn)。 我从存储过程中获取行。 我总是选择无线电组索引= -1,值为0的问题。 此外,如果我创建一个新行,则值为0,单击后输入没有选中的项目。
在这种情况下,rdochargeOn.SelectedIndex的等价物是什么?你能帮我吗? 请找到附加网格的打印屏幕。
Private _DisbList As BindingList(Of PropertyDisbursementList)
_DisbList = New BindingList(Of PropertyDisbursementList)(obj.DisbList)
GrdDisb.DataSource = _DisbList
GrdDisb.RefreshDataSource()
rivate Sub BindDisbGrid()
If RecordId <> -1 Then '' Import the list of disbursement
_DisbList = New BindingList(Of PropertyDisbursementList)(obj.DisbList)
End If
_DisbList.AllowNew = True
GrdDisb.DataSource = _DisbList
GrdDisb.RefreshDataSource()
End Sub
Public Sub SaveDisbList()
Try
Dim disb As New PropertyDisbursementList
Dim indx As Int32 = 0
Dim CategName As String = ""
Dim objWCF As WCFReference.PropertiesServiceProvider = GetServiceProvider()
For i As Integer = 0 To GridView1.DataRowCount - 1
If GridView1.GetRowCellValue(i, "CategId").ToString <> 0 Then
disb = _DisbList(i)
If RecordId <> -1 Then
disb.PropertyId = RecordId
disb.CategName = objWCF.Service.GetCatPropertyDisbursement(disb.CategId)
disb.RecordInfo = GetRecordInfo()
disb.PropertyId = objWCF.Service.SavePropertyDisbursementList(disb)
Else
disb.PropertyId = ProId
disb.CategName = objWCF.Service.GetCatPropertyDisbursement(disb.CategId)
disb.RecordInfo = GetRecordInfo()
disb.PropertyId = objWCF.Service.SavePropertyDisbursementList(disb)
End If
End If
Next
Catch ex As Exception
iMessage.ShowError(Nothing, ex)
End Try
End Sub
提前thx,
问候,
Hadil
答案 0 :(得分:0)
浏览这个DevExpress主题 - Radio Group as Repository Item not working for multiple rows
我可以怀疑这个问题可能是你没有向RadioGroup控件中添加与网格当前单元格值匹配的项目。
检查这个例子 -
$.srSmoothscroll({
target: $('wrapper')
});
使用网格的ShownEditor事件绑定编辑器控件中的值,以便它将在组中设置所选项目。
希望这个帮助