Page 1 of 1
LABEL superior (cuestión de estetica)
Posted: Wed Apr 03, 2019 6:13 am
by SALINETAS24
Hola a todos.
Necesito una ayuda estética. Como podeis ver en la pantalla que os adjunto el texto que muestra LABEL queda un poco por encima del testo que muestra el TEXTBOX.
Mientras que el TEXTBOX lo muestra centrado, el LABEL lo hace en la parte superior, y eso se nota más cuando se utiliza la opción BACKCOLOR.
Tengo claro que si uso la opción TRANSPARENT ya lo pongo donde quiero y problema resuelto, pero la intención es hacerlo con la opción BACKCOLOR.
¿Hay alguna forma de centrarlo arriba y abajo...?
- PANT_LABEL.JPG (5.64 KiB) Viewed 2494 times
Code: Select all
@ 350,090 TEXTBOX Get05 VALUE aField[5] FONT gFont SIZE gSize WIDTH 40 NUMERIC INPUTMASK "999"
@ 350,140 LABEL LB05a VALUE " " AUTOSIZE FONT sFont SIZE sSize BACKCOLOR Color_s FONTCOLOR BLUE
Muchas gracias a todos ..., y venga esa cervecita fresquita!!
Re: LABEL superior (cuestión de estetica)
Posted: Wed Apr 03, 2019 5:45 pm
by Leopoldo Blancas
Hola Salinetas24,
Al parecer no hay solución "sencilla" a tu sugerencia, solo desde la creación del objeto es que a lo mejor pueden hacer algo, yo también he batallado con lo que mencionas.
Esperemos que alguien de luz a este inconveniente.
Saludos.
Re: LABEL superior (cuestión de estetica)
Posted: Wed Apr 03, 2019 7:01 pm
by andyglezl
Si quitas la propiedad AUTOSIZE
y utilizas WIDTH y HEIGHT no te funciona ?
o de otra forma utilizando:
TEXTBOX <ControlName> READONLY DISABLEDBACKCOLOR <aDisabledBackColor> DISABLEDFONTCOLOR <aDisabledFontColor>
Re: LABEL superior (cuestión de estetica)
Posted: Wed Apr 03, 2019 7:34 pm
by SALINETAS24
Hola, gracias a ambos dos por contestar.
Efectivamente Andrés, con el WIDTH y HEIGHT se ajusta y queda mejor.
Lo del TEXTBOX es también una magnifica solución, una lastima que se muestre el recuadro que lo bordea..., para mi gusto.
pero lo tendré en cuenta.
Vamos con esa caña!!
Re: LABEL superior (cuestión de estetica)
Posted: Wed Apr 03, 2019 8:35 pm
by Leopoldo Blancas
Andyglezl y Salinetas24
La solución es latosa, ya que cuando tienes muchos TextBox y Labels y diferentes tamaños de fuentes, tienes que jugar con lo alto de los controles, lo ideal seria que desde la creación de los controles se alinearan a la perfección.
Y Salinetas24: Efectivamente seria bueno que se les pudiera quitar a gusto de cada quien el cuadro del TextBox e incluso poderle poner color y grosor diferente... como una propiedad más del control. Esperemos que los que llevan el TIMON DEL BARCO lo consideren.
Saludos.
Re: LABEL superior (cuestión de estetica)
Posted: Thu Apr 04, 2019 2:41 am
by andyglezl
Leopoldo Blancas wrote: ↑Wed Apr 03, 2019 8:35 pm
Andyglezl y Salinetas24
La solución es latosa, ya que cuando tienes muchos TextBox y Labels y diferentes tamaños de fuentes, tienes que jugar con lo alto de los controles, lo ideal seria que desde la creación de los controles se alinearan a la perfección.
Claro que desde la creación del control los puedes alinear,
ponlos en un FOR - NEXT.
Por ejemplo...
Code: Select all
nReng := 10
FOR i1 = 1 TO nCpos
cLBOpc1 := "LBL1_"+STRZERO( i1, 2 )
cLBOpc2 := "LBL2_"+STRZERO( i1, 2 )
cTBOpc := "TXB_"+STRZERO( i1, 2 )
@ nReng+1 , 000 LABEL &cLBOpc1. OF Form_OnLost VALUE PADL( aHeaders[ i1 ]+" ("+aTips[ i1 ]+") :", 16, " ") WIDTH 110 HEIGHT 18 ;
FONT "Consolas" FONTCOLOR BLACK RIGHTALIGN TRANSPARENT
@ nReng+1 , 403 LABEL &cLBOpc2. OF Form_OnLost VALUE aTips[ i1 ] WIDTH 10 HEIGHT 12 FONTCOLOR GRAY SIZE 6 TRANSPARENT
cCpoPso := "Ctes->"+ aHeaders[ i1 ]
@ nReng , 112 TEXTBOX &cTBOpc. OF WinCpos WIDTH 290 HEIGHT 20 FIELD &cCpoPso. FONT "Consolas" ;
ON LOSTFOCUS CkCtrolValue( ThisWindow.Name, This.Name )
nReng += 25
NEXT
- LABELS.png (57.46 KiB) Viewed 2407 times
Re: LABEL superior (cuestión de estetica)
Posted: Thu Apr 04, 2019 3:17 am
by Leopoldo Blancas
Andyglesl:
Cuando es así es "fácil" pero tienes que jugar con lo alto: Label 12 y 18... TEXTBOX 20, Label nReng+1 TEXTBOX nReng.... solo encuentras la posición correcta en cada caso y esa aplicas, pero en el caso de cambio del tamaño de la letra, otra vez tienes que calcular, claro que el ide te ayuda... pero bueno, de que se puede se puede.
Saludos.