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.

Problemas de asignacion de color en TCanvas

Foro de Xailer profesional en español
Responder
jasm.nospam
Mensajes: 203
Registrado: Vie Abr 01, 2005 9:05 am

Problemas de asignacion de color en TCanvas

Mensaje por jasm.nospam »

Hola,
No se si esto es así­, pero me sucede que cuando asigno color a una linea
de texto en tCanvas con:
:TextOut( 100, 100, "ESTA LINEA SADRA EN AZUL", 830, CLR_HBLUE )
a partir de ese momento TODO el texto se pone en azul aunque depués haga:
:TextOut( 100, 200, "ESTA LINEA DEBE SALIR EN NEGRO", 830, CLR_BLACK )
Usando Xailer PR5a (ahora probare en la 6)
Saludos
Jose A. Suarez
Arriba
jasm.nospam
Mensajes: 203
Registrado: Vie Abr 01, 2005 9:05 am

Problemas de asignacion de color en TCanvas

Mensaje por jasm.nospam »

Con la PR6 tambien ocurre.
Jose Alfonso Suárez Moreno escribió:
> Hola,
>
> No se si esto es así­, pero me sucede que cuando asigno color a una linea
> de texto en tCanvas con:
>
> :TextOut( 100, 100, "ESTA LINEA SADRA EN AZUL", 830, CLR_HBLUE )
>
> a partir de ese momento TODO el texto se pone en azul aunque depués haga:
>
> :TextOut( 100, 200, "ESTA LINEA DEBE SALIR EN NEGRO", 830, CLR_BLACK )
>
> Usando Xailer PR5a (ahora probare en la 6)
>
> Saludos
>
> Jose A. Suarez
Arriba
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9469
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:
Contactar ignacio

Problemas de asignacion de color en TCanvas

Mensaje por ignacio »

José Alfonso,
Acabo de modificar el ejemplo PrinterInfo para que pinte un Texto en amarillo después de pintar en azul y funciona correctamente:
[Form1.pg: linea 180 aprox]
For n := 10 to :TextLines()
:TextOut( 4, n, "Xailer printing demo, line: " + ltrim( str( n ) ),30, CLR_BLUE)
Next
:nTextAlignment:=taLEFT
:nMapMode := mmHIMETRICS
:TextOut( 200, 200, "Esta linea en amarillo", 30, CLR_YELLOW)
Saludos,
"Jose Alfonso Suárez Moreno" <jasm.nospam@chochurro.com> escribió en el mensaje news:[email=43749588@ozsrvnegro.ozlan.local...]43749588@ozsrvnegro.ozlan.local...[/email]
> Con la PR6 tambien ocurre.
>
>
>
> Jose Alfonso Suárez Moreno escribió:
>> Hola,
>>
>> No se si esto es así­, pero me sucede que cuando asigno color a una linea
>> de texto en tCanvas con:
>>
>> :TextOut( 100, 100, "ESTA LINEA SADRA EN AZUL", 830, CLR_HBLUE )
>>
>> a partir de ese momento TODO el texto se pone en azul aunque depués haga:
>>
>> :TextOut( 100, 200, "ESTA LINEA DEBE SALIR EN NEGRO", 830, CLR_BLACK )
>>
>> Usando Xailer PR5a (ahora probare en la 6)
>>
>> Saludos
>>
>> Jose A. Suarez
--
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Arriba
jasm.nospam
Mensajes: 203
Registrado: Vie Abr 01, 2005 9:05 am

Problemas de asignacion de color en TCanvas

Mensaje por jasm.nospam »

Ignacio,
Me temo que el problema está al asignar el color CLR_BALCK.
Adjunto ejemplo autocontenido.
Saludos,
Jose A. Suarez
Ignacio Ortiz de Zúñiga escribió:
> José Alfonso,
>
> Acabo de modificar el ejemplo PrinterInfo para que pinte un Texto en
> amarillo después de pintar en azul y funciona correctamente:
>
> [Form1.pg: linea 180 aprox]
>
> For n := 10 to :TextLines()
> :TextOut( 4, n, "Xailer printing demo, line: " + ltrim( str( n ) ),30,
> CLR_BLUE)
> Next
> :nTextAlignment:=taLEFT
> :nMapMode := mmHIMETRICS
> :TextOut( 200, 200, "Esta linea en amarillo", 30, CLR_YELLOW)
> Saludos,
>
> "Jose Alfonso Suárez Moreno" <jasm.nospam@chochurro.com
> <mailto:jasm.nospam@chochurro.com>> escribió en el mensaje
> news:[email=43749588@ozsrvnegro.ozlan.local...]43749588@ozsrvnegro.ozlan.local...[/email]
> > Con la PR6 tambien ocurre.
> >
> >
> >
> > Jose Alfonso Suárez Moreno escribió:
> >> Hola,
> >>
> >> No se si esto es así­, pero me sucede que cuando asigno color a una
> linea
> >> de texto en tCanvas con:
> >>
> >> :TextOut( 100, 100, "ESTA LINEA SADRA EN AZUL", 830, CLR_HBLUE )
> >>
> >> a partir de ese momento TODO el texto se pone en azul aunque depués
> haga:
> >>
> >> :TextOut( 100, 200, "ESTA LINEA DEBE SALIR EN NEGRO", 830, CLR_BLACK )
> >>
> >> Usando Xailer PR5a (ahora probare en la 6)
> >>
> >> Saludos
> >>
> >> Jose A. Suarez
--
Arriba
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9469
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:
Contactar ignacio

Problemas de asignacion de color en TCanvas

