Thanks Sergey,

this multicommand is ok for property, but for method exist a problem:

_SCREEN.CLS
cibo=CREATEOBJECT("Peperone")
? 'Pippo is Hidden',PEMSTATUS(CIBO,"pippo",5) and !PEMSTATUS(CIBO,"pippo",2) and TYPE('GETPEM(CIBO,"pippo")')='U'
? 'Click is Hidden',PEMSTATUS(CIBO,"Click",5) and !PEMSTATUS(CIBO,"Click",2) and TYPE('GETPEM(CIBO,"Click")')='U'
cibo.Click()

DEFINE CLASS Peperone AS Hyperlink
	pippo = 45
	HIDDEN pippo
	
	HIDDEN	PROCEDURE Click
		RETURN 'Ciao'
	ENDPROC
	
ENDDEFINE

Fabio