Label... car

[Xevi]

Pues por lo visto, el carácter & (anderstand) no se visualiza correctamente
con un Label...
en su lugar aparece el signo _ (guión inferior)
Lo he probado con fuentes Arial, Century, MS Serif, MS Sans Serif...
Tengo un Edit y un Label que obtengo el valor de una DBF, y al mostrar un
nombre con este símbolo, me he percatado de que lo muestra mal.
Un Saludo,
Xevi.

[jfgimenez]

Xevi,
> Pues por lo visto, el carácter & (anderstand) no se visualiza
> correctamente con un Label...
> en su lugar aparece el signo _ (guión inferior)
>
> Lo he probado con fuentes Arial, Century, MS Serif, MS Sans Serif...
>
> Tengo un Edit y un Label que obtengo el valor de una DBF, y al mostrar un
> nombre con este símbolo, me he percatado de que lo muestra mal.
Sólo tienes que poner dos veces ese carácter. P.ej. "&&Label1"
El comportamiento de este carácter es como en los demás "captions" de
windows, que provoca que el siguiente carácter se muestre subrayado.
--
Un saludo,
José F. Giménez

[Xevi]

Jose,
Vaya con Windows...
¿Se puede heredar de TLabel y hacer que muestre & si contiene & en su
cText???
Vaya... modificar el contenido de cText si su cText tiene un &. No se si me
estoy liando...
Creo que para esto haría falta disponer de una propiedad Value, compararla y
mostrar su cText...
En fin, no es importante, pero veo que no depende de Xailer sino de
Guindous.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> ha escrit al missatge
del grup de discussió: 4460d021$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Xevi,
>
>> Pues por lo visto, el carácter & (anderstand) no se visualiza
>> correctamente con un Label...
>> en su lugar aparece el signo _ (guión inferior)
>>
>> Lo he probado con fuentes Arial, Century, MS Serif, MS Sans Serif...
>>
>> Tengo un Edit y un Label que obtengo el valor de una DBF, y al mostrar un
>> nombre con este símbolo, me he percatado de que lo muestra mal.
>
> Sólo tienes que poner dos veces ese carácter. P.ej. "&&Label1"
>
> El comportamiento de este carácter es como en los demás "captions" de
> windows, que provoca que el siguiente carácter se muestre subrayado.
>
> --
> Un saludo,
>
> José F. Giménez
>

[jfgimenez]

Xevi,
> Vaya con Windows...
> ¿Se puede heredar de TLabel y hacer que muestre & si contiene & en su
> cText???
> Vaya... modificar el contenido de cText si su cText tiene un &. No se si
> me estoy liando...
> Creo que para esto haría falta disponer de una propiedad Value, compararla
> y mostrar su cText...
>
> En fin, no es importante, pero veo que no depende de Xailer sino de
> Guindous.
Sí depende de Xailer. Lo que pasa es que lo hemos hecho "a la güindous"
De todos modos, haz lo que te he comentado: pon dos ampersand en la cadena y
se mostrará sólo uno de ellos y no subrayado.
--
Un saludo,
José F. Giménez

[Xevi]

Jose,
Pero no puedo meterle un & de más...
Mira, el problema está en que los datos están guardados en una DBF...
MiDBF->NOMBRE
Un Registro ... Pepito
Otro... Manuel
Otro... Pepito & Manuel asociados
Bien, pues cuando muestro los registros 1 o 2 los muestra perfectamente,
pero cuando visualizo el registro 3...
me muestra Pepito _Manuel asociados...
Esto, a la práctica ¿que solución tiene????
Al recoger el valor NOMBRE... ¿verifico si contiene un & y le añado uno
mas???
Gracias.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> ha escrit al missatge
del grup de discussió: 4460f214$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Xevi,
>
>> Vaya con Windows...
>> ¿Se puede heredar de TLabel y hacer que muestre & si contiene & en su
>> cText???
>> Vaya... modificar el contenido de cText si su cText tiene un &. No se si
>> me estoy liando...
>> Creo que para esto haría falta disponer de una propiedad Value,
>> compararla y mostrar su cText...
>>
>> En fin, no es importante, pero veo que no depende de Xailer sino de
>> Guindous.
>
> Sí depende de Xailer. Lo que pasa es que lo hemos hecho "a la güindous"
>
>
> De todos modos, haz lo que te he comentado: pon dos ampersand en la cadena
> y se mostrará sólo uno de ellos y no subrayado.
>
> --
> Un saludo,
>
> José F. Giménez
>

[Xevi]

Jose
> Sí depende de Xailer. Lo que pasa es que lo hemos hecho "a la güindous"
>
y... ¿sería muuuu difiiiici ponele una propiedad lWin por defecto a .t. para
este menester????
Pues nos va a ocurrir que en TODOS los Labels que asociemos campos de Bases
de Datos y que éstos campos contengan & se visializarán distintos los Edits
o Browses de los Labels.
Gracias.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:4460f214$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Xevi,
>
>> Vaya con Windows...
>> ¿Se puede heredar de TLabel y hacer que muestre & si contiene & en su
>> cText???
>> Vaya... modificar el contenido de cText si su cText tiene un &. No se si
>> me estoy liando...
>> Creo que para esto haría falta disponer de una propiedad Value,
>> compararla y mostrar su cText...
>>
>> En fin, no es importante, pero veo que no depende de Xailer sino de
>> Guindous.
>
> Sí depende de Xailer. Lo que pasa es que lo hemos hecho "a la güindous"
>
>
> De todos modos, haz lo que te he comentado: pon dos ampersand en la cadena
> y se mostrará sólo uno de ellos y no subrayado.
>
> --
> Un saludo,
>
> José F. Giménez
>

