Sección de códigos , trucos y ejemplos para visual basic


224 - Listar las fuentes del sistema y previsualizarlas

<Volver> - Anterior - Siguiente



 

 

Contenido de la página

 

 

 

 

 


Listar fuentes en un control ListBox y previsualizarlas

Rutina que carga las fuentes de windows en un control ListBox y previsualiza la fuente seleccionada en un pictureBox

Para cargar las fuentes se recorre en un bucle For-Next la cantidad de fuentes que hay instaladas ( con Screen.FontCount ).

Luego en el evento MouseMove del ListBox, se selecciona el Item de acuerdo a la posición del Puntero ( Esto se hace con el Api SendMessage ).

Por últimose se llama a una Sub que dibuja con el método Print en un PictureBox, la fuente para previsualizarla, como si fuese un ToolTip.

 

 

Controles:

Colocar en un Formulario lo siguiente :

Código fuente en el Form:

 


Visualizar las fuentes usando un control microsoft Flexgrid

Este ejemplo usa un control flexgrid oculto que se despliega al hacer el DropDown en un combobox.

Nota Actualizada. Este ejemplo asi como está realizado, además de pesimamente programado ( No le echo la culpa a nadie, por que lo hice yo =), contiene errores, por eso mejor no utilizarlo.

No me he puesto a pensar como reprogramarlo, pero si querés intentarlo, (creo no estoy seguro), que utilizando SetWindowPos en ves de MoveWindow, y ScreenToClient para cambiar las coordenadas de pantalla en ves de utilizar GetWindowPlacement y haciendo esas chapuzas para obtener la posición del control, y utilizando algunas otras Apis, podria funcionar. Además por supuesto de reprogramar todo los demás eventos en el control combo (SetFocus, Clic, DropDown que es un desastre ( No se si valdrá la pena, en fin ..)

Descargar

 


Font combo

Recurso programado y enviado por Miguel Nuñes de un control para visualizar las fuentes instaladas en el equipo.

Descargar proyecto

Vista previa del formulario demo

vista previa del proyecto

 


Recursos vb - Enlaces relacionados



Buscar en Recursos vb