Ciao Antonio
Una domanda: posso salvare un colore nella cella di una listbox?
ciao
Ciao Antonio
Una domanda: posso salvare un colore nella cella di una listbox?
ciao
Ciao Alan,
spero non ti dispiaccia se ti rispondo io invece di Antonio
La domanda non chiarissima, ma provo a risponderti:
La Listbox pu memorizzare un “tag” sotto forma di Variant per ogni cella, di conseguenza tu puoi fare una cosa simile:
dim c as Color = &cFF00FF
Listbox1.cellTag(0, 0) = c
Questo memorizzer il colore come tag della cella 0, 0 (riga, colonna).
Ciao Massimo
Figurati anzi grazie 1000!!
Hai ragione la domanda non era molto chiara cosicche la riformulo: vorrei che la cella di una listbox assumesse un colore specifico e che questo colore si possa memorizzare come fosse un dato qualisiasi. E’ possibile farlo?
Grazie Massimo
Allora, dopo aver memorizzato il colore in ogni cellTag come ho spiegato prima, implementi l’evento CellBackgroundPaint() con codice tipo questo:
if row < me.listCount then
if me.cellTag(row, column) <> nil then
g.foreColor = me.cellTag(row, column)
g.fillRect(0, 0, g.width, g.height)
end if
end if
ok adesso lo provo subito e ti faccio sapere
grazie 1000 Massimo
Not really. If you return true
here, you will have to handle the drawing even for the selection, which is unwanted I believe from the request.
esatto Massimo hai centrato il punto
ciao