Page 1 of 1

Picture de Gests

Posted: Thu Jul 12, 2007 11:00 am
by fmontepo
Hola gente del foro.
Estoy cambiando un sistema de 16 bits a 32 bits, y estoy utilizando xHarbour + fwh.
Tengo un inconveniente en la inicialización de las variables y es este:

Tengo definido un get así:

REDEFINE BTNGET oGets[1] VAR vGets[1] ; // Razón Social
ID 101 OF oDlg PICTURE "@S100"

como puede verse el picture es un string de 100 caracteres,

después de que se hace esto:

vGets[1]:= oRs:Fields("razon_social"):Value

ya no puedo escribir más 100 caracteres, solo puedo escribir la cantidad de caracterres que contiene el valor del campo "razon_social".
Ej. si el campo "razon_social" contiene PRUEBA, solo me deja escribir 6 caracteres.
Que estoy haciendo mal?

Fernando Monteporzi.
Santo Tomé - Santa Fe - Argentina.
fmontepo@yahoo.com.ar
[/b]

Posted: Thu Jul 12, 2007 11:10 am
by Antonio Linares
Fernando,

Hazlo así:

vGets[1]:= PadR( oRs:Fields("razon_social"):Value, 100 )

Posted: Thu Jul 12, 2007 1:09 pm
by fmontepo
Antonio,
Gracias.