Flor De Circunferencias


Ir a la página 1, 2  Siguiente

Objetivo: Flor De Circunferencias
Hola comunidad!.

Hice una breve aplicación con la ayuda de aquellos libros que hoy ya no se ven.Cuando nuestros ordenadores eran los 8 bits.

Os pongo unas capturas. Disculparme si meto la pata, es la primera vez que cuelgo una aplicación en nuestra comunidad. Por si las capturas son grandes.
La aplicación es mejorable al 100%.

Tengo que aprender mucho en general.

flor_de_circunferencias1

flor_de_circunferencias2

flor_de_circunferencias3

flor_de_circunferencias4

Aquí esta para que podáis mejorarla y adaptarla a vuestro gusto.

última edición por Shell el Jueves, 21 Abril 2011, 10:25; editado 1 vez

FlordeCircunferencias.tar.gz
Descripción:  
Descargar
Nombre del archivo: FlordeCircunferencias.tar.gz
Tamaño: 9.62 KB
Descargado: 41 veces
FlordeCircunferencias.tar.gz
Descripción:  
Descargar
Nombre del archivo: FlordeCircunferencias.tar.gz
Tamaño: 9.62 KB
Descargado: 41 veces
FlordeCircunferencias.tar.gz
Descripción:  
Descargar
Nombre del archivo: FlordeCircunferencias.tar.gz
Tamaño: 9.62 KB
Descargado: 41 veces

Objetivo: Re: Flor De Circunferencias
Muy bueno Shell, es genial!

Objetivo: Re: Flor De Circunferencias
Muy chula tu aplicación, felicitaciones.

Saludos y ha hacer más

última edición por jsbsan el Jueves, 21 Abril 2011, 12:57; editado 2 veces
Objetivo: Re: Flor De Circunferencias
muy bueno... felicitaciones!!!

Objetivo: Re: Flor De Circunferencias
Hola!.

Podemos añadir 3 scrollbars o 3 sliders en algún lugar del formulario que modifiquen tanto el número de circunferencias, el radio de la misma y el radio principal.
No tendremos que pulsar en el botón dibujar y veremos dibujando en tiempo real a cada cambio de estas barras.

Cada barra o slider llama a un código común.

PUBLIC SUB ScrollBarNumCir_Change()

Dibujame

END

PUBLIC SUB ScrollBarRadCirc_Change()

Dibujame

END

PUBLIC SUB ScrollBarRadPrin_Change()

Dibujame

END



No puedo poner tildes en la llamada al procedimiento.

El código cómun.


PUBLIC SUB Dibujame()

Lienzo.clear
Elipsoide(ScrollBarNumCir.Value, ScrollBarRadCirc.Value, ScrollBarRadPrin.Value)

END

PUBLIC SUB Elipsoide(numc AS Integer, radioc AS Integer, radiop AS Integer)
DIM i AS Integer
DIM centrox, centroy AS Integer
DIM x, y AS Integer

IF ChkLienzo.Value = TRUE THEN Lienzo.Clear

centrox = Lienzo.ClientWidth / 2
centroy = Lienzo.ClientHeight / 2

Draw.Begin(Lienzo)
FOR i = 1 TO numc
x = centrox + radiop * Cos(6.2832 / numc * i)
y = centroy + radiop * Sin(6.2832 / numc * i)
Draw.Circle(x, y, radioc)
NEXT
Draw.End()

END



Cuestión:Llame al procedimiento así:

Dibujame en vez de Dibujame()

El efecto es el mismo, pero, ¿ cual debería ser la manera mas correcta?.

Los valores de cada barra a gusto de cada uno.Dentro de unos limites, claro.

Lo único que hay que tener en cuenta que no nos vale variar el numero de circunferencias si no aumentamos el radio de esta.Primero tendríamos
que usar la barra del radio de cada circunferencia y luego escoger la del numero de circunferencias y o la de radio principal.

El efecto es bueno.

Si usamos la barra del radio de circunferencias y luego la del radio principal,el circulo se desplazara a la derecha.

Ah, un enlace más.

http://www.epsilones.com/

Matemáticas y mucho más.

No creo que por mi parte sea correcto llamarlo elipsoide, cuando son círculos.

Objetivo: Re: Flor De Circunferencias
Citar:

Cuestión:Llame al procedimiento así:

Dibujame en vez de Dibujame()

El efecto es el mismo, pero, ¿ cual debería ser la manera mas correcta?.


Yo creo que la forma correcta es Dibujame(), ya que los parentesis indican que es una subrutina.

Prodias poner por ejemplo
GOTO Dibujame
y iria a la linea que se llamara
Dibujame:


Ademas con los parentesis, indicas que puede llevar parametros, por ejemplo Dibujame("hola"), y asi en la subrutina podias procesar ese parametro:

Public sub Dibujame(texto as string)
...
print texto
....
end sub


Saludos

Objetivo: Re: Flor De Circunferencias
Ya que estamos con las matemáticas y demás, comparto este enlace:

http://gaussianos.com/

Y hay un libro muy divertido vinculadoa a las matemáticas. Se llama "Locos por las matemáticas"... Tiene cosas muy graciosas tratadas de forma seria... En una de los tantos capítulos por ejemplo tratan de explicar el porqué es habitual que cuando se cae la tostada caiga con el lado de la mermelada hacia abjao...

Por otro lado, muy buena la aplicación!

Saludos!

Perfil MP  
Objetivo: Re: Flor De Circunferencias
Interesante tu aplicación .

Perfil MP  
Objetivo: Re: Flor De Circunferencias
Disculpa mi ignorancia...

Pero si quisiera capturar el contenido de "lienzo" y pasarlo a un objeto image para luego grabarlo... cómo se haría?

Te pregunto porque la verdad que quedo maravillado con las formas que se realizan con el programa, jeje.

Saludos!

Perfil MP  
Objetivo: Re: Flor De Circunferencias
Ya vi:

En este link encontré información:

http://foro.gambas-es.org/viewtopic.php?f=4&t=373

dim a as new image

a = lienzo.grab()

Genial! Qué fácil era!

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.5004s (PHP: -76% SQL: 176%)
Consultas SQL: 48 - Debug off - GZIP Activado