Differenze tra le versioni di "Colorare il fondo di una cella di una GridView"

Da Gambas-it.org - Wikipedia.
 
(2 versioni intermedie di uno stesso utente non sono mostrate)
Riga 2: Riga 2:
  
  
===Impostare la cella e il colore da codice===
+
===Individuare la cella e impostare il colore da codice===
 
In questo caso si individuerà direttamente la cella:
 
In questo caso si individuerà direttamente la cella:
 
  Public Sub Form_Open()
 
  Public Sub Form_Open()
Riga 12: Riga 12:
 
   
 
   
 
   GridView1<FONT Color=red>[1, 1]</font>.Background = Color.Red
 
   GridView1<FONT Color=red>[1, 1]</font>.Background = Color.Red
 +
 +
End
 +
 +
 +
===Individuare la cella cliccandoci dentro con il puntatore del mouse===
 +
In questo caso si userà la Proprietà ".Current" della Classe ''GridView''.
 +
Public Sub Form_Open()
 +
 +
  With GridView1
 +
    .Rows.Count = 3
 +
    .Columns.Count = 4
 +
  End With
 +
 +
End
 +
 +
 +
Public Sub GridView1_Click()
 +
 +
  GridView1<FONT Color=red>.Current</font>.Background = Color.Red
 +
 +
End
 +
 +
 +
===Spostandosi su una cella tendo premuto il tasto del mouse===
 +
In questo caso si dovrà porre la Proprietà ".Tracking" a "False" (essendo di default posta a "True"), al fine di evitare che l'Evento "_MouseMove()" si sollevi non appena il puntatore del mouse sia entrato all'interno della ''GridView''.
 +
<BR>Si farà inoltre uso della Proprietà ".Current" della Classe ''GridView''.
 +
Public Sub Form_Open()
 +
 +
  With GridView1
 +
    .Rows.Count = 3
 +
    .Columns.Count = 4
 +
    <FONT Color=red>.Tracking = False</font>
 +
  End With
 +
 +
End
 +
 +
 +
Public Sub GridView1_MouseMove()
 +
 +
  GridView1<FONT Color=red>.Current</font>.Background = Color.Red
 
   
 
   
 
  End
 
  End

Versione attuale delle 08:12, 10 ago 2024

Possiamo avere diverse circostanze, nelle quali colorare la cella di una GridView.


Individuare la cella e impostare il colore da codice

In questo caso si individuerà direttamente la cella:

Public Sub Form_Open()

 With GridView1
   .Rows.Count = 3
   .Columns.Count = 4
 End With

 GridView1[1, 1].Background = Color.Red

End


Individuare la cella cliccandoci dentro con il puntatore del mouse

In questo caso si userà la Proprietà ".Current" della Classe GridView.

Public Sub Form_Open()

 With GridView1
   .Rows.Count = 3
   .Columns.Count = 4
 End With

End


Public Sub GridView1_Click()

 GridView1.Current.Background = Color.Red

End


Spostandosi su una cella tendo premuto il tasto del mouse

In questo caso si dovrà porre la Proprietà ".Tracking" a "False" (essendo di default posta a "True"), al fine di evitare che l'Evento "_MouseMove()" si sollevi non appena il puntatore del mouse sia entrato all'interno della GridView.
Si farà inoltre uso della Proprietà ".Current" della Classe GridView.

Public Sub Form_Open()

 With GridView1
   .Rows.Count = 3
   .Columns.Count = 4
   .Tracking = False
 End With

End


Public Sub GridView1_MouseMove() 

 GridView1.Current.Background = Color.Red

End