Page 1 of 1

TEXTBOX ARRAY

Posted: Wed Feb 28, 2018 8:55 pm
by SALINETAS24
Hola,

Es posible que el nombre del TEXTBOX sea un Array.

@ 66 , 330 LABEL LABEL_1 ;
VALUE 'Código:' ;
WIDTH 80

@ 66 , 405 TEXTBOX aField[1] ;
MAXLENGTH 10


@ 96 , 330 LABEL LABEL_3 ;
VALUE 'Tipo:' ;
WIDTH 80

@ 96 , 405 TEXTBOX aField[2] ;
MAXLENGTH 10

lo compilo bien, pero a la hora de ejecutarlo me da un error en la definición.

Gracias.

Re: TEXTBOX ARRAY

Posted: Wed Feb 28, 2018 9:49 pm
by andyglezl
Hola Salinetas

Si le antepones (ampersan) no te funciona ?
@ 96 , 405 TEXTBOX &aField[1]

Re: TEXTBOX ARRAY

Posted: Wed Feb 28, 2018 10:24 pm
by SALINETAS24
No, me da error en el momento lo ejecuto.

Re: TEXTBOX ARRAY

Posted: Wed Feb 28, 2018 10:51 pm
by SALINETAS24
Otra cuestión.
Puedo refrescar la información de varios TEXTBOX a la vez, o tengo que hacerlo uno a uno.

Vereis, yo vengo de clipper, y tenía un función que cargaba los valores de registro de un fichero en una Array (nombre, dirección, población, provincia,teleno, etc., etc) y lo hacia con un bucle FOR. Despues pedia los valores con GET y cuando ya estaban correctos los gravaba con otro bucle FOR.

Ahora veo que esto no es posible, necesito para una a una cada varia del fichero a su textbox y viceversa.
¿estoy en lo cierto..?

Si tienes un solo fichero no tiene importancia pero para grandes programas con muchas bases de datos distintas..., puff mucha tarea ingrata.

No se si me he explicado. Agradezco cualquier aporte.

Re: TEXTBOX ARRAY

Posted: Thu Mar 01, 2018 1:01 am
by srvet_claudio
Ej.

For i = 1 to Len ( aField )
ctext = aField[ i ] // asignar el contenido del array a una variable
@ 96 +i*20, 405 TEXTBOX &ctext // hacer macrosustitucion con la variable
Next

Re: TEXTBOX ARRAY

Posted: Thu Mar 01, 2018 8:35 pm
by SALINETAS24
muchas gracias lo pruebo