Ejemplos usando el Api de windows para Visual basic

127 - CreateFontIndirect - Rotar fuente

Volver al Listado Api - Anterior : Siguiente



 

 

Ejemplo que permite rotar una fuente utilizando las funciones Api CreateFontIndirect, SelectObject y DeleteObject

 

Vista del ejemplo:

Formulario que muestra la fuente con rotación dibujada en el control Picturebox

 

En el código hay una función de ajuste llamada Rotar_Fuente que tiene los siguientes parámetros:

 

El texto, el tamaño de la fuente, la posición x, posicioón Y donde se dibujará, Objeto es donde dibujar (un form, PictureBox, Printer), el grado de rotación, el nombre de la fuente a utilizar y el color de la misma.

Nota: si bien en el combo se listan todas las fuentes del sistema, con algunas no funciona.

También una estructura que utiliza el api llamada LOGFONT, que permite especificar propiedades y algunos valores, como la calidad de la fuente, el ancho, alto. La propiedad de esta estructura que especifica el valor de rotación se llama lfEscapement.

 

Colocar en un formulario los siguientes controles:

Un Picture1 , un Combo1 llamado Combo_Fuente, un Text1, un ScrollBar1

 

Código fuente:

 


Enlaces relacionados



Buscar en Recursos vb