Sinfogeo. Cursos SIG y Soluciones Geomáticas

  • Increase font size
  • Default font size
  • Decrease font size
Estás en Inicio Lee nuestro BLOG Crear un comando con VB6 para Geomedia

Crear un comando con VB6 para Geomedia

Rate this item
(9 votes)

La mejor forma de crear un comando con Geomedia es utlizando el Asistente de Comandos, que es una herramienta que ayuda a realizar la parte de construcción del esqueleto de una aplicación. Después, se irá añadiendo funcionalidad, pero a partir del código generado por el Asistente.

Como parte de este proceso el asistente de comandos genera un módulo de Clase, una subrutina main y dependiendo de las selecciones del usuario, un form. El asistente crea las partes de código que son iguales para cualquier comando.

El asistente de comandos es un Complemento de Visual Basic Add-in. Para invocarlo, hay que seguir los siguientes pasos:

1.- Complementos -> Administrador de complementos

curso-gis

Cuando el asistente está disponible para desarrollo de comandos, aparece como entrada en el menú de complementos.

curso-gis

El cual nos irá guiando con diferentes forms hasta completar el código necesario.

En este ejemplo, crearemos un sencillo comando modal con un botón que muestre un saludo cuando pulsemos en él.

Lo primero que nos pide es la ruta y nombre del subdirectorio que contendrá el comando. En ese espacio, será donde creen las carpetas src y bin. En la carpeta src se escribirá el código fuente, mientras que en la carpeta bin se escribirá la dll.

curso-gis

La siguiente pantalla, nos pide el nombre del comando, su descripción y el texto que aparecerá como tooltip cuando nos posicionemos con el ratón encima del comando.

curso-gis

Después, el asistente nos pide los bitmaps que se utilizarán como iconos del comando. Nosotros, lo dejaremos tal cual para que aparezca el icono propio de Geomedia.

La siguiente pantalla es para preguntarnos si el comando será modal o no modal, nosotros elegiremos modal. Los comandos modales toman el control completo de la aplicación hasta que el comando acaba. Este grupo incluye a todos los comandos que muestran cajas de diálogo para pedir entrada de datos antes de realizar su procesamiento (File Open, File Send Mail), comandos que se habilitan cuando se selecciona un tipo de objeto y comandos que no requieren interacción de parte del usuario después de arrancados.

Después, el asistente nos pedirá si el comando contendrá un formulario. Le diremos que sí de la forma que se muestra en la imagen.

curso-gis

En la siguiente pantalla del asistente es donde hay que indicarle los condicionantes para que el comando arranque. Aquí, por ejemplo, le podríamos decir que sólo se habilitara cuando tengamos una conexión a almacén creada. En nuestro caso, lo dejamos sin modificar.

Y por fin, tendremos la pantalla de finalización de comando creado.

curso-gis

VB nos preguntará si deseamos abrir el proyecto. Una vez abierto observaremos que nos ha generado la siguiente estructura de proyecto:

curso-gis

Ahora, sólo resta ‘tocar’ ligeramente el código para que cuando invoquemos al comando desde Geomedia aparezca nuestro form que contendrá un botón que nos muestra un saludo.

Para ello, en el código del formulario “frmmiComando”, añadimos la siguiente línea (en negrita):

Option Explicit
Private Sub Command1_Click()
Hide
MsgBox "Hola comando", vbExclamation, "Primer comando"
End Sub

Y compilamos para que se generen el fichero .ini y .dll en el directorio del comando.

Ahora, sólo queda registrar en Windows la dll recién creada y añadir el comando a nuestro geoworkspace para poder llamarlo desde Geomedia, pero esto se explica en otra entrada al blog.

Leave a comment

Rellena los campos con asterisco (*)