Einzelne Checkboxen bei Listview NICHT anzeigen

dive26 · 2. Oktober 2022, 13:04

Hallo Leute,

Ich habe eine Listview mit Checkboxen. Zur besseren Übersichtlichkeit möchte ich aber einige freie Zeilen in der Listbox lassen. Dort sollen natürlich dann keine Checkboxen angezeigt werden. Wie bekommt man das am einfachsten hin.

Hinweis: Die Einträge sind fix und es gibt keine Scrollmöglichkeit, da alle möglichen Einträge immer sichtbar sind.

Danke für Eure Hinweise.

RodFromGermany · 2. Oktober 2022, 13:19

@dive26 Wie kommen denn die Items da rein?

dive26 · 2. Oktober 2022, 14:07

@RodFromGermany

so:

VB.NET-Quellcode

With ListView_Geraete.Items.Add(HistoricValues(i))
...

RodFromGermany · 2. Oktober 2022, 16:26

@dive26 Und in dieser Schleife gestaltest Du Dein LV nach Deinen Wünschen.

dive26 · 2. Oktober 2022, 16:52

@RodFromGermany und wie genau?
Checkboxen kann man nur für alle oder keinen Eintrag aktivieren.
Ich könnte maximal da ein schwarzes Rechteck drüberzeichnen. Aber ist das die "gute Art"?

RodFromGermany · 2. Oktober 2022, 17:03

dive26 schrieb:

Checkboxen kann man nur für alle oder keinen Eintrag aktivieren.

OK, das ist so eine ListView-Eigenart.
Probier mal ne ListBox, da müssen die Einträge nix miteinander zu tun haben.
Oder nimm ein TableLayoutPanel mit einer Spalte, da kannst Du reinpacken, was immer Du willst.

VaporiZed · 2. Oktober 2022, 17:06

Nein, etwas Drübermalen ist schlechter Stil.
Ich habe zwar bisher keinen Weg gefunden, aber sind Gruppen vielleicht das Richtige für Dich?

dive26 · 2. Oktober 2022, 17:11

@VaporiZed

ja super. Das wäre eine Lösung.
Ich schau mir das mal an (hatte ich noch nie am Schirm).

Edit: funktioniert bei mir nicht. Womöglich (oder sicher) falscher Code

VB.NET-Quellcode

With ListView_Geraete
.SuspendLayout()
.Clear()
.Columns.Add("LanguageValues", 200, HorizontalAlignment.Left)
.Columns.Add("Values", 0, HorizontalAlignment.Left)
End With
Dim Power_group As New ListViewGroup("Power", HorizontalAlignment.Left)
Dim Volt_group As New ListViewGroup("Volt", HorizontalAlignment.Left)
Dim Ampere_group As New ListViewGroup("Ampere", HorizontalAlignment.Left)
With ListView_Geraete.Groups
.Add(Power_group)
.Add(Volt_group)
.Add(Ampere_group)
End With
Dim SprachFormTemp As String = ""
For i As Integer = 1 To 9
With ListView_Geraete.Items.Add(HistoricValues(i)) 'hier dann die Values aus String-Variablen
.UseItemStyleForSubItems = False
.SubItems.Add(HistoricValues(i))
.SubItems(0).ForeColor = HistoricColors(i)
.Group = Power_group
If i = 2 Then .Checked = True
End With
Next i
For i As Integer = 10 To 20
With ListView_Geraete.Items.Add(HistoricValues(i)) 'hier dann die Values aus String-Variablen
.UseItemStyleForSubItems = False
.SubItems.Add(HistoricValues(i))
.SubItems(0).ForeColor = HistoricColors(i)
.Group = Volt_group
End With
Next i
ListView_Geraete.ResumeLayout()

VaporiZed · 2. Oktober 2022, 17:15

Im Designer auf das ListView, da auf den Smarttag, dann auf Gruppen bearbeiten. Dann die Gruppen hinzufügen und im Code beim Hinzufügen der Items die Gruppe festlegen.

VB.NET-Quellcode

ListView1.Items.Add(New ListViewItem With {.Group = ListView1.Groups(HierGruppenindexSelbstErmitteln)})

Gruppen sind z.B. in der Detailansicht sichtbar, aber die ColumnHeader kann man ausblenden: ListView.HeaderStyle auf None

dive26 · 2. Oktober 2022, 17:45

@VaporiZed

Das Ding mag mich nicht:

VB.NET-Quellcode

With ListView_Geraete.Items.Add(New ListViewItem With {.Group = ListView_Geraete.Groups(0)})
.Text = HistoricValues(i)
.UseItemStyleForSubItems = False
.SubItems.Add(HistoricValues(i))
.SubItems(0).ForeColor = HistoricColors(i)
If i = 2 Then .Checked = True
End With

.. mit Gruppenalage im Designer, wäre aber doch das selbe wie das hier

VB.NET-Quellcode

Dim Power_group As New ListViewGroup("Power", HorizontalAlignment.Left)
With ListView_Geraete.Groups
.Add(Power_group)
End With
With ListView_Geraete.Items.Add(HistoricValues(i)) 'hier dann die Values aus String-Variablen
.UseItemStyleForSubItems = False
.SubItems.Add(HistoricValues(i))
.SubItems(0).ForeColor = HistoricColors(i)
.Group = Power_group
End With