[jfgimenez]

Xevi,
>> Sí depende de Xailer. Lo que pasa es que lo hemos hecho "a la güindous"
>>
> y... ¿sería muuuu difiiiici ponele una propiedad lWin por defecto a .t.
> para este menester????
> Pues nos va a ocurrir que en TODOS los Labels que asociemos campos de
> Bases de Datos y que éstos campos contengan & se visializarán distintos
> los Edits o Browses de los Labels.
Se podría hacer, pero no sé si vale la pena. Ten en cuenta que es más
sencillo poner en tu código algo así:
::oLabel1:cText := StrTran( MIDBF->NOMBRE, "&", "&&" )
y ya está.
--
Un saludo,
José F. Giménez

[Xevi]

Jose,
> Se podría hacer, pero no sé si vale la pena. Ten en cuenta que es más
> sencillo poner en tu código algo así:
>
> ::oLabel1:cText := StrTran( MIDBF->NOMBRE, "&", "&&" )
Si, si sencillo lo es, pero lo que veo es un poco "engorroso" tener que
ponerlo en TODOS los Labels que puedan estar afectados con este carácter.
Por eso lo de poder derivar de la clase y tenerlo en la misma con un simple
..T. o .F.
Se trata de facilitarnos la tarea a nosotros, los jejeje.
Aunque si se te ocurre como sería lo de poder incluirlo en la clase
derivando de XLabel, pues lo incluiría en mi proyecto.
Gracias.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:4461a45a$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> Xevi,
>
>>> Sí depende de Xailer. Lo que pasa es que lo hemos hecho "a la güindous"
>>>
>> y... ¿sería muuuu difiiiici ponele una propiedad lWin por defecto a .t.
>> para este menester????
>> Pues nos va a ocurrir que en TODOS los Labels que asociemos campos de
>> Bases de Datos y que éstos campos contengan & se visializarán distintos
>> los Edits o Browses de los Labels.
>
> Se podría hacer, pero no sé si vale la pena. Ten en cuenta que es más
> sencillo poner en tu código algo así:
>
> ::oLabel1:cText := StrTran( MIDBF->NOMBRE, "&", "&&" )
>
> y ya está.
>
> --
> Un saludo,
>
> José F. Giménez
>

[jfgimenez]

Xevi,
> Si, si sencillo lo es, pero lo que veo es un poco "engorroso" tener que
> ponerlo en TODOS los Labels que puedan estar afectados con este carácter.
> Por eso lo de poder derivar de la clase y tenerlo en la misma con un
> simple .T. o .F.
Si todo eso está muy bien, pero al final hay otros controles (nativos de
windows) que funcionan igual y donde no podremos modificarlo. Por eso sigo
pensando que no es conveniente añadir una propiedad de este tipo, y en
cambio, solucionar el problema en cada caso concreto que sea necesario. A
fin de cuentas, Xailer no lo puede hacer todo... también el programador
tiene que trabajar, ¿o no?
> Aunque si se te ocurre como sería lo de poder incluirlo en la clase
> derivando de XLabel, pues lo incluiría en mi proyecto.
Te lo escribo al vuelo, sin probarlo:
CLASS TLabel FROM XLabel
PROPERTY cText WRITE METHOD SetText
METHOD SetText( cText )
ENDCLASS
METHOD SetText( cText ) CLASS TLabel
RETURN Super:SetText( StrTran( cText, "&", "&&" ) )
--
Un saludo,
José F. Giménez

[Xevi]

Jose,
> fin de cuentas, Xailer no lo puede hacer todo... también el programador
> tiene que trabajar, ¿o no?
En eso tienes TODA la razón, jejeje... solo andamos pidiendo!!!
> Te lo escribo al vuelo, sin probarlo:
>
> CLASS TLabel FROM XLabel
> PROPERTY cText WRITE METHOD SetText
> METHOD SetText( cText )
> ENDCLASS
>
> METHOD SetText( cText ) CLASS TLabel
> RETURN Super:SetText( StrTran( cText, "&", "&&" ) )
A voleo... jejeje... A la primera, Funciona a la primera!!!
Ya no tendré que pensar mas en los Labels y el carácter & en TODA mi
aplicación.
Gracias.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> escribió en el mensaje
news:[email=4461c94f@ozsrvnegro.ozlan.local...]4461c94f@ozsrvnegro.ozlan.local...[/email]
> Xevi,
>
>> Si, si sencillo lo es, pero lo que veo es un poco "engorroso" tener que
>> ponerlo en TODOS los Labels que puedan estar afectados con este carácter.
>> Por eso lo de poder derivar de la clase y tenerlo en la misma con un
>> simple .T. o .F.
>
> Si todo eso está muy bien, pero al final hay otros controles (nativos de
> windows) que funcionan igual y donde no podremos modificarlo. Por eso sigo
> pensando que no es conveniente añadir una propiedad de este tipo, y en
> cambio, solucionar el problema en cada caso concreto que sea necesario. A
> fin de cuentas, Xailer no lo puede hacer todo... también el programador
> tiene que trabajar, ¿o no?
>
>
>> Aunque si se te ocurre como sería lo de poder incluirlo en la clase
>> derivando de XLabel, pues lo incluiría en mi proyecto.
>
> Te lo escribo al vuelo, sin probarlo:
>
> CLASS TLabel FROM XLabel
> PROPERTY cText WRITE METHOD SetText
> METHOD SetText( cText )
> ENDCLASS
>
> METHOD SetText( cText ) CLASS TLabel
> RETURN Super:SetText( StrTran( cText, "&", "&&" ) )
>
> --
> Un saludo,
>
> José F. Giménez
>