Έχω δύο MDIChild forms.
Ενώ έχω ήδη ανοιχτή μία MDIChild form με όνομα frmCS ανοίγω μία άλλη πάλι MDIChild form που περιέχει ένα DataGridView, πατώντας F7.
'========================
Private Sub txtCsType_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtCsType.KeyDown
If e.KeyCode = Keys.F7 Then
Dim NewCSViewChild As New frmCustomersSuppliersView()
NewCSViewChild.MdiParent = Me.MdiParent
NewCSViewChild.Show()
End If
End Sub
'========================
Τώρα όταν είμαι στην NewCSViewChild φόρμα, πατώντας ENTER πάνω σε μία γραμμή του DataGridView (dgvCustomersSuppliersTypesView) στέλνω την τιμή της πρώτης στήλης της τρέχουσας γραμμής στο πεδίο txtCsType, το οποίο είναι TextBox, στην φόρμα frmCS.
'========================
Private Sub dgvCustomersSuppliersTypesView_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles dgvCustomersSuppliersTypesView.KeyDown
If e.KeyCode = Keys.Escape Then
Me.Close()
End If
If e.KeyCode = Keys.Enter Then
frmCS.txtCsType.Text = dgvCustomersSuppliersTypesView.Item(0, dgvCustomersSuppliersTypesView.CurrentCell.RowIndex).Value
Me.Close()
End If
End Sub
'========================
Το θέμα είναι ότι όταν οι φόρμες δεν είναι MDIChild όλα λειτουργούν κανονικά. Μόλις τις κάνω MDIChild τότε δεν λειτουργεί ο παραπάνω κώδικας.
Καμιά ιδέα???