Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 2
Ir a la página 1, 2  Siguiente
 
¿Cómo Dibujar Un Polígono En El Drawingarea??
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje ¿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!!!!!
 



 
kpo47 - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje 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
 



 
abarzuaf - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje 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
 




===================
Jesús Guardón

Por favor, usemos el corrector ortográfico antes de pulsar el botón "Enviar".

"uo ǝs ʇɐu pıɟıɔıן ɐdɹǝupǝɹ ɐ dɹoƃɹɐɯɐɹ, soןo ɥɐʎ bnǝ dɹodouǝɹsǝןo"
 
jguardon - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje 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!!!!!!!!!!!
 



 
kpo47 - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje 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
 



 
abarzuaf - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje 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.
 



 
kok - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje 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

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: 42 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: 42 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: 42 veces

 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
última edición por jsbsan el Sabado, 09 Junio 2012, 22:22; editado 1 vez 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje 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.
 



 
kok - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje 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.
 




===================
Gambas Básico
"No es un bug, es una característica no documentada"
 
última edición por Shell el Domingo, 10 Junio 2012, 13:48; editado 1 vez 
Shell - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje 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
 



 
kok - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Imagen En Un Drawingarea nrcefe General 4 Jueves, 24 Septiembre 2009, 22:32 Ver último mensaje
nrcefe
No hay nuevos mensajes Ayuda Drawingarea kok Controles/Librerías/Componentes 15 Lunes, 28 May 2012, 16:11 Ver último mensaje
jsbsan
No hay nuevos mensajes Pintar En Un Drawingarea guadafan General 12 Domingo, 28 Julio 2013, 20:53 Ver último mensaje
guadafan
No hay nuevos mensajes Drawingarea + Dibuja Por Codigo + Exportar... tincho General 6 Domingo, 24 Enero 2016, 16:52 Ver último mensaje
tincho
 

Publicar nuevo tema  Responder al tema  Página 1 de 2
Ir a la página 1, 2  Siguiente

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
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



  

 

cron