Xailer & OZ Software

Necesito presentar unos valores que obtengo de la aplicación en forma
grafica.
Alguien me puede ayudar?
Paco V

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

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
>
>

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

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
>
>

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
>>
>>
>

Que tipo de graficos necesitas ¿lineales,de barras, tarta, 3d?
Pedro Amaro

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

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
>
>
>

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
>
>

Hola,
Igual te dí­ mal de dirección
http://www.advsofteng.com/
o busca chartdirector en google
un saludico,
Fredy

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

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)Â

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

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)Â

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
>
>
>

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

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)Â

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:
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ó:
--

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ó:
>
>

¡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
>
>

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
>>
>>
>
>
>

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)Â

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.
>
>
>
>
>
>