Noticias:
 Letras de canciones
 Nuevo WinEsquema 5
En ésta página:
Todos los programas
 FolderQuote
 Image Tools
Dominios de Internet
 IPUpdate 2
 Artículos y fuentes
 Software matemático
Pequeñas utilidades
Servicios:
IPTools
Traducción En>Es
 Contactar con el autor
 Valore la página
|
HTML Suite ActiveX 32-bits Control
HTML Suite es un componente ActiveX de 32-bits para la creación,
composición y visualización de documentos HTML textuales de manera visual. El
usuario no necesita conocer HTML para crear documentos, abrirlos
posteriormente... El control
htmlsuite.ocx contiene HTMLed y HTMLTextBox. Éstos componentes pueden ser
utilizados para multitud de aplicaciones, como gestores de correo electrónico,
editores de texto con formato hasta cualquier programa que necesite de la
edición de texto con formato y posibilidad de exportación a HTML.
Para cargar el componente, seleccione en la lista de componentes "FlavioHTMLSuite".
Hecho esto, aparecerán dos nuevos controles a la caja de componente.
HTMLed
Para empezar, inserte el primer componente (HTMLed) en un formulario vacío.
Como puede observar a simple vista, contiene el área de escritura y una
barra de herramientas con los comandos más generales (formato, alineación de
texto, fuente y color). Puede ocultar ésta barra llamando al método
HideToolbar() y volver a mostrarla llamando al método ShowToolbar(). A
continuación se detallan los comandos para manejar éste componente en sus
aplicaciones Visual Basic:
| Eventos |
Se genera |
| OnDiskAccess() |
Cuando el componente intenta acceder a disco para
operaciones de escritura. |
| RTF2HTMLStart(Time) |
Al comenzar la conversión a código HTML. |
| RTF2HTMLProgress(Total, Actual) |
En progreso de conversión (suministra los caracteres
totales y el actual). |
| RTF2HTMLEnd(Time) |
Al finalizar la conversión a código HTML. |
| OnOpenStateStart(ActualTime) |
Al comenzar la carga del estado. |
| OnOpenStateEnd(ActualTime) |
Al finalizar la carga del estado. |
| OnColorClick() |
Al desplegar la paleta de colores. |
| OnColorChange(NewColor) |
Al seleccionar un nuevo color. Pasa como parámetro el nuevo
color seleccionado. |
| OnColorCancelClick() |
Al cancelar la selección de color. |
| OnColorPaletteOversize() |
Al desplegar la paleta de colores y exceder el tamaño
disponible del control. |
| OnToolbarOversize() |
Al redimensionar el control y la barra de herramientas no
puede mostrarse completa. |
| OnBoldClick() |
Al activar / desactivar negrita. |
| OnItalicClick() |
Al activar / desactivar cursiva. |
| OnUnderlineClick() |
Al activar / desactivar subrayado. |
| OnStrikeThruClick() |
Al activar / desactivar tachado. |
| OnBulletsClick() |
Al activar / desactivar viñetas. |
| OnAlignmentChange() |
Al cambiar la alineación de texto. Pasa como parámetro un
entero, 0, 1 ó 2 según la nueva alineación si es izquierda, centrada o
derecha, respectivamente. |
| OnFontChange(NewFontCaption) |
Al cambiar la fuente. Devuelve como parámetro la nueva
fuente seleccionada (texto). |
| OnFontSizeChange(NewSizeIndex) |
Al cambiar el tamaño de la fuente. Devuelve como parámetro
el índice del elemento seleccionado. |
| OnEditBoxClick() |
Al hacer clic en la caja de edición. |
| OnEditBoxMouseMove(x, y) |
Al mover el ratón por la caja de edición. Pasa como
parámetros las coordenadas en twips. |
| OnEditBoxMouseDown(x, y) |
Al hacer bajar cualquier botón del ratón sobre la caja de
edición. |
| OnEditBoxMouseUp(x, y) |
Al subir cualquier botón del ratón sobre la caja de
edición. |
| OnEditBoxChange() |
Al cambiar el texto de la caja de edición. |
| OnEditBoxSelectChange(SelectionStart, SelectionLength) |
Al cambiar la selección de texto en la caja de edición.
Devuelve como parámetro la posición inicial de la selección y la
longitud de ésta (en caracteres). |
| OnEditBoxKeyPress(KeyCode) |
Al presionar una tecla sobre la caja de edición. Devuelve
como parámetro el código ASCII de la tecla presionada. |
| OnResize(Width, Height) |
Al cambiar las dimensiones del control. Devuelve como
parámetros las nuevas dimensiones. |
| Métodos |
Descripción |
| SetHTMLCode(HTMLCode) |
Restaura el contenido del editor a partir de un código HTML. |
| SetPlainText(NewText) |
Fija el texto de la caja de edición (sin formato). |
| SetFont(Index) |
Fija una fuente de la caja de edición (pasando como
parámetro el índice dentro de la lista). |
| SelectText(SelectionStart, SelectionEnd) |
Selecciona un texto de la caja de edición. |
| TranslateInterface(Bold, Italic, Underline, StrikeThru,
Bullets, LeftAlignment, CenterAlignment, RightAlignment, Fonts, Sizes,
Colors) |
Traduce los distintos elementos de la interface (Tooltips de
la botonera). |
| SortFonts() |
Ordena alfabéticamente las fuentes de la lista. |
| SaveState() |
Guarda el estado de la caja de edición. |
| OpenState() |
Recupera el estado de la caja de edición. |
| SaveRTF(Filename) |
Salva el contenido de la caja de edición en un archivo RTF. |
| OpenRTF(Filename) |
Recupera el estado de la caja de edición a partir de un
archivo RTF. |
| SaveSelectedRTF(Filename) |
Salva el contenido seleccionado de la caja de edición en un
archivo a parte. |
| ShowToolbar() |
Muestra la barra de botones. |
| HideToolbar() |
Oculta la barra de botones. |
| PrintSelected() |
Imprime el texto seleccionado de la caja de edición. |
| LockSelectedText(Locked) |
Bloquea o desbloquea el texto seleccionado. |
| SetBackColor(NewColor) |
Fija el color de fondo de la caja de edición. |
| AboutBox(UsingBy) |
Muestra el cuadro acerca de del control HTMLed. El
parámetro UsingBy determina el usuario que usa el control en la
aplicación, será mostrado en el cuado de diálogo. |
| Funciones |
Descripción |
| GetPlainText() |
Recupera el texto sin formato de la caja de edición. |
| GetFont() |
Recupera el índice seleccionado de la lista de fuentes. |
| GetHTMLCode(SerialNumber, [WriteToDisk], [Filename], [OutputAppend],
[DiskInterval], [SpecialCodes]) |
Recupera el código HTML del texto de la caja de edición.
| SerialNumber |
Para evitar su uso extrayendo éste componente de una
aplicación cualquiera, visite ésta página para obtener el número
de serie, es [HTMLED-FREESERIAL-FORFREEUSE] |
| WriteToDisk |
Valor booleano que indica si se realiza una
salvaguardia periódica de la traducción del código HTML.
Si el documento que desea obtener el código HTML es muy extenso,
puede interesarle escribir el resultado en disco. |
| Filename |
Nombre del archivo a escribir, si se fijó la
propiedad anterior a True |
| OutputAppend |
Valor boolean. Fija el modo de escritura. True =
Output; False = Append |
| DiskInterval |
Intervalo entre impresión e impresión a disco del
archivo (en caracteres) |
| SpecialCodes |
Valor booleano que indica si se sustituyen los
caracteres especiales por códigos html (p. ej: á > á) |
|
HTMLTextBox
HTMLTextBox es una caja de texto multilína semejante al control TextBox,
pero con mejoras que le permiten trabajar con códigos HTML. En primer lugar
permite colorear las etiquetas HTML en un color y el texto normal en otro,
además de definir distintas fuentes, tamaños y estilos para las etiquetas y el
texto normal.
Ahora, para probar el componente, incluya las siguientes líneas de código
en el evento Form_Load():
Sustituya en la tercera línea la ruta por una válida que vincule a un
archivo HTML. Ejecute el programa (F5) y observará el resultado:
A continuación se describen los distintos eventos, funciones y métodos de
los que dispone el componente:
| Eventos |
Se genera |
| OnChange() |
Al cambiar el texto del control. |
| OnClick() |
Al hacer click en el control |
| OnKeyPress() |
Al producirse pulsaciones de teclado sobre el
control. |
| OnMouseMove(X, Y) |
Al mover el cursor sobre la caja. |
| OnMouseDown(X, Y) |
Al bajar el botón del mouse sobre la caja. |
| OnMouseUp(X, Y) |
Al subir el botón del mouse sobre la caja. |
| Métodos |
Descripción |
| PaintCode() |
Pintar de nuevo las etiquetas y el texto normal
según las configuraciones. El control pinta automáticamente al cambiar
su texto por código y al escribir. Si se llama a éste método
independientemente resultará más lento a que si se espera que se pinte
sobre la marcha. |
| SelectText(SStart, SEnd) |
Selecciona un texto dentro de la caja. SStart
define el carácter inicial y SEnd el final. |
| SetFont([ApplyToTags], [NewFontName], [NewFontSize],
[NewBold], [NewItalic], [NewUnderline]) |
Fija los estilos a las etiquetas o al texto.
| ApplyToTags |
Valor booleano. Si es True, las configuraciones se
aplican a las etiquetas, si es False, al texto normal.
Si se omite se sobreentiende que afecta a las etiquetas. |
| NewFontName |
Fija la fuente para el elemento.
Si se omite se sobreentiende que es "Arial". |
| NewFontSize |
Fija el tamaño de la fuente para el elemento.
Si se omite se sobreentiende que es 10. |
| NewBold |
Fija la negrita para el elemento.
Si se omite se sobreentiende que está desactivada. |
| NewItalic |
Fija la cursiva para el elemento.
Si se omite se sobreentiende que está desactivada. |
| NewUnderline |
Fija subrayado para el elemento.
Si se omite se sobreentiende que está desactivada. |
|
| SetForeColor(NewColor) |
Fija el color para el texto normal. |
| SetHTMLCode(HTMLCode) |
Fija el texto del control. |
| SetTagColor(NewColor) |
Fija el color para las etiquetas. |
| Funciones |
Descripción |
| GetHTMLCode() |
Devuelve el contenido del control. |
| GetSelStart() |
Devuelve la posición inicial de la selección. |
| GetSelEnd() |
Develve la posición final de la selección.
|
Descargar
El componente HTMLSuite necesita RichTextBox
para funcionar. Cuando distribuya sus aplicaciones usando éste componente, asegúrese
de que el componente RichTextBox también se incluya. Haga clic en los
siguientes enlaces de descarga del componente según su preferencia:
También puede bajar un ejemplo realizado con éste componente (necesita
haber bajado el componente):
|
