Gambas-it

Archivi (sola lettura) => Programmazione (Gambas 2) => Topic aperto da: Picavbg - 06 Gennaio 2012, 23:45:25

Titolo: Riempire una cella di GridView
Inserito da: Picavbg - 06 Gennaio 2012, 23:45:25

Qualcuno ricorderà certamente questa discussione (http://www.gambas-it.org/smf/index.php?topic=526.msg4888#msg4888) riguardante "come centrare una stringa nella testata della GridView". Ora mi si è presentato un'altra necessità: riempire una o più celle di una GridView con valore costante.
Ho risolto, richiamando di volta in volta la classe seguente classe:

Codice: gambas [Seleziona]

PRIVATE i_LunCasel AS Integer
PRIVATE i_LunSpazio AS Integer
PRIVATE i_LunTesto AS Integer
PRIVATE i_Risult AS Integer

PUBLIC SUB _new(hObject AS GridView, i_NumRg AS Integer, i_NumCol AS Integer, $_Testo AS String)
'-------------------------------------------------------  
'  i_LunTesto = hObject.Font.Width($_Testo)   
  i_LunCasel = hObject.Columns[i_NumCol].Width
  hObject[i_NumRg, i_NumCol].text = String$(i_LunCasel, $_Testo)
END 

Ho pensato che possa tornare utile, quindi ...  Buona befana a tutti!  :D ;D
 :ciao: :ciao: