aControls en Folder

Post Reply
jvargas
Posts: 63
Joined: Sun Apr 08, 2007 9:50 pm
Location: Lima Perú

aControls en Folder

Post by jvargas »

Hola amigos
Asi como se puede indagar los nombres de clase de los objetos de un Dlg con:
If oDlg:aControls[x]:ClassName()="TGET"

Cómo se puede saber los nombres de clase de los objetos dentro de un Folder. Algo asi como:
If oFld:aDialogs[y]:aControls[x]:ClassName()="TGET"

claro,esta última instrucción no funciona. Quiero deshabilitar todos los GETs de un folder

Saludos y muchas gracias
Jorge Vargas
FW-705, xHarbour 0.99.71 (SimpLex) , bcc55
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Jorge,

oFld:aDialogs[y]:aControls[x]:ClassName()="TGET"

tiene que funcionarte correctamente
regards, saludos

Antonio Linares
www.fivetechsoft.com
jvargas
Posts: 63
Joined: Sun Apr 08, 2007 9:50 pm
Location: Lima Perú

Post by jvargas »

Hola Antonio
Muchas gracias por tu respuesta.
es cierto funciona bien. Yo me equivoqué en el 2do FOR, puse
for y=1 to len(oFld:aDialogs)
for x=1 to len(oFld:aDialogs[y])
if oFld:aDialogs[y]:aControls[x]:ClassName()="TGET"

en vez de
for x=1 to len(oFld:aDialogs[y]:aControls)

otra vez, muchas gracias
Saludos
Jorge Vargas
FW-705, xHarbour 0.99.71 (SimpLex) , bcc55
Post Reply