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
aControls en Folder
aControls en Folder
FW-705, xHarbour 0.99.71 (SimpLex) , bcc55
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
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
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