Hola Gente!
Estoy preparando un examen para la facultad y me pedían manejar richtextbox.
El tema es que hice mediante un combobox un desplegable para las tipografías, y al dar click sobre el texto, actualizo todos los datos de formato de ese punto, como nombre de tipografia, tamaño, N, K, S, alineacion, etc etc.
El problema lo tengo cuando selecciono MÁS DE UNA TIPOGRAFÍA en simultáneo.
Visual me da una excepción no controlada (uffff) y no sé cómo manejarlo.
Les paso un pedacito del código:
Código:
Dim BO, IT, UN As Boolean
Dim AL As Integer
'REVISAR TEMA NOMBRES MULTIPLES DE FONTSELECTION !! -Genera Excepción-
FT = rtbTexto.SelectionFont.Name
T = rtbTexto.SelectionFont.Size
BO = rtbTexto.SelectionFont.Bold
IT = rtbTexto.SelectionFont.Italic
UN = rtbTexto.SelectionFont.Underline
AL = rtbTexto.SelectionAlignment
tipografia = listFuentes.Items.Contains(FT)
If tipografia = True Then
listFuentes.SelectedItem = FT
Else
listFuentes.Items.Add(FT)
listFuentes.SelectedItem = FT
End If
tamano = listTamano.Items.Contains(T)
If tamano = True Then
listTamano.SelectedItem = T
Else
listTamano.Items.Add(T)
listTamano.SelectedItem = T
End If
El resto anda perfecto, agrega tipografías que no se encuentren en el listado, como así los tamaños.
Agradecería ayuda!!
