Ejemplos usando el Api de windows para Visual basic

266 - Cuadro de diálogo para visualizar archivos RTF y de texto

<Volver> - Anterior - Siguiente



 

 

 

Ejemplo que usa algunas funciones del Api para poder subclasificar un cuadro de diálogo y ver vista previa de archivos RTF y archivos de texto

 

El ejemplo tiene un módulo de clase que tiene un método para abrir el diálogo. Al método Show se le debe enviar como parámetro el control RichTextBox y las extensiones a visualizar,

Al abrirse, el control richTextBox se posiciona dentro de la ventana del cuadro de diálogo con la api SetParent y otras para redimensionar el control. Luego al seleccionar un archivo RTF o de texto , se carga el contenido del mismo con el método Loadfile del RichTextBox

 

Nota: tiene una propiedad para establecer el ancho del RichTextbox de la ventana, pero esa medida no es el ancho real del RichTextBox en pixeles, si no que por defecto , si no se indica un valor se visualziará con un ancho de 236 pixeles. O sea que al indicar el valor para el ancho se le sumará a estos 236

Importante : el ejemplo tiene un error que es el siguiente

El control RichTextBox que se envia como parámetro al método Show, debe ser parte de un array de RichTextBox, y se debe crear uno con el método Load y enviar este a la función . Es decir :

.ShowOpenFileDialog(RichTextBox1(1), Me, rtf + TXT)

 

Por que si se envia directamente el control sin que forme parte de un array o matriz de control , por ejemplo :

.ShowOpenFileDialog(RichTextBox1, Me, rtf + TXT)

La primera ves que se abra el diálogo, se cargará correctamente el fichero seleccionado con el método Loadfile , pero la segunda ves que se abra el Diálogo, fallará el método. ( No se si es un bug del RichTextBox o un error en el código fuente)

 

Descargar

 

 

 



Buscar en Recursos vb