RichTextBox
Estoy utilizando este control en VB 6, y nunca lo había usado.
En él cargo un texto de un fichero, y luego lo imprimo. ¿Pero no puedo dar formato a ese texto? Por ejemplo, alguna línea en cursiva, otras en negrita para el título,... y que al imprimir se mantenga este formato.
Gracias, :)
Isa
En él cargo un texto de un fichero, y luego lo imprimo. ¿Pero no puedo dar formato a ese texto? Por ejemplo, alguna línea en cursiva, otras en negrita para el título,... y que al imprimir se mantenga este formato.
Gracias, :)
Isa
bueno Isa, la verdad es que a un RichTextBox le puedes dar varios tipos de formato, negrita, cursiva, subíndice, subrallado, sangría... etc
Sólo tienes que tener seleccionada la parte del texto a la que le quieres aplicar el formato, y por ejemplo, poner este código en un CommadButton:
Private Sub CommandCursiva_Click()
RichTextBox1.SelItalic = Not RichTextBox1.SelItalic
End Sub
esto alternaría el aplicar o quitar el formato de cursiva del texto seleccionado.
Para poder imprimir el contenido, manteniendo los formatos aplicados, debes dejar la seleccion a cero, es decir:
Private Sub CommandImprimir()
RichTextBox1.SelLength = 0
RichTextBox1.SelPrint (Printer.hDC)
End Sub
Para que conozcas todo lo que te permite, solamente selecciona el texto "SelItalic" que te he puesto y presiona F1.
Examina el apartado "Vea también", y sobre todo el "Se aplica a", desde donde podrás consultar las propiedades, métodos y eventos relacionados en el control RichTextBox. Verás que puedes hacer de todo.
Saludos.
Sólo tienes que tener seleccionada la parte del texto a la que le quieres aplicar el formato, y por ejemplo, poner este código en un CommadButton:
Private Sub CommandCursiva_Click()
RichTextBox1.SelItalic = Not RichTextBox1.SelItalic
End Sub
esto alternaría el aplicar o quitar el formato de cursiva del texto seleccionado.
Para poder imprimir el contenido, manteniendo los formatos aplicados, debes dejar la seleccion a cero, es decir:
Private Sub CommandImprimir()
RichTextBox1.SelLength = 0
RichTextBox1.SelPrint (Printer.hDC)
End Sub
Para que conozcas todo lo que te permite, solamente selecciona el texto "SelItalic" que te he puesto y presiona F1.
Examina el apartado "Vea también", y sobre todo el "Se aplica a", desde donde podrás consultar las propiedades, métodos y eventos relacionados en el control RichTextBox. Verás que puedes hacer de todo.
Saludos.