Проекты Логинова Дмитрия

Справочная система Matrix32

MatrixCreateExceptObj Function

Создает объект исключения класса AClass с сообщением AText.

Declaration
Function MatrixCreateExceptObj(AClass: ExceptClass; const AText: string; FuncName: string = ''; AMatrix: TMatrix = nil): Exception;

Description
Использование данной функции более предпочтительно по сравнению с использованием функции ReRaiseMatrixError, так как упрощает работу со средствами отладки, подобными JEDI

Parameters
AClass Класс объекта исключения
AText Текст сообщения об ошибке
FuncName Имя функции, в которой исключение будет сгенерировано
AMatrix Объект TMatrix, сопоставленный с данным исключением

MatrixCreateExceptObj Example

 function DivValues(A, B: Integer): Double;
 begin
   if B = 0 then
     raise MatrixCreateExceptObj(EZeroDivide, SDivByZero, 'function DivValues', nil);
   Result := A / B;
 end;