... así: METHOD New ( nTop, nLeft, nWidth, nHeight, oWnd, oFont, nLANGUAGE ) CLASS TMiCalendario DEFAULT nTop:=5, nLeft:=5,nWidth:=120,nHeight:=120 //Bingen DEFAULT nLanguage := L_SPANISH [...] ::oWnd := oWnd ::oFont := oFont Ahora, ::oFont:SetFont( oFont ) me dice que "No existe el método: SETFONT". ...