Puntos clave del desarrollo secundario de VB y MapInfo

(1) Creación de un objeto MapInfo

Este sistema utiliza la tecnología de automatización OLE para crear un objeto de aplicación MapInfo en VB y luego opera el objeto en el entorno VB (Zhang Feng et al. , 2004). Primero, declare una variable de objeto en el entorno VB, como Map-Info, y luego use la función CreateObject () para crear el objeto MapInfo en VB, con la siguiente declaración:

Set MapInfo = CreateObject( "MapInfo. Applicaiton")

Para conectarse a un MapInfo en ejecución, debe utilizar la función GetObject () de Visual Basic.

Set MapInfo = GetObject( "MapInfo. Application")

Dado que esta declaración crea un objeto de aplicación MapInfo, debe haber una plataforma de software MapInfo en el sistema informático local; de lo contrario, se producirá un error. Ocurrirá No se podrá crear MapInfo. No se puede crear el objeto de aplicación MapInfo. El desarrollo de mapas integrado inicia MapInfo en segundo plano llamando declaraciones en el programa. Después de crear el objeto, puede utilizar las propiedades y métodos del objeto MapInfo en el entorno VB. A través del navegador de objetos de VB, puede ver las propiedades y métodos del objeto MapInfo, el más utilizado es el método do. El método do del objeto de aplicación MapInfo reconoce y ejecuta la cadena de línea de comando. Dado que el sistema MapInfo contiene los archivos de biblioteca "MapBasic.def" y "Menu.def" e integra muchas funciones de comando, algunas funciones de MapInfo se pueden completar en VB con solo una o dos declaraciones, lo cual es muy conveniente de usar.

(2) Resultados de la evaluación de VB de la visualización y el rediseño de gráficos de MapInfo

En el sistema de software GIS, el sistema completa automáticamente las funciones de visualización y rediseño de los gráficos, pero debido a It utiliza tecnología OLE para integrar el sistema MapInfo en el entorno VB. La visualización gráfica y el redibujado solo se pueden completar en el entorno VB. Esto se debe a que VB en sí no puede reconocer MapInfo. Debido a que VB no reconoce el formato de gráficos de MapInfo, no puede mostrar ni volver a dibujar gráficos. Utilice la instrucción Map Basic "establecer ventana de aplicación" para subordinar el cuadro de diálogo MapInfo y la ventana de mensaje de error al programa cliente. La instrucción "Establecer siguiente documento" permite que la ventana se "regenere". En el entorno integrado de VB y MapInfo, la visualización gráfica se puede lograr a través de la ventana MapInfo o la ventana VB permite que el mapa se muestre en tres modos. entorno Estilo 1: representa el formulario sin modelo, es decir, el mapa se completará con el formulario VB completo, al igual que los gráficos MapInfo se pegan en el formulario VB (Zhang et al., 2004: Generar un pop). ventana emergente con una barra de título de altura media (Similar a la ventana de leyenda de MapInfo Estilo 3: genera una ventana con una barra de título de altura completa. Los dos últimos modos no pueden maximizar ni minimizar la ventana de gráficos, lo que genera inconvenientes para el usuario). y no se ajusta al estilo del sistema Windows, este sistema adopta el modo estilo 1

MapInfo permite utilizar los siguientes comandos para mostrar gráficos en formularios VB:

" Establecer siguiente documento padre" Form1. hWnd "estilo 1"

Form1 es el formulario que muestra gráficos en VB.

Puede abrir mapas MapInfo y tablas de datos en un entorno VB. Pero también hay algunos problemas cuando la ventana de VB está maximizada, los gráficos de MapInfo no se pueden volver a dibujar. Es decir, cuando el usuario cambia el tamaño de la ventana del mapa, MapInfo no restablecerá automáticamente el contenido del mapa para llenar la ventana. el tamaño de la nueva ventana. Esto debe lograrse escribiendo código utilizando la función MoveWindow de la API de Windows para que el mapa se vuelva a dibujar cada vez que cambie el tamaño del formulario.

(3) Salida del informe

El informe se genera leyendo la información de evaluación almacenada en la base de datos y llamando a la ubicación del informe correspondiente de acuerdo con el formato correspondiente, como se muestra en la Figura 7. 9. El punto clave es leer la base de datos e imprimir. El siguiente es el código para leer la base de datos e imprimir:

Figura 7.9 Interfaz de salida e impresión del informe

Straql = "select. * de pingjia donde nombre = "'"'. texto1. texto &'""

ExecuteSql(Strsql)

Me.Imprimir formulario