Hab den Fehler gefunden.Habe Application.EnableVisualStyles() 'Visuelle Stile aktivieren aufgerufen, nachdem ich schon eine Form angezeigt hatte. Das wollte das Ding nicht. Habs jetzt im Code vor dem öffnen der ersten Form gesetzt und dann werden auch die Header angezeigt.

Das einzige was ich nun noch rausbekommen muss ist, wie man die Farbe der Gruppe ändert. Die wird bei mir Dunkelblau auf schwarzem Hintergrund angezeigt

VaporiZed · 2. Oktober 2022, 17:54

Leider kann ich mir unter der Aussage

dive26 schrieb:

Das Ding mag mich nicht

nichts konkretes unter dem Missverhältnis zwischen Soll- und Ist-Wert vorstellen.

VB.NET-Quellcode

Private Sub FrmMain_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim Power_group As New ListViewGroup("Power", HorizontalAlignment.Left)
Dim VoltageGroup As New ListViewGroup("Voltage", HorizontalAlignment.Left)
ListView_Geraete.Groups.AddRange({Power_group, VoltageGroup})
Dim HistoricValues As New List(Of String) From {"a", "b", "c", "d", "e"}
Dim HistoricColors As New List(Of Color) From {Color.Red, Color.Green, Color.Black, Color.Blue, Color.Orange}
For i = 0 To 4
Dim CurrentGroup = Power_group
If i >= 3 Then CurrentGroup = VoltageGroup
With ListView_Geraete.Items.Add(HistoricValues(i)) 'hier dann die Values aus String-Variablen
.UseItemStyleForSubItems = False
.SubItems.Add(HistoricValues(i))
.SubItems(0).ForeColor = HistoricColors(i)
.Group = CurrentGroup
.Checked = i Mod 2 = 0
End With
Next
End Sub

Da Du die HistoricValues pro Eintrag doppelt drinhaben willst, fehlte noch die zweite Spalte. Daher Korrektur des Bildes.

##########

dive26 schrieb:

die Farbe der Gruppe

Ehm … viel Spaß, ist wohl ein steiniger Weg laut stackoverflow

dive26 · 2. Oktober 2022, 18:29

@VaporiZed

Nein passt schon, die Funktion macht nun das was die Funktion machen sollte.
Aber leider die Gruppen-Header in Blau. Das kann ich nicht gebrauchen, da mein Hintergrund fast schwarz ist.
Das sieht nicht gut aus. Zudem zieht sich die Gruppenlinie bis zum Ende der Listbox, was auch optisch nicht für meine Anwendung passt. Aber funktionieren tut es jetzt, nachdem ich die VisualStyles richtig aktiviert hatte.

Aus optischen Gründen mache ich es jetzt auf die unsaubere Art mit OwnerDraw ;-).
Danke aber trotzdem, habe ich wieder einiges dazugelernt zur Listbox.

FormFollowsFunction · 2. Oktober 2022, 20:00

RodFromGermany schrieb:

Oder nimm ein TableLayoutPanel mit einer Spalte, da kannst Du reinpacken, was immer Du willst.

Das halte ich für die mit Abstand beste Lösung.
Da funkt dir keine, nicht benötigte, Logig ("Gruppen-Header in Blau") dazwischen, das ganze ist ist sehr flexible und ohne viel aufwand realisierbar.

Achilleus · 2. Oktober 2022, 20:12

Und warum nicht die Checkbox als Icon (Unchecked/Check/Blank) einbinden?
Dann bräuchte man doch nur das Klick-Event auslesen oder habe ich da etwas falsch verstanden?

Gruß Achilleus

ErfinderDesRades · 3. Oktober 2022, 00:36

ja - das listviewItem kennt doch bestimmt den Checkstate.Indeterminated.
Für Indeterminated könnte man ein Blank-Icon einführen, und dann setzt man die Item, die ohne Checkbox sein sollen auf Indeterminated.

So ins Blaue hinein - tatsächlich verwende ich Listview nie.

dive26 · 3. Oktober 2022, 09:41

@ErfinderDesRades

tatsächlich verwende ich Listview nie.

Bei mir ist es gerade umgekehrt.
Ich mag das Listview lieber als das DataGridView. Obwohl man bei manchen Aufgaben um das DatagridView nicht herum kommt ;-).

ja - das listviewItem kennt doch bestimmt den Checkstate.Indeterminated.Für Indeterminated könnte man ein Blank-Icon einführen, und dann setzt man die Item, die ohne Checkbox sein sollen auf Indeterminated.

Das ist auch nur so eine Notlösung wie das OwnerDraw. Da lasse ich einfach die schon umgesetzte Notlösung mit OwnerDraw im Listitem. Das funktioniert einwandfrei. Dem User ist es egal - der sieht ja nicht wie es intern technisch gelöst ist. Solange Optik und Funktion passen ist alles gut.

Einzelne Checkboxen bei Listview NICHT anzeigen

Einzelne Checkboxen bei Listview NICHT anzeigen

VB.NET-Quellcode

dive26 schrieb:

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

dive26 schrieb:

VB.NET-Quellcode

dive26 schrieb:

RodFromGermany schrieb:

Ähnliche Themen

6 Benutzer haben hier geschrieben