[تمرين] منع صدور اى رسالة خطاء

[hanipino]

السلام عليكم

تمرين خفيف صغير ... .

كيف السبيل لمنع صدور اى رسالة خطاء ?

دون استعمال :

try

except
// ;
end;


او الدالة :

Abort;

[Rover]

يمكن استخدام : raise بالأضافة إلى امكانية تعريف استثناءاتك الخاصة ..


type

ProExp = Class (Exception )

...
...

if Some Worng then
raise ProExp.create ( ' some error description');

[TF6M]

لم أفهم السؤال جيدا:angry: :
1- ممكن بإجراء الـ Halt الخروج بـ ExitCode
2- اErrorAddr لتحديد عنوان الخطأ كـ ExitCode
3- الدالة GetLastError
4- أو بتحرير رسالة خطأ Raise كما أشار الأخ rover
5- أو عن طريق توجيهات الكومبايلر ؟؟ , كـIoChecks
و الله أعلم

[me&delphi]

توجيهات الكومبايلر {-i$} و { +i$}

[shagrouni]

السلام عليكم

تفعيل حدث OnException في المكون TApplicationEvents