PDA

Visualizza la versione completa : [vb6] colori e datagrid


serena
02-09-2002, 17:25
Buongiorno a tutti,
ho un datagrid associato ad un recordset.
Vorrei evidenziare alcuni dati cambiando colore della cella o meglio del testo della cella.

Forse devo usare una flexgrid? e impostare così tutti i valori della cella?

In pratica vorrei evidenziare dei dati che hanno codici (non visibili all'utente) uguali e si trovano vicini nelle celle.
E' possibile?

Grazie

darkblOOd
02-09-2002, 18:22
Ciao serena, quanto tempo!


non mi ricordo come funzionano le griglie di vb, ma se non puoi fare riferimento ad una singola celle mi sembra difficile che tu riesca a colorarne diversamente una sola.

Gammino
02-09-2002, 18:50
X le flexgrid devi prima selezionare le celle che ti interessano e poi cambi la proprietà .CellBackColor

serena
03-09-2002, 09:33
Ciao DarkBlood...
che cambiamento hai fatto (vedi avatar)

Secondo me i datagrid sono molto limitati... ma probabilmente sono io a non saperli usare...

Per Gammino.
Grazie, mi sa che dovrò utilizzare una flexgrid, ma non le so usare molto...
:quipy:

leo79
03-09-2002, 10:40
Prova questa funzione cambiando i nomi delle celle:
questa funzione definisce i colori per riga.

Public Sub GEOSSetGridStyle(grd As SSDBGrid)

With grd
'definisce gli stili per i record cancellati e non...
'stile per la riga cancellata...
.StyleSets("cancellato").BackColor = RGB(255, 0, 0)
.StyleSets("cancellato").ForeColor = RGB(0, 0, 0)

'stile per la riga valida...
.StyleSets("esistente").BackColor = RGB(255, 255, 255)
.StyleSets("esistente").ForeColor = RGB(0, 0, 0)

'stile per la riga promozione...
.StyleSets("promo").BackColor = &HC0C000
.StyleSets("promo").ForeColor = RGB(0, 0, 0)

'stile per la riga promozione...
.StyleSets("promoMan").BackColor = RGB(255, 255, 0)
.StyleSets("promoMan").ForeColor = RGB(0, 0, 0)

'stile per la riga promozione negli ordini...
.StyleSets("ordini").BackColor = &HFFFF00
.StyleSets("ordini").ForeColor = RGB(0, 0, 0)

'stile per i prodotti da evidenziare...
.StyleSets("evidenzia").BackColor = &HFFFF00
.StyleSets("evidenzia").ForeColor = RGB(0, 0, 0)

End With

End Sub

Gammino
03-09-2002, 10:41
Secondo me sono ottime le flexgrid.

Devi scornarti un pò per capirle bene :dhò: ma poi ti trovi uno strumento estremamente flessibile alle varie esigenze (eh già: FlexGrid... :gren: )

Usa anche l'help di VB che non è poi così male...

serena
03-09-2002, 11:38
Grazie per tutti i suggerimenti.
Grazie Leo, proverò... anche se non ho capito bene come funziona, ma proverò a impostare il tutto.:ciauz:

Loading