Mensaje por ignacio »

José Alfonso,
Visto el problema. Te mando el módulo corregido con este Email.
Gracias y un saludo,
"Jose Alfonso Suárez Moreno" <jasm.nospam@chochurro.com> escribió en el
mensaje news:[email=4374a501@ozsrvnegro.ozlan.local...]4374a501@ozsrvnegro.ozlan.local...[/email]
> Ignacio,
>
> Me temo que el problema está al asignar el color CLR_BALCK.
>
> Adjunto ejemplo autocontenido.
>
> Saludos,
>
> Jose A. Suarez
>
> Ignacio Ortiz de Zúñiga escribió:
>> José Alfonso,
>>
>> Acabo de modificar el ejemplo PrinterInfo para que pinte un Texto en
>> amarillo después de pintar en azul y funciona correctamente:
>>
>> [Form1.pg: linea 180 aprox]
>>
>> For n := 10 to :TextLines()
>> :TextOut( 4, n, "Xailer printing demo, line: " + ltrim( str( n ) ),30,
>> CLR_BLUE)
>> Next
>> :nTextAlignment:=taLEFT
>> :nMapMode := mmHIMETRICS
>> :TextOut( 200, 200, "Esta linea en amarillo", 30, CLR_YELLOW)
>> Saludos,
>>
>> "Jose Alfonso Suárez Moreno" <jasm.nospam@chochurro.com
>> <mailto:jasm.nospam@chochurro.com>> escribió en el mensaje
>> news:[email=43749588@ozsrvnegro.ozlan.local...]43749588@ozsrvnegro.ozlan.local...[/email]
>> > Con la PR6 tambien ocurre.
>> >
>> >
>> >
>> > Jose Alfonso Suárez Moreno escribió:
>> >> Hola,
>> >>
>> >> No se si esto es así, pero me sucede que cuando asigno color a una
>> linea
>> >> de texto en tCanvas con:
>> >>
>> >> :TextOut( 100, 100, "ESTA LINEA SADRA EN AZUL", 830, CLR_HBLUE )
>> >>
>> >> a partir de ese momento TODO el texto se pone en azul aunque depués
>> haga:
>> >>
>> >> :TextOut( 100, 200, "ESTA LINEA DEBE SALIR EN NEGRO", 830,
>> CLR_BLACK )
>> >>
>> >> Usando Xailer PR5a (ahora probare en la 6)
>> >>
>> >> Saludos
>> >>
>> >> Jose A. Suarez
>


Attached files Canvas.rar (3.6 KB)Â
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Arriba
jasm.nospam
Mensajes: 203
Registrado: Vie Abr 01, 2005 9:05 am

Problemas de asignacion de color en TCanvas

Mensaje por jasm.nospam »

Ignacio,
Solucionado.
Gracias.
Saludos
Jose A. Suarez
Ignacio Ortiz de Zúñiga escribió:
> José Alfonso,
>
> Visto el problema. Te mando el módulo corregido con este Email.
>
> Gracias y un saludo,
>
> "Jose Alfonso Suárez Moreno" <jasm.nospam@chochurro.com> escribió en el
> mensaje news:[email=4374a501@ozsrvnegro.ozlan.local...]4374a501@ozsrvnegro.ozlan.local...[/email]
>
>>Ignacio,
>>
>>Me temo que el problema está al asignar el color CLR_BALCK.
>>
>>Adjunto ejemplo autocontenido.
>>
>>Saludos,
>>
>>Jose A. Suarez
>>
>>Ignacio Ortiz de Zúñiga escribió:
>>
>>>José Alfonso,
>>>
>>>Acabo de modificar el ejemplo PrinterInfo para que pinte un Texto en
>>>amarillo después de pintar en azul y funciona correctamente:
>>>
>>>[Form1.pg: linea 180 aprox]
>>>
>>>For n := 10 to :TextLines()
>>> :TextOut( 4, n, "Xailer printing demo, line: " + ltrim( str( n ) ),30,
>>>CLR_BLUE)
>>>Next
>>>:nTextAlignment:=taLEFT
>>>:nMapMode := mmHIMETRICS
>>>:TextOut( 200, 200, "Esta linea en amarillo", 30, CLR_YELLOW)
>>>Saludos,
>>>
>>>"Jose Alfonso Suárez Moreno" <jasm.nospam@chochurro.com
>>><mailto:jasm.nospam@chochurro.com>> escribió en el mensaje
>>>news:[email=43749588@ozsrvnegro.ozlan.local...]43749588@ozsrvnegro.ozlan.local...[/email]
>>> > Con la PR6 tambien ocurre.
>>> >
>>> >
>>> >
>>> > Jose Alfonso Suárez Moreno escribió:
>>> >> Hola,
>>> >>
>>> >> No se si esto es así­, pero me sucede que cuando asigno color a una
>>>linea
>>> >> de texto en tCanvas con:
>>> >>
>>> >> :TextOut( 100, 100, "ESTA LINEA SADRA EN AZUL", 830, CLR_HBLUE )
>>> >>
>>> >> a partir de ese momento TODO el texto se pone en azul aunque depués
>>>haga:
>>> >>
>>> >> :TextOut( 100, 200, "ESTA LINEA DEBE SALIR EN NEGRO", 830,
>>>CLR_BLACK )
>>> >>
>>> >> Usando Xailer PR5a (ahora probare en la 6)
>>> >>
>>> >> Saludos
>>> >>
>>> >> Jose A. Suarez
>>
>
>
Arriba
Responder

Volver a “Xailer Pro Spanish”