Olá Mauro
Uma forma bem simples seria você criar um método no objeto COM que você passasse um parâmetro (nome da propriedade) e que te retornasse por macro substituição a propriedade. Algo +/- assim:
LPARAMETERS pcPropriedade
IF TYPE("THIS."+pcPropriedade)#'U'
RETURN EVALUATE("THIS."+pcPropriedade)
ENDIF
RETURN .NULL.
Atenciosamente
L. FernandoMSN Messenger:
luisfoxi@hotmail.comO Sucesso depenende principalmente de você estar no LUGAR CERTO, na HORA CERTA, com as PESSOAS CERTAS.
A COMPETÊNCIA só ajuda a manter o sucesso!