Datagridview Selected Rows nach DataSource Update

  • VB.NET
  • .NET (FX) 3.0–3.5

Es gibt 4 Antworten in diesem Thema. Der letzte Beitrag () ist von tScheckSn.

    Datagridview Selected Rows nach DataSource Update

    Hallo,

    Ich habe folgendes Problem:
    Ich habe ein Datagridview, welches nicht direkt bearbeitet werden kann.
    Nur per Doppelklick öffnet sich ein eigenes fenster, in dem die jeweilige Zeile bearbeitet werden kann.
    Nach dem Bearbeiten schreibe ich diese infos direkt in die Datenbank. Anschließend muss daher die DataSource aktualisiert werden.

    Damit dann immer noch die selbe Zeile(n) ausgewählt sind habe ich das Datagridview folgendermaßen überschrieben:

    VB.NET-Quellcode

    1. Overloads Property DataSource As Object
    2. Get
    3. Return MyBase.DataSource
    4. End Get
    5. Set(value As Object)
    6. SelectedIDs = getSelectedRowsID()
    7. 'Dim a As String = ""
    8. 'For i As Integer = 0 To SelectedIDs.Count - 1
    9. ' a &= "; " & SelectedIDs(i)
    10. 'Next
    11. 'MsgBox(a)
    12. MyBase.DataSource = value
    14. End Set
    15. End Property
    17. Protected Overrides Sub OnDataSourceChanged(e As EventArgs)
    18. MyBase.OnDataSourceChanged(e)
    19. If Not IsNothing(_IDColumnName) Then
    20. If Not IsNothing(Me.Columns(_IDColumnName)) Then
    21. Me.Columns(_IDColumnName).Visible = False
    22. End If
    24. End If
    25. 'Content Menue Strip
    26. For i As Integer = 0 To Me.Rows.Count - 1 Step 1
    27. 'Context Menü Strip Zuweisen
    28. Me.Rows(i).ContextMenuStrip = _RowContextMenuStrip
    29. Next
    30. setSelectedRowsID(SelectedIDs)
    31. End Sub
    33. Public Property IDColumnName As String
    34. Get
    35. Return _IDColumnName
    36. End Get
    37. Set(value As String)
    38. _IDColumnName = value
    39. End Set
    40. End Property
    42. Public Function getCurrentRowID() As Object
    43. If (Not IsNothing(Me.CurrentRow)) And (Not IsNothing(Me.IDColumnName)) Then
    44. If Not IsNothing(Me.CurrentRow.Cells(_IDColumnName)) Then
    45. Return Me.CurrentRow.Cells(_IDColumnName).Value
    46. End If
    47. End If
    48. Return Nothing
    49. End Function
    51. Public Function getSelectedRowsID() As Object()
    52. Try
    54. If (Not IsNothing(Me.IDColumnName)) Then
    55. Dim returnarray(Me.SelectedRows.Count - 1) As Object
    56. For i As Integer = 0 To Me.SelectedRows.Count - 1 Step 1
    57. returnarray(i) = Me.SelectedRows(i).Cells(_IDColumnName).Value
    58. Next
    59. Return returnarray
    60. End If
    61. Return Nothing
    63. Catch ex As Exception
    64. Return Nothing
    66. End Try
    67. End Function
    69. Public Sub setSelectedRowsID(ByRef liste() As Object)
    71. If IsNothing(IDColumnName) Then
    72. Return
    73. End If
    75. If IsNothing(liste) Then
    76. Return
    77. End If
    79. For i As Integer = 0 To Me.Rows.Count - 1
    80. Me.Rows(i).Selected = False
    81. Next
    83. For i As Integer = 0 To Me.Rows.Count - 1
    84. For j As Integer = 0 To liste.Length - 1
    85. If Me.Rows(i).Cells(IDColumnName).Value = liste(j) And Not IsNothing(liste(j)) Then
    86. Me.Rows(i).Selected = True
    87. Array.Clear(liste, j, 1)
    88. End If
    89. Next
    90. Next
    92. End Sub
    94. Public Sub printarray(ByVal l As Object())
    95. Dim ausgabe As String = "-"
    96. For i As Integer = 0 To l.Length - 1 Step 1
    97. ausgabe &= l(i) & "-"
    99. Next
    100. MsgBox(ausgabe & vbCrLf & "Länge: " & l.Length)
    101. End Sub


    Es werden auch nach dem Update die entsprechenden Zeilen richtig markiert.
    Mein Problem: Wenn ich die Pfeiltasten betätige beginnen diese immer bei der 1. Zeile. Also egal welche Zeile markiert ist, wenn man die Pfeiltaste nach unten drückt wird immer die Zweite Zeile ausgewählt.

    Ich habe bereits herausgefunden, dass auch CurrentCellAddress.Y auf 0 steht.
    Meine Frage: Wie setze ich richtig die Ausgewählten und Aktiven Zellen? Derzeit setue ich nur die Auswahl mit Me.Rows(i).Selected = True. Ich vermute es gibt aber noch eine art Aktive Zelle, die für die Pfeiltasten verwendet wird.

    Danke im Voraus!

    tScheckSn schrieb:

    ch habe ein Datagridview, welches nicht direkt bearbeitet werden kann.
    Nur per Doppelklick öffnet sich ein eigenes fenster, in dem die jeweilige Zeile bearbeitet werden kann.
    Nach dem Bearbeiten schreibe ich diese infos direkt in die Datenbank. Anschließend muss daher die DataSource aktualisiert werden.
    Das ist der falsche Workflow - nämlich von hinten durch die Brust ins Auge.
    Nach Bearbeiten des Datensatzes solltest du die Client-Daten aktualisieren - nicht die Datenbank.
    Denn - hast du ja gemerkt - es ist der Client, der dem User angezeigt wird - nicht die Datenbank.

    Wenn es dir ein Herzenswunsch ist, kannst du zusätzlich auch die Datenbank aktualisieren, aber wenn man zB mit dem Ado.Net-Instrumentarium arbeitet, ist das nichtmal sofort nötig.
    Denn ein Dataset merkt sich alle Änderungen, und kann jederzeit die DB auf einen aktuellen Stand bringen.
    Das eröffnet die Möglichkeit, einen expliziten Save-Button zu coden, sodass die Änderungen erst rückgespeichert werden, wenn der User das will (und dann alle auf einmal, was den Db-Traffic stark verringert).

Facebook
Telefonspende