In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Graficos

Foro público de Xailer en español
paco-ssi
Mensajes: 390
Registrado: Lun Feb 07, 2005 4:17 pm

Graficos

Mensaje por paco-ssi »

Necesito presentar unos valores que obtengo de la aplicación en forma
grafica.
Alguien me puede ayudar?
Paco V
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Graficos

Mensaje por jfgimenez »

Paco,
> Necesito presentar unos valores que obtengo de la aplicación en forma
> grafica.
>
> Alguien me puede ayudar?
Dentro de poco vamos a tener el soporte de OCX, y hay muchos controles OCX,
tanto gratuitos como de pago, para hacer lo que necesitas.
--
Un saludo,
José F. Giménez
http://www.xailer.com
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Paco V
Mensajes: 380
Registrado: Jue Oct 27, 2005 9:08 am

Graficos

Mensaje por Paco V »

Jose, necesitaria hacer algo antes del dia 01/08. ¿Supongo que será imposible?
Paco V
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>Paco,
>
>> Necesito presentar unos valores que obtengo de la aplicación en forma
>> grafica.
>>
>> Alguien me puede ayudar?
>
>Dentro de poco vamos a tener el soporte de OCX, y hay muchos controles OCX,
>tanto gratuitos como de pago, para hacer lo que necesitas.
>
>
>--
>Un saludo,
>
>José F. Giménez
>http://www.xailer.com
>
>
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Graficos

Mensaje por jfgimenez »

