handshakeit
03-08-2006, 11:30 AM
Hi all
Can Any one convert this in C#
I hav problem in CBool function what it does
Private afterCurrentCellChanged As Boolean = False
Private Sub dataGrid1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles DataGrid1.Click
Dim discontinuedColumn As Integer = 0
Dim pt As Point = Me.dataGrid1.PointToClient( _
Control.MousePosition)
Dim hti As DataGrid.HitTestInfo = _
Me.dataGrid1.HitTest(pt)
Dim bmb As BindingManagerBase = _
Me.BindingContext(Me.dataGrid1.DataSource, _
Me.dataGrid1.DataMember)
If afterCurrentCellChanged _
AndAlso hti.Row < bmb.Count _
AndAlso hti.Type = DataGrid.HitTestType.Cell _
AndAlso hti.Column = discontinuedColumn Then
Me.DataGrid1(hti.Row, discontinuedColumn) = _
Not CBool(Me.DataGrid1(hti.Row, _
discontinuedColumn))
End If
afterCurrentCellChanged = False
End Sub 'dataGrid1_Click
'add a line to this existing handler
Private Sub dataGrid1_CurrentCellChanged( _
ByVal sender As System.Object, _
ByVal e As System.EventArgs) _
Handles DataGrid1.CurrentCellChanged
'if click on a discontinued row, then set
'currentcell to checkbox
Dim discontinuedColumn As Integer = 0
Dim val As Object = Me.DataGrid1( _
Me.DataGrid1.CurrentRowIndex, _
discontinuedColumn)
Dim productDiscontinued As Boolean = CBool(val)
If productDiscontinued Then
Me.DataGrid1.CurrentCell = _
New DataGridCell( Me.DataGrid1.CurrentRowIndex, _
discontinuedColumn)
End If
'add this line
afterCurrentCellChanged = True
End Sub 'dataGrid1_CurrentCellChanged
Can Any one convert this in C#
I hav problem in CBool function what it does
Private afterCurrentCellChanged As Boolean = False
Private Sub dataGrid1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles DataGrid1.Click
Dim discontinuedColumn As Integer = 0
Dim pt As Point = Me.dataGrid1.PointToClient( _
Control.MousePosition)
Dim hti As DataGrid.HitTestInfo = _
Me.dataGrid1.HitTest(pt)
Dim bmb As BindingManagerBase = _
Me.BindingContext(Me.dataGrid1.DataSource, _
Me.dataGrid1.DataMember)
If afterCurrentCellChanged _
AndAlso hti.Row < bmb.Count _
AndAlso hti.Type = DataGrid.HitTestType.Cell _
AndAlso hti.Column = discontinuedColumn Then
Me.DataGrid1(hti.Row, discontinuedColumn) = _
Not CBool(Me.DataGrid1(hti.Row, _
discontinuedColumn))
End If
afterCurrentCellChanged = False
End Sub 'dataGrid1_Click
'add a line to this existing handler
Private Sub dataGrid1_CurrentCellChanged( _
ByVal sender As System.Object, _
ByVal e As System.EventArgs) _
Handles DataGrid1.CurrentCellChanged
'if click on a discontinued row, then set
'currentcell to checkbox
Dim discontinuedColumn As Integer = 0
Dim val As Object = Me.DataGrid1( _
Me.DataGrid1.CurrentRowIndex, _
discontinuedColumn)
Dim productDiscontinued As Boolean = CBool(val)
If productDiscontinued Then
Me.DataGrid1.CurrentCell = _
New DataGridCell( Me.DataGrid1.CurrentRowIndex, _
discontinuedColumn)
End If
'add this line
afterCurrentCellChanged = True
End Sub 'dataGrid1_CurrentCellChanged