catchException

catexception

هذه فئة VFP تهدف إلى التقاط الاستثناءات وتسجيلها في سجل، وإذا لزم الأمر، إعادة تشغيلها على مستوى أعلى.

• الدعم: [email protected]
• عنوان URL: http://rauljrz.github.io/

التبعيات

لا أحد! ليس هناك تبعية!

تثبيت

 git clone https://github.com/raulvfp/catchException.git catchException

الاستخدام

ملكيات:

• لا أحد! لا توجد خصائص محددة

طُرق:

• init(bRelaunchThrow) : إنها الطريقة الوحيدة التي يمكن الوصول إليها. طريقة البناء .
  • bRethrowThrow: منطقي يشير إلى ما إذا كان سيتم إعادة تشغيل الاستثناء باستخدام THROW.

مثال:

الأول - لا يقوم هذا المثال بإعادة تشغيل الاستثناء على مستوى أعلى، ولكنه يتحكم فيه في كتلة الالتقاط

    bRelanzarThrow = .F. &&NO Relanza la excepcion.
    TRY 
        *--- Este es una excepcion generada con THROW
        THROW lcExpectedValue 

    CATCH TO loEx
        loTmp = CREATEOBJECT('catchException', bRelanzarThrow)
        
        THIS.MessageOut('Esto me indica si es un error o algo generador por el programador: ' +loEx.Message)
        THIS.MessageOut('Valor de userValue: '+loEx.UserValue)
    ENDTRY

الثاني - في هذا المثال تم طرح الاستثناء إلى مستوى أعلى للتحكم

    bRelanzarThrow = .T. &&Relanza la excepcion al nivel superior.
    TRY 
        *--- Este es una excepcion generada con THROW
        THROW lcExpectedValue 

    CATCH TO loEx
        loTmp = CREATEOBJECT('catchException', bRelanzarThrow)
        *-- No se ejecuta nada despues del CREATEOBJECT('catchException')
    ENDTRY