Trabajo En Equipo

Visual Basic Guía del Estudiante Capítulo 17
Funciones API de Windows

Las APIs de Windows son un serie de funciones que Windows tienen implementadas al servicio del programador. Estas funciones se llaman API (Interfaz para Programación de Aplicaciones) y están en las innumerables DLLs que tiene Windows. Las APIs tienen la virtud de acceder a partes de la máquina o del sistema operativo a lasque no podríamos acceder mediante Visual Basic. Las APIs pertenecen como decíamos a Windows, por lo que pueden ser usadas por programas escritos en cualquier lenguaje de programación. Es muy interesante utilizarlas, pues reducen el tamaño del programa ejecutable frente a otras posibilidades con controles, aparte de darle mayor rapidez de ejecución, al tratarse de código ya compilado.

Dado queeste libro tiene lógicamente un alcance limitado, y el tema de APIs es enorme, se recomienda recurrir a un libro específico de APIs. Este no puede ser otro que el siguiente :

TITULO API de Win32. Guía del Programador de Visual Basic
AUTOR Daniel Appleman. Editorial InforBooks - Barcelona
ISBN 84-89700-22-2
Citaremos este libro repetidas veces a lo largo de este capítulo.

DanielAppleman es el fundador de Desaware Inc. http://www.desaware.com/ Su página es visita obligada.

Nota introducida en el 2001 - Aparte de este libro, existe un recurso en Internet que incluso le supera, y que tiene la gran ventaja de que se trata de un sistema informático donde puede copiar y pegar código. Puede encontrarlo en http://www.allapi.net/
Desde que lo he descubierto he dejado elLibro de Appleman un poco aparcado. Sin embargo las explicaciones aportadas en ese libro son difícilmente sustituibles.

Para usar una función API lo primeros que tenemos que hacer es declararla en nuestra aplicación. La declaración debe hacerse en la sección de declaraciones de un formulario o módulo. Si la declaramos en un formulario, necesariamente debemos declararla como privada.

Unadeclaración sencilla podría ser la de la función API Sleep :

Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

Aquí se ha declarado como pública. Es lo mismo que decir:

Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

En un formulario no se puede declarar como pública. Deberemos poner

Private Declare Sub Sleep Lib "kernel32"Alias "Sleep" (ByVal dwMilliseconds As Long)

En esta declaración lo que le estamos diciendo es que, en la librería kernel32 está escrita una función llamada Sleep (Es el nombre que figura entre comillas en la declaración) y que le tenemos que pasar un parámetro, el tiempo que queremos que se pare la ejecución de la aplicación, expresado en milisegundos. Nos dice la declaración que el parámetrose le pasa Por Valor (ByVal) y que ese dato debe ser un Long, es decir, si se lo pasamos como una variable, esa variable debe ser del tipo Long. Una vez declarada esta función, en la sección de declaraciones de un módulo o de un formulario, podremos acceder a ella en cualquier parte de la aplicación (las partes de la aplicación donde se puede usar dependerá del ámbito de la declaración, que esidéntica que para las variables) usando una línea de código como esta :

Sleep (500) y la aplicación se detendrá medio segundo cuando llegue a esa línea

ó Sleep (tiempo) donde tiempo es una variable tipo Long que contiene el tiempo (en
milisegundos) que queremos detener el programa.
Esta API es muy sencilla. Por eso comenzamos por ella. La hay mas complicadas. Por ejemplo, laque obtiene el número de serie del disco duro : GetVolumeInformation

Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" (ByVal _ lpRootPathName As String, ByVal lpVolumeNameBuffer As String, ByVal nVolumeNameSize _ As Long, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, _ lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String,...