SoloCodigo
CLR: .Net / Mono / Boo / Otros CLR => VB .NET => Mensaje iniciado por: Soultaker en Miércoles 29 de Diciembre de 2004, 13:50
-
Hola que tal alguien sabe como puedo hacer para dibujar una linea en el formulario osea yo le doy de que posicion a que posicion quiero que se dibuje, lean bien en el formulario ni en picturebox ni en otro tipo de control. Si alguien sabe como espero sus respuestas.
:comp: :D
-
...hey!! esa me la sé!!! :D
Te pongo un código de ejemplo que yo utilizo para un título y marcar los puntos de un menú de un formulario :good:
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles MyBase.Paint
Dim DibF As Graphics = e.Graphics
Dim myPen As New Pen(Color.White)
Dim MyBrush as Brushes
myPen.Width = 1
DibF.DrawLine(myPen, 415, 97, 750, 97) 'esto dibuja una lïnea
For i = 120 To 440 Step 32 ' y esto de aquí dibuja líneas y redondeles rellenos de color naranja
DibF.FillEllipse(MyBrush.Orange, New Rectangle(475, i + 3, 15, 15))
DibF.DrawLine(New Pen(Color.Orange), 478, i + 10, 510, i + 10)
DibF.DrawLine(New Pen(Color.Orange), 340, 300, 420, i + 10)
DibF.DrawLine(New Pen(Color.Orange), 420, i + 10, 475, i + 10)
Next i
Exit Sub
Espero que te sirva.
Saludos y Felices Fiestas.
-
Hey gracias laforge lo pruebo mas tarde y de ahi les digo como me fue. Porque ahora estoy de salida.
:comp:
-
hace mucho tiempo hice un artículo de como dibujar lineas con el mouse aqui te envio la url:
Codigo: Dibujar con el Mouse (http://www.elguille.info/colabora/puntoNET/sergio_DrawMouse.htm)
Le cambio que tendrias que hacer es al iniciar el grafico para hacerlo desde el formulario lo haces asi:
Dim g As Graphics
g = Me.CreateGraphics
en este link, encuentras mas info: ayuda Graphics (http://search.microsoft.com/search/results.aspx?qu=CreateGraphics&View=msdn&st=b&c=4&s=1&swc=4)
-
Gracias Serghio me va servir de mucho tu codigo.
:comp: