Differenze tra le versioni di "Assegnare colori allo sfondo ed al testo di una riga selezionata di una ListView"

Da Gambas-it.org - Wikipedia.
 
(7 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
Impostata la chiave identificatrice dell'<I>Item</i> della ''ListView'', è possibile assegnare ''direttamente'' - ossia da una proprietà - colori allo sfondo ed al testo della riga selezionata di un oggetto ''ListView''.
+
In questa pagina viene mostrata una modalità per assegnare colori allo sfondo ed al testo della riga (item) selezionata di un oggetto ''ListView'':
 
+
'''Public''' Sub Form_Open()
 
 
Mostriamo un esempio pratico:
 
  '''Public''' Sub Form_Open()
 
 
    
 
    
 
   With ListView1
 
   With ListView1
Riga 22: Riga 19:
 
   Dim s As String
 
   Dim s As String
 
    
 
    
  <FONT Color=gray>' ''Assegna i colori predefiniti allo sfondo e al testo di ciascuna riga della "ListView":''</font>
+
  <FONT Color=gray>' ''Assegna i colori predefiniti allo sfondo e al testo di ciascuna riga (item) della "ListView".''
 +
' ''Ogni riga/item è individuata mediante la sua chiave identificatrice, impostata nella precedente routine nel primo argomento del Metodo ".Add()":''</font>
 
   For Each s In ListView1.Keys
 
   For Each s In ListView1.Keys
 
     ListView1[s].Background = Color.TextBackground
 
     ListView1[s].Background = Color.TextBackground
Riga 28: Riga 26:
 
   Next
 
   Next
 
    
 
    
  <FONT Color=gray>' ''Assegna il colore blu allo sfondo e giallo al testo presente nella corrente riga cliccata della "ListView":''</font>
+
  <FONT Color=gray>' ''In quest'altro caso il colore dello sfondo e del testo presente nella corrente riga/item,''
 +
' ''cliccata della "ListView", è assegnato individuando la corrente riga/item cliccata  con la proprietà ".Current":''</font>
 
   With ListView1.Current
 
   With ListView1.Current
 +
<FONT Color=gray>' ''Assegna il colore blu allo sfondo e giallo al testo presente nella corrente riga/item cliccata della "ListView":''</font>
 
     .Background = Color.Blue
 
     .Background = Color.Blue
 
     .Foreground = Color.Yellow
 
     .Foreground = Color.Yellow
 +
<FONT Color=gray>' ''Mostra in console il testo contenuto nella riga/item cliccata:''</font>
 +
    Print .Text
 
   End With
 
   End With
 
    
 
    
 
  '''End'''
 
  '''End'''

Versione attuale delle 15:13, 14 lug 2021

In questa pagina viene mostrata una modalità per assegnare colori allo sfondo ed al testo della riga (item) selezionata di un oggetto ListView:

Public Sub Form_Open()
 
 With ListView1
   .Add("1", "Riga_1")
   .Add("2", "Riga_2")
   .Add("3", "Riga_3")
   .Add("4", "Riga_4")
   .Add("5", "Riga_5")
   .Add("6", "Riga_6")
   .Add("7", "Riga_7")
 End With
 
End


Public Sub ListView1_Select()
 
 Dim s As String
 
' Assegna i colori predefiniti allo sfondo e al testo di ciascuna riga (item) della "ListView".
' Ogni riga/item è individuata mediante la sua chiave identificatrice, impostata nella precedente routine nel primo argomento del Metodo ".Add()":
 For Each s In ListView1.Keys
   ListView1[s].Background = Color.TextBackground
   ListView1[s].Foreground = Color.TextForeground
 Next
 
' In quest'altro caso il colore dello sfondo e del testo presente nella corrente riga/item,
' cliccata della "ListView", è assegnato individuando la corrente riga/item cliccata  con la proprietà ".Current":
 With ListView1.Current
' Assegna il colore blu allo sfondo e giallo al testo presente nella corrente riga/item cliccata della "ListView":
   .Background = Color.Blue
   .Foreground = Color.Yellow
' Mostra in console il testo contenuto nella riga/item cliccata:
   Print .Text
 End With
 
End