Foros del Web » Programación para mayores de 30 ;) » .NET »

Pintar sobre un PictureBox

Estas en el tema de Pintar sobre un PictureBox en el foro de .NET en Foros del Web. 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 ...
  #1 (permalink)  
Antiguo 11/10/2006, 15:34
 
Fecha de Ingreso: abril-2005
Mensajes: 44
Antigüedad: 19 años
Puntos: 0
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.
  #2 (permalink)  
Antiguo 12/10/2006, 18:29
 
Fecha de Ingreso: abril-2005
Mensajes: 44
Antigüedad: 19 años
Puntos: 0
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
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 19:46.