Kolor ListView

Wysłany przez Elizeusza w kontroli i Przykłady na 01 7, 2009 | 5 Odpowiedzi

Tutaj daję podprogram że znalazłem to bardzo przydatne dla kilku lat. Funkcja rysuje linie listview na przemian dwoma kolorami, to znacznie ułatwia odczyt podczas listview ma wiele kolumn lub kolumny są bardzo szerokie. 

 Public Sub colorearListView (lista ByRef W ListView)
 Dim i As Integer
 For i = 0 do list.Items.Count-1
 Jeśli i = Int (I / 2) * 2 A
 list.Items.Item (i). BackColor = Color.White
 Więcej
 list.Items.Item (i). BackColor = Color.LightGoldenrodYellow
 End If
 Następny
 list.FullRowSelect = True
 End Sub

Jestem pewien, że niewielkim wysiłkiem można również własnych potrzeb, a także jej poprawy.

5 Responses to "Kolor ListView"

  1. cibernetiko mówi:
    07.01.2009 o 11:28

    doskonały kod .. Daje to o wiele bardziej profesjonalny wygląd do listview .. dzięki

    Odpowiedź
  2. NicoNqn mówi:
    31/03/2011 w 12:44 am

    Witam, bardzo dobra strona pomaga mi wiele, ale mam problem z listview, używam programu Visual 2005.
    Mam 2 kolumny (pokój, państwo) oraz 2 wiersze (np.:: 1, Status: Busy, Pokój: 2, Status: Darmowe, itp.). Muszę, że jeśli stan jednego z pokoi jest zajęty komórką lub czerwona farba mi cuaquier color.Solamente malować na czerwono stanu komórek, w tym przykładzie będzie wiersz 1, kolumna 1.
    Staram się z tym kodem ust lstGrilla.Items (wiersz). Elementów składowych (COL). BackColor = Color.Red), ale nie długo
    Mam nadzieję, że może już wyjaśniłem .. z już bardzo dziękuję.!

    Odpowiedź
  3. l_kamikaze_l mówi:
    16/07/2011 w 5:57 am

    przepraszam za ignorancję .. ale kiero zadzwonić sub w przypadku obciążenia formie, a nie jako .. Pomóż mi hehe! przez fa ..!

    Odpowiedź
  4. Geronimo Fernandez mówi:
    26/10/2011 w 11:27 pm

    Aby skorzystać z funkcji po prostu trzeba przejść nazwę listview jako parametr:

    Private Sub Form1_Load (nadawca ....

    colorearListView (ListView1)

    End Sub

    Odpowiedź
  5. Pako mówi:
    20/02/2012 w 5:42 pm

    Witam,

    Szuka google jak zmienić kolor na ListView dostaje tutaj :)

    Służyłem kod, dzięki, zmieniłem coś do optymalizacji i był to wynik:

    Public Sub colorearListView (lista ByRef W ListView)
    Dim Kolor Jako color = Color.FromArgb (0, 225, 239, 253)
    Dim i As Integer
    For i = 0 do list.Items.Count - 1 Krok 2
    list.Items.Item (i). BackColor = kolor
    Następny
    list.FullRowSelect = True
    End Sub

    I do druku w kolorze:

    colorearListView (ListView1)

    Pozdrawiam

    Odpowiedź

Komentarz