I briefly skimmed over the posts here and i though i would post this as it relates to the editing and control of cell data.
A few days ago i came up with a little something to use a textbox from the toolbox set to multiline as a custom editing control for whatever cell you have selected. This will give you the ability to use other controls as well. The reason i wanted this functionality is to be able to handle the data enterd into the cells as it is being typed and not having to wait for a data error and handle that. And in the future i plan on using a single combobox or listbox to select from for all cells in a particular column. This can elininate a lot of painting and increase speed.
Doing it this way you can control the navigation of the cells with the textbox keypress events as well.
I hope this will help out here.
Jeff
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.DataGridView1.Hide()
Me.DataGridView1.Columns.Add("1", "1")
Me.DataGridView1.Columns.Add("2", "2")
Dim rw As DataGridViewRow
For i As Integer = 0 To 4
rw = New DataGridViewRow
rw.CreateCells(Me.DataGridView1)
rw.Cells(0).Value = i.ToString
rw.Cells(1).Value = i.ToString
Me.DataGridView1.Rows.Add(rw)
Next
Me.DataGridView1.Show()
Me.TextBox1.Hide()
End Sub
Private Sub DataGridView1_CellBeginEdit(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellCancelEventArgs) Handles DataGridView1.CellBeginEdit
e.Cancel = True
Me.TextBox1.Show()
'Me.TextBox1.Text = Me.DataGridView1.Item(e.ColumnIndex, e.RowIndex).Value.ToString
'Me.TextBox1.Select()
'Me.TextBox1.SelectionStart = Me.TextBox1.TextLength
End Sub
Dim col As Integer = 0
Dim rw As Integer = 0
Dim xloc As Integer = 0
Dim yloc As Integer = 0
Private Sub DataGridView1_CellEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellEnter
xloc = Me.DataGridView1.GetCellDisplayRectangle(e.ColumnIndex, e.RowIndex, True).Location.X + 24
yloc = DataGridView1.GetCellDisplayRectangle(e.ColumnIndex, e.RowIndex, True).Location.Y + 54
Me.TextBox1.Size = Me.DataGridView1.GetCellDisplayRectangle(e.ColumnIndex, e.RowIndex, True).Size
Me.TextBox1.Location = New Point(xloc, yloc)
col = e.ColumnIndex
rw = e.RowIndex
End Sub
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If e.KeyChar = Chr(13) Then
e.Handled = True
Me.DataGridView1.Item(col, rw).Value = CInt(Me.TextBox1.Text)
Me.TextBox1.Clear()
Me.TextBox1.Hide()
ElseIf e.KeyChar = Chr(8) Then
e.Handled = False
ElseIf Not IsNumeric(e.KeyChar) Then
e.Handled = True
End If
End Sub
Private Sub DataGridView1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles DataGridView1.KeyPress
Me.TextBox1.Text = e.KeyChar
Me.TextBox1.Select()
Me.TextBox1.SelectionStart = Me.TextBox1.TextLength
End Sub
End Class
I
I
I
I
\ /
DataGridView KeyDown?
