Problemas con GET

[colthop]

Hola a todos:

Me podeis ayudar, lo que hago es muy sencillo pongo un GET dentro de un GROUP en la ventana principal, todo sale bien pero si defino un tamaño de 120 PIXEL los ultimos 30 o 40 no los utiliza y si el campo tiene 10 caracteres solo muestra 7 y el resto hace scroll para verlos. Me podeis ayudar o decir como se cambia para que use todo el tamaño.

Code: Select all  Expand view

  @  0*ProporV,  0*ProporH GROUP tDlg001 TO 210*ProporH,480*ProporV OF oVentPrinc PIXEL COLOR escri1, fondo1
  @ 30*ProporV, 55*ProporH SAY tDlg002 VAR LocaText( 31,4) OF tDlg001 PIXEL COLOR escri1, fondo1 FONT oFont SIZE 200*ProporH,wProPorV*ProPorV
  @ 60*ProporV, 55*ProporH SAY tDlg003 VAR LocaText( 31,5) OF tDlg001 PIXEL COLOR escri1, fondo1 FONT oFont SIZE 200*ProporH,wProPorV*ProPorV
  @ 90*ProporV, 55*ProporH SAY tDlg004 VAR LocaText( 31,9) OF tDlg001 PIXEL COLOR escri1, fondo1 FONT oFont SIZE 200*ProporH,wProPorV*ProPorV
  @120*ProporV, 55*ProporH SAY tDlg005 VAR LocaText( 32,1) OF tDlg001 PIXEL COLOR escri1, fondo1 FONT oFont SIZE 330*ProporH,wProPorV*ProPorV
  @ 30*ProporV,295*ProPorH GET gDlg001 VAR va001           OF tDlg001 PIXEL COLOR escri2, fondo2 FONT oFont SIZE 120*ProPorH,wProPorV*ProPorV RIGHT
  @ 60*ProporV,295*ProPorH GET gDlg002 VAR va002           OF tDlg001 PIXEL COLOR escri2, fondo2 FONT oFont SIZE 120*ProPorH,wProPorV*ProPorV RIGHT PASSWORD
  @ 90*ProporV,295*ProPorH GET gDlg003 VAR va003           OF tDlg001 PIXEL COLOR escri2, fondo2 FONT oFont SIZE 120*ProPorH,wProPorV*ProPorV RIGHT PASSWORD
  @120*ProporV,401*ProPorH GET gDlg004 VAR va004           OF tDlg001 PIXEL COLOR escri2, fondo2 FONT oFont SIZE  24*ProPorH,wProPorV*ProPorV RIGHT PICTURE "!" VALID va004 $ "SN"
  @160*ProPorV, 95*ProPorH BUTTON wPul01 PROMPT LocaText( 20,1) OF tDlg001 PIXEL SIZE 140*ProPorH,30*ProPorV FONT oFont ACTION cambusuaa()
  @160*ProPorV,245*ProPorH BUTTON wPul02 PROMPT LocaText( 20,2) OF tDlg001 PIXEL SIZE 140*ProPorH,30*ProPorV FONT oFont ACTION cambusua3()
  gDlg001:SetFocus()

Un saludo

Carlos

[Antonio Linares]

Carlos,

Prueba a aumentar la longitud de la variable usada, por ejemplo:

local cNombre := "Hola" + Space( 5 ) // le añadimos 5 espacios más

[colthop]

Hola Antonio:

Con esto no soluciono nada ya que lo unico que hace es el scroll mas largo, el problema viene cuando defines la FONT ya que yo la queria hacer mas estrecha y mas alta para que se pudiera utilizar mas caracteres de texto en la pantalla, pero el inconveniente es que en el get necesita un ancho y por muy estrecha que sea la letra siempre lo delimita, ahora defino la FONT normal con 0,-9 y para los get necesito 15 PIXEL por caracter y los say necesitaria 11 o 12 pero los igualo a 15.

Un saludo

Carlos