topic-32719

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

vieja duda con respecto a los GET
Posted: Mon Jul 18, 2016 02:37 PM

Hola.

...
redefine get oGet[ 01 ] var vGet[ 01 ] id 100 of oDlg 
...

Mi duda es : como le digo al get que va a tener 200 lugares para poder trabajar y luego asignarle un
valor a ese get?

esto le digo la longitud que va tener

Code (fw): Select all Collapse

vGet[ 01 ]:= space(200)

Pero si luego quiero inicializarlo con un valor, al hacer esto:

Code (fw): Select all Collapse

vGet[ 01 ]:= "hola"

la longitud se redujo de 200 a 4, como hago para que mantenga los 200?

gracias.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: vieja duda con respecto a los GET
Posted: Mon Jul 18, 2016 02:47 PM

Code (fw): Select all Collapse

vGet[ 01 ]:= "hola" + SPACE(196)  // = 200 espacios.

Saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: vieja duda con respecto a los GET
Posted: Mon Jul 18, 2016 03:10 PM

pense que era el unico que lo hacia de esa manera...

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: vieja duda con respecto a los GET
Posted: Mon Jul 18, 2016 03:14 PM

Puede también:

Code (fw): Select all Collapse

STORE vGet[ 01 ]:= "hola" + SPACE(196)

Saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Euclides

Posts: 159

Joined: Wed Mar 28, 2007 01:19 PM

Re: vieja duda con respecto a los GET
Posted: Mon Jul 18, 2016 08:06 PM

gosfancito, usted puede hacer también:

Code (fw): Select all Collapse

   cGet:="Hola"
   ...
   REDEFINE GET cGet ID 100 OF oDlg MEMO

Ojo! acepta más de 200 chars.
Saludos, Euclides

Joel Andujo

Posts: 143

Joined: Fri Oct 07, 2005 03:14 PM

Re: vieja duda con respecto a los GET
Posted: Mon Jul 18, 2016 08:55 PM

O así :

STORE vGet[ 01 ]:= PadR("hola", 200)

PAD()
Llena valores de caracteres, fechas y numéricos con caracteres de relleno

Sintaxis
PADL(<exp>, <nLongitud>, [<cCarRelleno>]) --> cCadenaRellena
PADC(<exp>, <nLongitud>, [<cCarRelleno>]) --> cCadenaRellena
PADR(<exp>, <nLongitud>, [<cCarRelleno>]) --> cCadenaRellena

Argumentos
<exp> es el valor de caracteres, numérico o de fechas que se va a
rellenar.
<nLongitud> es la longitud de la cadena de caracteres que se va a
devolver.
<cCarRelleno> es el carácter con el que se va a rellenar <exp>. Si
no se especifica, el valor por defecto es caracteres de espacio.

goosfancito

Posts: 1956

Joined: Fri Oct 07, 2005 07:08 PM

Re: vieja duda con respecto a los GET
Posted: Tue Jul 19, 2016 01:37 PM

Euclides, el problema que tengo no es por los 200, asi sean 20, cuando asignas un valor...

Euclides wrote:gosfancito, usted puede hacer también:
Code (fw): Select all Collapse
   cGet:="Hola"
   ...
   REDEFINE GET cGet ID 100 OF oDlg MEMO
Ojo! acepta más de 200 chars.
Saludos, Euclides

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/

FiveTech Support Forums

Continue the discussion