Gráficos (Líneas, figuras geométricas)

En el namespace system.drawing podemos encontrar todo lo necesario para poder crear líneas y figuras geométricas que ayuden a mejorar la presentación de las aplicaciones que desarrollados, y lo mejor es que lo podemos hacer con unas pocas líneas de código.

Pero ¿cómo creamos la figura?, lo primero es crear un objeto del tipo graphics, luego creamos un pen, y luego llamamos el método de graphics según sea lo que vamos a dibujar ej. DrawPie, DrawRectangle, DrawLine, DrawEllipse, entre otros. Pero veamos un ejemplo concreto (se requiere una Windows aplication):

Dim figura As Drawing.Graphics Dim lapiz As New Pen(Color.Chocolate, 5) figura = Me.CreateGraphics figura.DrawEllipse(lapiz, 80, 50, 30, 30) figura.DrawEllipse(lapiz, 160, 50, 30, 30) figura.DrawEllipse(lapiz, 10, 10, 250, 250) figura.DrawLine(lapiz, 135, 100, 135, 140) figura.DrawArc(lapiz, 90, 100, 90, 90, -180, -180)

También este namespace tiene otras utilidades para controlar la posición, tamaño, y el aspecto de los controles visuales. Veamos:

Empezando por lo más básico, una de las primeras cosas que tenemos que definir es la posición de la figura que deseamos dibujar, para esto usamos el sistema de coordenadas "x" y "y". Donde "x" es la distancia en pixeles desde el límite izquierdo y "y" es la distancia en pixeles desde el límite superior de nuestro contenedor, por ejemplo.

Control.Location = New Point(10, 10)

También es muy común definir el tamaño de la figura, para esto definimos el ancho y el alto de la siguiente forma.

Control.Size = New Size(30, 30)

Una vez definida la posición y el tamaño podemos definirle el color. Veamos,

Control. BackColor = Color.Blue