Buongiorno a tutti voi.
Ho un DGV. Il multi select è false.
Ho programmato in modo che -cliccando su una riga- la dimensione del carattere aumenti di una unità e style diventi bold.
E' evidente che -prima di modificare la riga corrente- devo riportare tutte le righe del DGV al font originale per non avere più righe in grassetto.
Ho scritto il seguente codice :
OriginalFont = DGV.DefaultCellStyle.Font : per memorizzare il font di default della riga
Private Sub DGV_Click(sender As Object, e As EventArgs) Handles DGV.Click
'riporto tutte le righe al font originale
For Each riga As DataGridViewRow In DGV.Rows
riga.DefaultCellStyle.Font = OriginalFont
Next
'cambio il font della riga cliccata
Dim newFont As New Font(OriginalFont.FontFamily, OriginalFont.Size + 1, OriginalFont.Style.Bold)
DGV.CurrentRow.DefaultCellStyle.Font = newFont
End Sub
Ora, per evitare di dover scorrere tutte le righe del DGV per riportarle al font originale, ho scritto questo codice per uscire dal ciclo subito dopo aver modificato la precedente riga selezionata :
For Each riga As DataGridViewRow In DGV.Rows
If riga.DefaultCellStyle.Font.Style.Bold Then
riga.DefaultCellStyle.Font = OriginalFont
Exit For
End If
Next
Non funziona, assolutamente!
Qualche idea?