Cambiar el color de letras en texto

Cambiar el color de letras en texto

Postby daniel_halon » Thu Sep 04, 2014 1:10 am

Hola amigos, preciso de ayuda para resolver esto.
Tengo el siguiente texto en un Get When .F. CAL/LOM/STR/POR, son codigos separados por una barra y para que quede mas facil de visulizar el cliente me pidio que cada conjunto de letras separadas por la barra sean de un color diferente, por ejemplo CAL en rojo, LOM en azul etc.
Alguien tiene alguna idea de como hacerlo?
Buenos Aires - Argentina - Viviendo en Porto Alegre - RS - Brasil
daniel_halon@portobakers.com.br
FW 2.7- xHarbour 0.99.71 - PellesC
daniel_halon
 
Posts: 41
Joined: Tue May 13, 2008 1:53 am
Location: Porto Alegre - Brazil

Re: Cambiar el color de letras en texto

Postby cuatecatl82 » Thu Sep 04, 2014 1:41 am

daniel_halon:

Se me ocurre algo muy simple para lo que solicitas siempre y cuando el texto a mostrar se componga como lo indicas:

Puedes usar 4 gets independientes uno para cada variable y 3 say para separar con "/", armalo lo más junto posible en tu editor de forma que quedecomo si fuera un solo control:

Image

Solo una idea..

saludos..
Soluciones y Diseño de Software
Damos Soluciones...

I.S.C. Victor Daniel Cuatecatl Leon
Director y Diseñador de Proyectos

http://www.soldisoft.unlugar.com
http://www.sisa.unlugar.com
danyleon82@hotmail.com
www.facebook.com/victordaniel.cuatecatlleon
User avatar
cuatecatl82
 
Posts: 625
Joined: Wed Mar 14, 2007 6:49 pm
Location: San Cristobal de las Casas, Chiapas México

Re: Cambiar el color de letras en texto

Postby Baxajaun » Thu Sep 04, 2014 7:52 am

Daniel,

mira si puedes adaptar el código que colocó aquí Paco García:

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=29031

Saludos
User avatar
Baxajaun
 
Posts: 968
Joined: Wed Oct 19, 2005 2:17 pm
Location: Gatika. Bizkaia

Re: Cambiar el color de letras en texto

Postby daniel_halon » Thu Sep 04, 2014 8:56 pm

Voy a ver como puedo adaptar el programa de Paco o tal vez me incline por poner el texto en un array, desde ya gracias a todos.
Buenos Aires - Argentina - Viviendo en Porto Alegre - RS - Brasil
daniel_halon@portobakers.com.br
FW 2.7- xHarbour 0.99.71 - PellesC
daniel_halon
 
Posts: 41
Joined: Tue May 13, 2008 1:53 am
Location: Porto Alegre - Brazil

Re: Cambiar el color de letras en texto

Postby daniel_halon » Tue Sep 09, 2014 2:58 pm

Amigos, no he conseguido todavia hacer lo que me pide el cliente
Imaginen que estoy tomando un pedido por telefono en una pizzaria donde digito el codigo del produto y la descripcion del mismo va automaticamente en el get del qual estamos hablando, por ejemplo: digito CO2 y la descripcion es 'COCA COLA 2 LITROS', hasta ahi todo bien , pero cuando el cliente quiere colocar varios sabores en la pizza el operador digita ZZG asi el sistema reconoce este código como pizza y a traves de 4 gets va digitando los codigos de los sabores de la pizza, ejemplo: CAL/POR/FRA, en la momento de terminar de formatar los tres sabores, en el get en question aparece la suma de todos los tres o cuatro gets con los sabores con la barra de separação entre ellos, es ahi donde deve aparecer cada codigo diferente del sabor de las pizzas en colores diferentes, asi: CAL/POR/FRA estes datos estan en un Get con la opcion When .F. Para el cliente parece simples demas pero no consigo hacerlo.

Vean abajo la pantalla para dar una idea
Image
https://www.dropbox.....41.19.png?dl=0
Buenos Aires - Argentina - Viviendo en Porto Alegre - RS - Brasil
daniel_halon@portobakers.com.br
FW 2.7- xHarbour 0.99.71 - PellesC
daniel_halon
 
Posts: 41
Joined: Tue May 13, 2008 1:53 am
Location: Porto Alegre - Brazil

Re: Cambiar el color de letras en texto

Postby antolin » Tue Sep 09, 2014 6:31 pm

Daniel, me parece que la única solución va a ser crear una nueva clase TGET. Copia la antigua, cámbiale el nombre y después modifícala.

Supongo que tendrás que cambiar el método PAINT para que te escriba en diferentes colores. Tendrás que añadir un array bidimensional con los posibles códigos y colores asociados, y en el PAINT comprobar con ASCAN si se ha escrito alguno de los códigos del array. Para pintarlos te aconsejo DRAWTEXT y medir lo que ocupa cada código con GETTEXTWIDTH.

Otra solución sería modificar el método KEYCHAR para identificar los códigos durante la construcción del CAPTION, y podrías añadir un código oculto entre cada código. Por ejemplo #1CAL/#5LOM/#2POR, y en el PAINT pintar CAL con el color 1 del array, LOM con el color 5 y POR con el 2.

De todas formas te vas a tener que calentar la cabeza.

Suerte
Peaaaaaso de foro...
FWH 2007 - xHarbour - BCC55
antolin
 
Posts: 498
Joined: Thu May 10, 2007 8:30 pm
Location: Sevilla

Re: Cambiar el color de letras en texto

Postby daniel_halon » Tue Sep 09, 2014 7:20 pm

Buenos Aires - Argentina - Viviendo en Porto Alegre - RS - Brasil
daniel_halon@portobakers.com.br
FW 2.7- xHarbour 0.99.71 - PellesC
daniel_halon
 
Posts: 41
Joined: Tue May 13, 2008 1:53 am
Location: Porto Alegre - Brazil

Re: Cambiar el color de letras en texto

Postby daniel_halon » Tue Sep 09, 2014 7:24 pm

Es verdad Antolin, es mas, no se si vale la pena todo ese trabajo para agradar un cliente con algo que me parece que no es tan indispensable, de todas maneras muchas gracias. Abrazos
Buenos Aires - Argentina - Viviendo en Porto Alegre - RS - Brasil
daniel_halon@portobakers.com.br
FW 2.7- xHarbour 0.99.71 - PellesC
daniel_halon
 
Posts: 41
Joined: Tue May 13, 2008 1:53 am
Location: Porto Alegre - Brazil


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 54 guests