Ejemplos usando el Api de windows para Visual basic

190 - Dibujar y trazar líneas en un HDC

<Volver> - Anterior - Siguiente



 

 

Ejemplo del Api LineTo que permite dibujar líneas en un dispositivo de contexto

 

La declaración de LineTo es la siguiente:

Private Declare Function _
LineTo Lib "gdi32.dll" ( _
ByVal hdc As Long, _
ByVal nXEnd As Long, _
ByVal nYEnd As Long) As Long

El primer parámetro es el Hdc, es decir donde dibujar

Los otros dos parámetros son las coordenadas x e y donde finalizará el trazado o la linea

En el siguiente ejemplo se dibujan lineas continuas en un Picturebox al presionar el mouse.

vista del formulario de ejemplo para dibujar las líneas en el picturebox conla función LineTo

 

Nota: También se usan tres funciones apis:

Función GetCursorPos para obtener la posición del cursor.

El ScreenToClient, lo que hace es pasar las coordenadas obtenidas con GetCursorPos a las coordenadas relativas al PictureBox, es decir los valores x / y de la pantalla al Hdc , en este caso el Picturebox.

La función MoveToEx, para mover y posicionar la primera ves que se hace clic en el picturebox, y poder establecer la posición inicial del cursor, ya que si no se usa esta función, el valor x e y del punto inicial es 0

 

Colocar un control Picturebox

Código fuente en el formulario

 


Recursos vb 6.0

Recursos visual basic.net



Buscar en Recursos vb