Página 1 de 1

Transparencias

Publicado: Mié Sep 06, 2006 6:18 am
por zeasoftware
Existe alguna manera de hacer que los TEDIT, TMaskEdit, o algun otra clase
de captura pueda ser transparente para tomar el color de su contenedor?
Con el tLabel hay que hacer muchas maromas para aplicar valores "99,999.99",
etc.
Gracias.
--
Ramón Zea
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoft/

Transparencias

Publicado: Mié Sep 06, 2006 9:56 am
por ignacio
Ramón,
TLabel:lTransparent := .T.
> Con el tLabel hay que hacer muchas maromas para aplicar valores
> "99,999.99",
¿A que te refieres? Consulta la documentación de xHarbour o Clipper respecto
a la función TRANSFORM.
Saludos,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Ramón Zea" <zeasoftware@hotmail.com> escribió en el mensaje
news:[email=44fe4c25@news.xailer.com...]44fe4c25@news.xailer.com...[/email]
> Existe alguna manera de hacer que los TEDIT, TMaskEdit, o algun otra clase
> de captura pueda ser transparente para tomar el color de su contenedor?
>
> Con el tLabel hay que hacer muchas maromas para aplicar valores
> "99,999.99", etc.
>
> Gracias.
> --
> Ramón Zea
> ramonzea@yahoo.com
> zeasoftware@hotmail.com
> zeasoft.movil@hotmail.com
>
> http://www.paginasprodigy.com/zeasoft/
>

Transparencias

Publicado: Mié Sep 06, 2006 11:27 am
por jrcpoli
Saludos Ramón:
No veo el inconveniente de usar los Label yo lo uso mucho cuando quiero
presentar datos y que no sean modificados ni tocados, en campos
numéricos no tienes que emplear STR(), aquí­ va unos ejemplos.
LOCAL nTotalFed := 0
LOCAL nTotalPerdFed := 0
LOCAL nTotalCompFed := 0
// Aquí­ cargamos los datos en las variables.
.....
.....
.....
// Luego los presentamos
::oLBEnc_Fed:cText := TRANSFORM(nTotalFed, "@E 99,999")
::oLBComp_Fed:cText := TRANSFORM(nTotalCompFed, "@E 99,999")
::oLBPerdidas_Fed:cText := TRANSFORM(nTotalPerdFed, "@E 99,999")
// Usando una función dentro del label
::oLBTanto_Comp:cText := ;
TRANSFORM(TANTOPORCIENTO(nTotalFed, nTotalCompFed), "@E 999.99")
También puedes hacer:
WITH OBJECT ::oDbfEClubs //Nombre de la DBF
::oLBEnc_Fed:cText := TRANSFORM(:FieldGetByName("Nombre del
Campo"), "@E 99,999")
END
Espero te sirva.
José Ramón Castro.
Ramón Zea escribió:
> Existe alguna manera de hacer que los TEDIT, TMaskEdit, o algun otra clase
> de captura pueda ser transparente para tomar el color de su contenedor?
>
> Con el tLabel hay que hacer muchas maromas para aplicar valores "99,999.99",
> etc.
>
> Gracias.

Transparencias

Publicado: Mié Sep 06, 2006 3:23 pm
por zeasoftware
Gracias Tocayo y OZ:
El tema lo tengo definido, se como hacerlo usando los TLabel, lo que queria
es que la propiedad lTransparent pudiese aplicarse a TMaskEdit, y asi solo
haria un TMaskEdit en el IDE, con su formato, color, etc, en tiempo de
diseño, y aplicarle ya sea via programacion que fuese transparente, pero al
parecer no se puede.
Gracias de nuevo.
--
Ramón Zea
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoft/

Transparencias

Publicado: Mié Sep 06, 2006 4:17 pm
por ignacio
Ramón,
No tiene sentido que NINGUN TEdit sea transparente. Necesita la caja para
ubicar donde se edita. No tiene mucho sentido lo que pretende hacer.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Ramón Zea" <zeasoftware@hotmail.com> escribió en el mensaje
news:[email=44fecbd9@news.xailer.com...]44fecbd9@news.xailer.com...[/email]
> Gracias Tocayo y OZ:
>
> El tema lo tengo definido, se como hacerlo usando los TLabel, lo que
> queria es que la propiedad lTransparent pudiese aplicarse a TMaskEdit, y
> asi solo haria un TMaskEdit en el IDE, con su formato, color, etc, en
> tiempo de diseño, y aplicarle ya sea via programacion que fuese
> transparente, pero al parecer no se puede.
>
> Gracias de nuevo.
>
> --
> Ramón Zea
> ramonzea@yahoo.com
> zeasoftware@hotmail.com
> zeasoft.movil@hotmail.com
>
> http://www.paginasprodigy.com/zeasoft/
>