¿Cómo Dibujar Un Polígono En El Drawingarea??


Ir a la página 1, 2  Siguiente

Objetivo: ¿Cómo Dibujar Un Polígono En El Drawingarea??
hola!!! ps soy nuevo aqui y ps quisiera q si me podrian ayudar con un problema

esoty iniciando en gambas y ps lo necesito para el examen de grado pa el cole y ps no tengo idea de como hacer los polígos en un drawing area

si xfa me pudieran ayudar

y ps es gambas 2.8 con Ubuntu 9.04

De antemano gracias!!!!!

Perfil MP  
Objetivo: Re: ¿Cómo Dibujar Un Polígono En El Drawingarea??
Hola.

En Google, ingresa el siguiente texto a buscar : a beginner's Guide to Gambas
El primer enlace que sale es un pdf que se encuentra en la pagina de VectorLinux.
Este pdf es un libro escrito por John W Rittinghouse. En la pagina 280 te indica como
trabajar con poligonos.

saludos

Perfil MP  
Objetivo: Re: ¿Cómo Dibujar Un Polígono En El Drawingarea??
Básicamente consiste en enlazar líneas, jeje (vaya descubrimiento!)

Draw.Line(5,10, 10, 10)
Draw.Line(10,10, 10, 15)
Draw.Line(10,15, 5, 15)
Draw.Line(5,15, 5, 10)


Eso dibujaría un cuadrado, pero para eso tienes el método Draw.Polygon, que admite como parámetro un array de puntos.

Un punto siempre consta de dos valores X, Y. Por tanto un array de puntos sería para el caso anterior:

[5,10,10,10,10,10,10,15,10,15,5,15,5,15,5,10] , es decir:

Dim aPol = new Integer[]
aPol = [5,10,10,10,10,10,10,15,10,15,5,15,5,15,5,10]
Draw.Polygon(aPol)


Saludos

Perfil MP  
Objetivo: Re: ¿Cómo Dibujar Un Polígono En El Drawingarea??
gracias!!!!! abarzuaf y jguardon me sirvio de mucho ese manual pero en el manual dice

triangulo=array(x1,y1,x2,y2,x3,y3)


y eso me dio un error

y haciendo de la manera de

triangulo = [x1,y1,x2,y2,x3,y3]


funciono perfectamente!!!!!!!!!!!

gracias!!!!!!!!!!!

Perfil MP  
Objetivo: Re: ¿Cómo Dibujar Un Polígono En El Drawingarea??
Hola.

Que bueno que te sirviera. En realidad no son errores, lo que pasa es que el libro ya tiene su tiempo(2005) y varias cosas han cambiado desde entonces, en la forma de codificar en gambas. De todas maneras, es un complemento excelente.

Saludos

Perfil MP  
Objetivo: Re: ¿Cómo Dibujar Un Polígono En El Drawingarea??
Hola, estado leyendo y queria hacer algo parecido para dibujar poligonos pero en el array no quiero ponerle las coordenadas ya definidas, quiero pasarselas a traves de mouse.x y mouse.y. queria saber si es possible ya que mi intencion es hacer cuadrados o triangulos en un drawingarea donde yo quiera.
Gracias.

Perfil MP  
Objetivo: Re: ¿Cómo Dibujar Un Polígono En El Drawingarea??
kok:
Citar:
el array no quiero ponerle las coordenadas ya definidas, quiero pasarselas a traves de mouse.x y mouse.y.

Lo que puedes hacer, es que cada vez que pulses con el mouse en el drawingArea, se añadan al array las coordenadas mouse.x y mouse.y, luego con un boton, dibujas el array...

Te dejo este ejemplo: (por este ejemplo puedes dibujar un poligono).

capturadepantalla-090612-231902
' gambas class file

Public valores As New Integer[]
Public Sub _new()

End

Public Sub Form_Open()

End

Public Sub DrawingArea1_MouseUp()

valores.Add(Mouse.x)
valores.Add(Mouse.y)
Draw.Begin(DrawingArea1)
Draw.Foreground = Color.Green
Draw.Circle(Mouse.x, Mouse.y, 5)
Draw.End

End

Public Sub ButtonDibujar_Click()

Draw.Begin(DrawingArea1)
Draw.Polygon(valores)
Print valores

Draw.end

End

Public Sub DrawingArea1_Draw()



End

Public Sub ButtonPantallaLimpiar_Click()

Draw.Begin(DrawingArea1)
Draw.Clear
Draw.end
'limpio los valores del array
valores.Clear
End


Si lo quieres para dibujar un cuadrado, lo que pudes hacer es añadirle un contador, que vaya contando cada vez que pulses el boton y que cuando llegue al numero que tu desees, lo dibuje (por ejemplo si el contador vale 4, dibujara el poligono que une esos cuatros punto, un cuadrilatero, si le pones 3, dibujara un triangulo)

Te adjunto el codigo fuente en gambas3.1

última edición por jsbsan el Sabado, 09 Junio 2012, 22:22; editado 1 vez

PuntosConMouse-0.0.1.tar.gz
Descripción: Dibujar un poligono con el mouse. 
Descargar
Nombre del archivo: PuntosConMouse-0.0.1.tar.gz
Tamaño: 4.71 KB
Descargado: 44 veces
PuntosConMouse-0.0.1.tar.gz
Descripción: Dibujar un poligono con el mouse. 
Descargar
Nombre del archivo: PuntosConMouse-0.0.1.tar.gz
Tamaño: 4.71 KB
Descargado: 44 veces
PuntosConMouse-0.0.1.tar.gz
Descripción: Dibujar un poligono con el mouse. 
Descargar
Nombre del archivo: PuntosConMouse-0.0.1.tar.gz
Tamaño: 4.71 KB
Descargado: 44 veces

Objetivo: Re: ¿Cómo Dibujar Un Polígono En El Drawingarea??
De verdad muchas gracias. Al contador como puedo pasarle los valores para que dibuje un cuadrado si el contador vale 5 por ejemplo?. Muchas gracias.

Perfil MP  
Objetivo: Re: ¿Cómo Dibujar Un Polígono En El Drawingarea??
Hola!.

He colgado algo en el blog sobre los polígonos regulares.

Convertí de Gambas2 a Gambas3.

No tengo ni idea por que con QT4 no se ve nada y en cambio con GTK si.
No debe ser la forma correcta de hacerlo.

El programa no esta optimizado pero cumple su cometido.

circulonpartes

Y el del polígono.

poligonoregular

http://gambas-basico.blogspot.com.e...-regulares.html

Saludos.

última edición por Shell el Domingo, 10 Junio 2012, 13:48; editado 1 vez
Objetivo: Re: ¿Cómo Dibujar Un Polígono En El Drawingarea??
Mi duda es como puedo hacer un contador que capte las vezes que apreto el mouse. Gracias

Perfil MP  
Ir a la página 1, 2  Siguiente

Página 1 de 2


  
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario

   

Está utilizando la versión (Lo-Fi). Para ver la versión completa del foro, haga clic aquí.

Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo

Página generada en:: 0.1408s (PHP: -19% SQL: 119%)
Consultas SQL: 27 - Debug off - GZIP Activado