Cómo: Dibujar una línea rellena con una textura
Actualización: noviembre 2007
Las líneas se pueden dibujar con una textura en lugar de dibujarse con un color sólido. Para dibujar líneas y curvas con una textura, cree un objeto TextureBrush y páselo a un constructor Pen. El mapa de bits asociado al pincel de la textura se utiliza para organizar el plano en mosaico (de manera invisible) y, cuando el lápiz dibuja una línea o curva, el trazo del lápiz destapa algunos de los píxeles de la textura con diseño de mosaico.
Ejemplo
En el siguiente ejemplo se crea un objeto Bitmap a partir del archivo Texture1.jpg. Ese mapa de bits se utiliza para construir un objeto TextureBrush que, a continuación, se utiliza para construir un objeto Pen. La llamada a DrawImage dibuja el mapa de bits con la esquina superior izquierda en (0, 0). La llamada a DrawEllipse utiliza el objeto Pen para dibujar una elipse con textura.
En la siguiente ilustración se muestran el mapa de bits y la elipse.
.png)
Dim bitmap As New Bitmap("Texture1.jpg")
Dim tBrush As New TextureBrush(bitmap)
Dim texturedPen As New Pen(tBrush, 30)
e.Graphics.DrawImage(bitmap, 0, 0, bitmap.Width, bitmap.Height)
e.Graphics.DrawEllipse(texturedPen, 100, 20, 200, 100)
Bitmap bitmap = new Bitmap("Texture1.jpg");
TextureBrush tBrush = new TextureBrush(bitmap);
Pen texturedPen = new Pen(tBrush, 30);
e.Graphics.DrawImage(bitmap, 0, 0, bitmap.Width, bitmap.Height);
e.Graphics.DrawEllipse(texturedPen, 100, 20, 200, 100);
Compilar el código
Cree un formulario Windows Forms y controle el evento Paint del formulario. Pegue el código anterior en el controlador de eventos Paint. Reemplace Texture.jpg por una imagen válida en su sistema.