| |||
Pintar sobre un PictureBox Hola foro alguien sabe como puedo pintar un grafico rectangulo, circulo o lo ke sea sobre un picture box?.... lo hago pero el grafico siempre se ponedebajo del picture box... alguien tiene alguna idea? lo unico ke he logrado es escribir sobre el picture box pero no puedo lograr ke se dibuje sobre él. espero me puedan ayudar.. mil gracias. |
| |||
ps ya lo hice por si alguien en algun momento se intereso le dejo el codigo
Código:
Imports System Imports System.Drawing Imports System.Windows.Forms Public Class CargarImagen Inherits Form Private Img As Image 'imagen Public X1 As Integer = 0 'posicion inicial en x Public Y1 As Integer = 0 'posicion inicial en y Sub New(ByVal Ruta As String, Optional ByVal Encabezado As String = "", Optional ByVal X As Integer = 0, Optional ByVal Y As Integer = 0) Img = Image.FromFile(Ruta) X1 = X 'por si kiere especificar otro punto de inicio Y1 = Y 'ke no sea 0,0 Dim grfxImage As Graphics = Graphics.FromImage(Img) Dim Szf As SizeF = grfxImage.MeasureString(Encabezado, Font) BackColor = SystemColors.Window ForeColor = SystemColors.WindowText ResizeRedraw = True End Sub Protected Overrides Sub OnPaint(ByVal e As System.Windows.Forms.PaintEventArgs) Dibuja(e.Graphics, ForeColor, ClientSize.Width, ClientSize.Height) End Sub Public Sub Dibuja(ByVal Grfx As Graphics, ByVal Clr As Color, ByVal cX As Integer, ByVal cY As Integer) Grfx.DrawImage(Img, X1, Y1) End Sub End Class |