DataGridView CheckBox immer False?

  • VB.NET
  • .NET (FX) 4.0

Es gibt 22 Antworten in diesem Thema. Der letzte Beitrag () ist von Drahuverar.

    @ErfinderDesRades
    .EndEdit()- "Führt den Bearbeitungsvorgang an der aktiven Zelle aus und beendet ihn"
    Ziemlich genial.. Auf die Idee hätte ich beim suchen kommen sollen. Habe zwar das DropDownMenu (nach einem ".") durchsucht aber nach anderen Wörtern gesucht :D

    Ja, eben dass dachte ich mir auch. Der User geht ja schon explizit auf die CheckBox und setzt den Erledigt-Haken. Dann muss es ja auch so gewollt sein.
    Und schwupps ist die Zeile "weg" und man kann sich auf die wesentliche Sätze konzentrieren..Macht es meiner Meinung nach übersichtlicher.
    Jetzt weiß ich ja wie ich das machen kann, ohne eine Brücke einzubauen.

    Bezüglich des Behaviors- würde es sehr interessant finden zu sehen wie das realisiert werden kann. Auf dem jetzigen Wissensstand wüsste ich nicht, wie man das machen sollte/könnte. (Eigenes Control welches von DataGridView erbt und dem entsprechend die Anpassung machen?)
    Option Strict On!

    Drahuverar schrieb:

    Eigenes Control welches von DataGridView erbt und dem entsprechend die Anpassung machen?
    nein, grade das vermeiden.
    In diesem Fall kann es einfach nur ein Eventhandler sein, den man abonniert.

    naja, von wegen einfach - als Behavior muss der Eventhandler nicht nur abonniert sein, sondern an erste Stelle der EventhandlerList - und das ist ein fieser hack:

    VB.NET-Quellcode

    1. Public Class DatagridViewBehavior
    3. Private Shared _GetEvents As FieldInfo = GetType(Component).GetField("events", BindingFlags.NonPublic Or BindingFlags.Instance)
    4. Private Shared _CurrentChangedKey As Object = GetType(DataGridView) _
    5. .GetField("EVENT_DATAGRIDVIEWCELLCONTENTCLICK", BindingFlags.NonPublic Or BindingFlags.Static) _
    6. .GetValue(Nothing) ' that key-name was figgured out that by Disassembler (alternative: Rosylin-website)
    7. Private Shared Sub InsertCurrentChangedHandler(bs As DataGridView, handler As DataGridViewCellEventHandler)
    8. Dim events = DirectCast(_GetEvents.GetValue(bs), EventHandlerList)
    9. Dim prevEvent = events(_CurrentChangedKey)
    10. Dim newEvent As [Delegate] = handler
    11. If prevEvent.NotNull Then
    12. For Each dlg In prevEvent.GetInvocationList
    13. newEvent = [Delegate].Combine(newEvent, dlg)
    14. Next
    15. End If
    16. events(_CurrentChangedKey) = newEvent
    17. End Sub
    18. Private Shared OnCheckbox_CheckEndEdit As DataGridViewCellEventHandler _
    19. = Sub(s, e)
    20. Dim dgv = DirectCast(s, DataGridView)
    21. If TypeOf dgv.Columns(e.ColumnIndex) Is DataGridViewCheckBoxColumn Then dgv.EndEdit()
    22. End Sub
    24. ''' <summary> enforces immediately accept dgv-Input on (un-)checking on dgv-checkboxColumns </summary>
    25. Public Shared Sub OnCheckboxCheckEndEdit(dgv As DataGridView)
    26. InsertCurrentChangedHandler(dgv, OnCheckbox_CheckEndEdit)
    27. End Sub
    Usage:

    VB.NET-Quellcode

    1. Public Class Form1
    3. Public Sub New()
    4. InitializeComponent()
    5. DatagridViewBehavior.OnCheckboxCheckEndEdit(ItemDataGridView)
    6. End Sub
    8. Private Sub ItemDataGridView_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles ItemDataGridView.CellContentClick
    9. Dim rw = ItemBindingSource.At(Of ItemRow)()
    10. Msg(rw.aNumber) 'aNumber ist die entsprechende Property der row der angebundenen Datatable
    11. End Sub

Facebook
Telefonspende