Paco,
> Jose, necesitaria hacer algo antes del dia 01/08. ¿Supongo que será
> imposible?
Me temo que en una semana no va a poder ser :-(
--
Un saludo,
José F. Giménez
http://www.xailer.com
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Paco V
Mensajes: 380
Registrado: Jue Oct 27, 2005 9:08 am

Graficos

Mensaje por Paco V »

Suponia, y alguna trampita para dar a los informes un aspecto de alucine?
Paco V
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>Paco,
>
>> Jose, necesitaria hacer algo antes del dia 01/08. ¿Supongo que será
>> imposible?
>
>Me temo que en una semana no va a poder ser :-(
>
>--
>Un saludo,
>
>José F. Giménez
>http://www.xailer.com
>
>
Rolando
Mensajes: 191
Registrado: Lun May 08, 2006 2:10 pm

Graficos

Mensaje por Rolando »

Tal vez podrias enviar los datos a Excel y alli generar los gráficos.
Un saludo.
"Paco V" <ssi@ono.com> escribió en el mensaje
news:44c4a06c$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>
> Suponia, y alguna trampita para dar a los informes un aspecto de alucine?
>
> Paco V
>
> "Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>>Paco,
>>
>>> Jose, necesitaria hacer algo antes del dia 01/08. ¿Supongo que será
>>> imposible?
>>
>>Me temo que en una semana no va a poder ser :-(
>>
>>--
>>Un saludo,
>>
>>José F. Giménez
>>http://www.xailer.com
>>
>>
>
Pedro Amaro
Mensajes: 157
Registrado: Jue May 18, 2006 5:10 pm

Graficos

Mensaje por Pedro Amaro »

Que tipo de graficos necesitas ¿lineales,de barras, tarta, 3d?
Pedro Amaro
Fredy
Mensajes: 199
Registrado: Mié Mar 29, 2006 1:28 am

Graficos

Mensaje por Fredy »

Hola,
Puedes probar con ChartDirector (http://www.advsofteng.com/)
Es de pago( $99 por licencia o $499 la royaltiy free)
De su web te puedes bajar la librerí­a totalmente funcional, pero con una
lí­nea de publicidad en cada gráfico.
Inicialmente chardirector está pensada para servidores web, pero se puede
hacer funcionar con xailer, aunque no es nada fácil.
Hay un problema, al que la gente no le presta mucha atención, pero que a
la hora de usar librerí­as gráficas es fundamental, y es que el TOleAuto no
admite el paso de un array como parámetro (o al menos no lo hací­a cuando
yo hice las pruebas) y por lo tanto no se puede usar con la librerí­a.
Para usarla hay que crear desde xailer un script vbs y lanzarlo luego con
un shellexecute. eso nos genera un jpg con el gráfico que se puede pegar
al programa xailer con un ::oImage1:SetPicture( "grafico.gif").
Un poco engorroso, pero que yo sepa el la única forma de hacer gráficos.
Si estás interesado dí­melo y te lo cuento un poco más detenidamente.
Un saludico,
Fredy
Paco V
Mensajes: 380
Registrado: Jue Oct 27, 2005 9:08 am

Graficos

Mensaje por Paco V »

Pedro, me serviria cualquier cosa.
Se trata de que el 1 de Agosto tengo que presentar mi programa en las grandes
alturas. Hay otra presentación de un programa hecho en VB y esá lleno de
graficos. El mio parece malo siendo mucho mejor.
Si me puedes hechar una mano, yo pago las cañas.
Paco V
"Pedro Amaro" <dospcserv@hotmail.com> wrote:
>Que tipo de graficos necesitas ¿lineales,de barras, tarta, 3d?
>
>Pedro Amaro
>
>
>
Paco V
Mensajes: 380
Registrado: Jue Oct 27, 2005 9:08 am

Graficos

Mensaje por Paco V »

Fredy, he intentado acceder a la página que me dices y no va.
Si no encontramos algo mas sencillo, tendras que hecharme una mano.
Muchisimas gracias Fredy.
Paco V
Fredy <fredy@navegandoconxailer.com> wrote:
>Hola,
>
>Puedes probar con ChartDirector (http://www.advsofteng.com/)
>Es de pago( $99 por licencia o $499 la royaltiy free)
>De su web te puedes bajar la librería totalmente funcional, pero con una
>línea de publicidad en cada gráfico.
>
>Inicialmente chardirector está pensada para servidores web, pero se puede
>hacer funcionar con xailer, aunque no es nada fácil.
>
>Hay un problema, al que la gente no le presta mucha atención, pero que a
>la hora de usar librerías gráficas es fundamental, y es que el TOleAuto
no
>admite el paso de un array como parámetro (o al menos no lo hacía cuando
>yo hice las pruebas) y por lo tanto no se puede usar con la librería.
>
>Para usarla hay que crear desde xailer un script vbs y lanzarlo luego con
>un shellexecute. eso nos genera un jpg con el gráfico que se puede pegar
>al programa xailer con un ::oImage1:SetPicture( "grafico.gif").
>
>Un poco engorroso, pero que yo sepa el la única forma de hacer gráficos.
>
>
>Si estás interesado dímelo y te lo cuento un poco más detenidamente.
>
>
>Un saludico,
> Fredy
>
>
Fredy
Mensajes: 199
Registrado: Mié Mar 29, 2006 1:28 am

Graficos

Mensaje por Fredy »

Hola,
Igual te dí­ mal de dirección
http://www.advsofteng.com/
o busca chartdirector en google
un saludico,
Fredy
Pedro Amaro
Mensajes: 157
Registrado: Jue May 18, 2006 5:10 pm

Graficos

Mensaje por Pedro Amaro »

Haber, la idea es currartelo con la clase TCanvas y crear tu mismo los
graficos, por ejemplo de barras que serian muy faciles de implementar y
cuando quieran el grafico le generas un informe con el canvas y le das una
vista previa del informe, con la posibilidad de imprimirlos.
No es una solucion deslumbrante, pero por almenos presentas graficos.
Pedro Amaro
Pedro Amaro
Mensajes: 157
Registrado: Jue May 18, 2006 5:10 pm

Graficos

Mensaje por Pedro Amaro »

Bueno Paco, esto es una pincelada de lo que se podria hacer, pero por ahora
nos sirve para saber si seguimos adelante o no, no habia usado la clase
Canvas, pero echandole un ojo al ejemplo que Ignasio nos enseño en la
presentación de Xailer 1.0, he maquetado esto, la idea es crearte una clase
hala que le pases los datos a presentar y ella solita se ajuste a la
cantidad de datos ponga el titulo, etc.
Yo no he utilizado colores pero por lo que dice la ayuda podemos hacerlo.
No se si se puede usar canvas en otros objetoso solo en Printer, eso los
gurus no ayudaran un poquito mas.
Saludos
Pedro Amaro


Attached files Graficos.zip (2.6 KB)Â
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Graficos

Mensaje por jfgimenez »

Pedro,
> Bueno Paco, esto es una pincelada de lo que se podria hacer, pero por
> ahora nos sirve para saber si seguimos adelante o no, no habia usado la
> clase Canvas, pero echandole un ojo al ejemplo que Ignasio nos enseño en
> la presentación de Xailer 1.0, he maquetado esto, la idea es crearte una
> clase hala que le pases los datos a presentar y ella solita se ajuste a la
> cantidad de datos ponga el titulo, etc.
>
> Yo no he utilizado colores pero por lo que dice la ayuda podemos hacerlo.
>
> No se si se puede usar canvas en otros objetoso solo en Printer, eso los
> gurus no ayudaran un poquito mas.
Se puede utilizar también para pintar controles y formularios. Adjunto tu
ejemplo con una pequeña modificación para que lo veais. Eso sí, habría que
hacer los cálculos adecuados a cada resolución (la pantalla siempre tiene
menos resolución que la impresora), pero la idea es esa.
--
Un saludo,
José F. Giménez
http://www.xailer.com
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Graficos

Mensaje por jfgimenez »

Pedro,
se me ha olvidado el fichero. Aquí está.
--
Un saludo,
José F. Giménez
http://www.xailer.com


Attached files graficos.zip (3.3 KB)Â
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Paco V
Mensajes: 380
Registrado: Jue Oct 27, 2005 9:08 am

Graficos

Mensaje por Paco V »

Jose:
Por impresora no consigo sacar otra cosa que las barras. No me aparecen los
titulos ni nada parecido.
Por pantalla tres barras raras, raras, raras....
Con esto pintado de color me valdría.
A ver si hacemos algo.
Paco V
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>Pedro,
>
>se me ha olvidado el fichero. Aquí está.
>
>
>--
>Un saludo,
>
>José F. Giménez
>http://www.xailer.com
>
>
>
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Graficos

Mensaje por jfgimenez »

Paco,
> Por impresora no consigo sacar otra cosa que las barras. No me aparecen
> los
> titulos ni nada parecido.
>
> Por pantalla tres barras raras, raras, raras....
>
> Con esto pintado de color me valdría.
>
> A ver si hacemos algo.
Lo que ha hecho Pedro es sólo el principio. Te está mostrando cómo habría
que hacerlo, pero desde luego habría que hacerlo.
--
Un saludo,
José F. Giménez
http://www.xailer.com
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Pedro Amaro
Mensajes: 157
Registrado: Jue May 18, 2006 5:10 pm

Graficos

Mensaje por Pedro Amaro »

Bueno; aprobechando la inestimable ayuda de Jose, he aquí la adaptación a
pantalla e impresora "CASI" iguales, pero no he podido con los colores, pero
estoy con ello.
Saludos
Pedro Amaro


Attached files graficos v0.02.zip (3.5 KB)Â
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Graficos

Mensaje por jfgimenez »

Pedro,
> Bueno; aprobechando la inestimable ayuda de Jose, he aquí la adaptación a
> pantalla e impresora "CASI" iguales, pero no he podido con los colores,
> pero estoy con ello.
Prueba a poner el bucle así:
For nFor := 1 to nElementos
nPos := (nAnchoBarras * (nFor-1))+nMIzq
nValor := ::aDatos[ nFor ] * (nMaxAlto*.9) / nMaxValor
LogDebug (nFor,nPos)
:FillRect( { 50+nPos, nMaxAlto , nPos+nAnchoBarras,
nMAxAlto-nValor }, ::aColores[ nFor ] )
Next
--
Un saludo,
José F. Giménez
http://www.xailer.com
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Rene Flores
Mensajes: 620
Registrado: Jue Mar 23, 2006 2:39 am

Graficos

Mensaje por Rene Flores »

Paco:
Son las 2 am de la mañana y he logrado hacer esto, sin mucho esfuerzo,
era un codigo en FW que he logrado pasar a Xailer sin mucho problema,
este codigo es la base de la clase TGraph de FW, no habia visto lo del
canvas, pero creo que eso es lo que me faltaba....
Saludos
Rene Flores
http://www.ciber-tec.com
V. escribió:
--
Paco V
Mensajes: 380
Registrado: Jue Oct 27, 2005 9:08 am

Graficos

Mensaje por Paco V »

Estupendo, me valdria algo así.
Cuando te levantes de la cama seguro que todavia te sale mejor.
Paco V
Rene Flores <rflores.removeforspam@ciber-tec.com> wrote:
>
>Paco:
>
>Son las 2 am de la mañana y he logrado hacer esto, sin mucho esfuerzo,
>era un codigo en FW que he logrado pasar a Xailer sin mucho problema,
>este codigo es la base de la clase TGraph de FW, no habia visto lo del
>canvas, pero creo que eso es lo que me faltaba....
>
>Saludos
>
>Rene Flores
>http://www.ciber-tec.com
>
>
> V. escribió:
>
>
Pedro Amaro
Mensajes: 157
Registrado: Jue May 18, 2006 5:10 pm

Graficos

Mensaje por Pedro Amaro »

¡Si Señor!, no hay nada como ser padre de la criaturita....
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:[email=44c7c413@news.xailer.com...]44c7c413@news.xailer.com...[/email]
> Pedro,
>
>> Bueno; aprobechando la inestimable ayuda de Jose, he aquí la adaptación a
>> pantalla e impresora "CASI" iguales, pero no he podido con los colores,
>> pero estoy con ello.
>
> Prueba a poner el bucle así:
>
> For nFor := 1 to nElementos
> nPos := (nAnchoBarras * (nFor-1))+nMIzq
> nValor := ::aDatos[ nFor ] * (nMaxAlto*.9) / nMaxValor
> LogDebug (nFor,nPos)
> :FillRect( { 50+nPos, nMaxAlto , nPos+nAnchoBarras,
> nMAxAlto-nValor }, ::aColores[ nFor ] )
> Next
>
> --
> Un saludo,
>
> José F. Giménez
> http://www.xailer.com
>
>
Paco V
Mensajes: 380
Registrado: Jue Oct 27, 2005 9:08 am

Graficos

Mensaje por Paco V »

Ya tiene colorines.
Sois unos fenomenos.
Paco V
"Pedro Amaro" <dospcserv@hotmail.com> wrote:
>¡Si Señor!, no hay nada como ser padre de la criaturita....
>
>
>"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
>news:[email=44c7c413@news.xailer.com...]44c7c413@news.xailer.com...[/email]
>> Pedro,
>>
>>> Bueno; aprobechando la inestimable ayuda de Jose, he aquí la adaptación
a
>>> pantalla e impresora "CASI" iguales, pero no he podido con los colores,
>>> pero estoy con ello.
>>
>> Prueba a poner el bucle así:
>>
>> For nFor := 1 to nElementos
>> nPos := (nAnchoBarras * (nFor-1))+nMIzq
>> nValor := ::aDatos[ nFor ] * (nMaxAlto*.9) / nMaxValor
>> LogDebug (nFor,nPos)
>> :FillRect( { 50+nPos, nMaxAlto , nPos+nAnchoBarras,
>> nMAxAlto-nValor }, ::aColores[ nFor ] )
>> Next
>>
>> --
>> Un saludo,
>>
>> José F. Giménez
>> http://www.xailer.com
>>
>>
>
>
>
Pedro Amaro
Mensajes: 157
Registrado: Jue May 18, 2006 5:10 pm

Graficos

Mensaje por Pedro Amaro »

Bueno creo que con esto ya puedes ver como rematar el grafico, te falta
hacer el interface de la clase para poder pasarle las tablas en tiempo de
ejecución.
Suerte.
Pedro Amaro


Attached files Graficos v0.03.zip (4.1 KB)Â
Paco V
Mensajes: 380
Registrado: Jue Oct 27, 2005 9:08 am

Graficos

Mensaje por Paco V »

Que has cambiado en la version c.
Gracias a vosotros ya lo tengo implementado.
Va muy bien.
Que has cambiado en la version c?
Paco V
"Pedro Amaro" <dospcserv@hotmail.com> wrote:
>Bueno, ya se que mi codigo xbase no es muy depurado, pero lo ire mejorando
>poco a poco me cuesta quitarme el lastreVB.
>
>Paco tienes el fin de semana para imprementar esto en tu aplicación, tu
>puedes machote.
>
>Saludos
>Pedro Amaro
>
>Pd: Si a partir del martes no sabeis nada de mi no os asusteis, me vi a
coje
>en agosto 15 dias de media jornada y 15 dias de vacas, asi que no se como
>andare de tiempo para pasar por aquí, de todas formas os deseo una felices
>vacaciones a los que tengan la suerte de disfrutarlas.
>
>
>
>
>
>
Responder