[Duda] Lista de Objetos ...

Post Reply
User avatar
Chantiel
Posts: 33
Joined: Mon Oct 10, 2005 12:49 pm
Location: En una piedra en medio del Atlantico (Tenerife)

[Duda] Lista de Objetos ...

Post by Chantiel »

Saludos gente,

tengo una duda de programacion. Tengo un array de objetos y quisiera que todos obtuviesen la propiedad de Disable().

lista:= {oGet1,oGet2,oGet3,....}

He intentado varias cosas pero no me han funcionado:

- Utilizar un bucle for asignando a cada valor del array la propiedad Disable().

Code: Select all

for i:= 1 to n
    lista[i]:= Disable()
next
- Asignar de alguna manera a la variable lista directamente la propiedad.

Code: Select all

lista:= Disable()

Tambien quisiera saber como modificar la propiedad de uno de los objetos en especifico de la lista, y si hay alguna forma de hacer un Refresh() de los mismos.


Muchas gracias por adelantado.


Nos leemos!!
FW 2.5 + Cl 5.3 + Blk 7.0

Sin mas ...
DanielPuente
Posts: 108
Joined: Sun Oct 09, 2005 6:12 pm
Location: Mar del Plata - Argentina
Contact:

Post by DanielPuente »

Chantiel:

La primer manera que comentas deberia funcionar:

lista:= Disable()

Solo asegurate que la asignacion en el vector se haga DESPUES de que los objetos esten definidos y que el :Disable() se haga en el lugar adecuado, cuando ya esten creados, por ejemplo al activar el dialogo. Toma cualquier prg y hace algo como lo siguiente:

Local lista:={}

REDEFINE GET oFecha VAR vFecha ID 102 FONT oFont2 of oDlg COLOR CLR_BLACK,RGB(255,255,168)
REDEFINE GET oAtiende VAR cAtiende PICTURE "@Z 99" ID 101 FONT oFont of oDlg

REDEFINE GET oCliente VAR vCliente PICTURE "@z 999999" ID 103 of oDlg FONT oFont

LISTA:={oFecha,oAtiende,oCliente}

ACTIVATE DIALOG oDlg CENTERED ON INIT (Lista[1]:Disable(),Lista[2]:Disable(),Lista[3]:Disable())

Y al activar el dialogo veras los tres gets deshabilitados.

Saludos,
Daniel Puente
Mar del Plata, Argentina
danielpuente@speedy.com.ar
puenteda@hotmail.com
User avatar
Chantiel
Posts: 33
Joined: Mon Oct 10, 2005 12:49 pm
Location: En una piedra en medio del Atlantico (Tenerife)

Post by Chantiel »

Muchas gracias Daniel,

lo probare y te dire que tal va.



Nos leemos!!
FW 2.5 + Cl 5.3 + Blk 7.0

Sin mas ...
Post Reply