errorconsts.pas

《Delphi技术手册源码》原书佩戴的光盘

unit ErrorConsts;

interface

const
  // I/O Error constants
  errEOF          = 100;  // Read past end of file.
  errDiskFull     = 101;  // Disk is full.
  errNotAssigned  = 102;  // AssignFile has not yet been called.
  errNotOpen      = 103;  // The file is closed.
  errNotInput     = 104;  // File not open for input.
  errNotOutput    = 105;  // File not open for output.
  errInvalidInput = 106;  // Incorrectly formatted input for Read

  // Internal error codes
  errIO                     = 0;  // I/O error, see above.
  errOutOfMemory            = 1;  // Out of memory
  errInvalidPointer         = 2;  // Invalid pointer
  errIntZeroDivide          = 3;  // Integer divide by zero
  errArrayRangeError        = 4;  // Array bounds error
  errIntBoundsError         = 5;  // Integer or enumerated range error
  errInvalidOp              = 6;  // Invalid floating point operation
  errFloatZeroDivide        = 7;  // Floating point divide by zero
  errOverflow               = 8;  // Floating point overflow
  errUnderflow              = 9;  // Floating point underflow
  errInvalidCast            = 10; // Invalid object type cast
  errAccessViolation        = 11; // Access violation
  errStackOverflow          = 12; // Stack overflow
  errInterrupt              = 13; // Control+Break interrupt
  errPrivilege              = 14; // Privileged instruction
  errVariantTypeCast        = 15; // Invalid Variant type cast
  errInvalidVariantOp       = 16; // Invalid Variant operation
  errNoVariantDispatch      = 17; // No Variant method call dispatcher
  errCantCreateArray        = 18; // Unable to create Variant array
  errVariantError           = 19; // Array operation on a non-array Variant
  errVariantArrayRangeError = 20; // Variant array bounds error
  errAssertionFailed        = 21; // Assertion failed
  errExternal               = 22; // SysUtils external exception
  errIntfTypeCast           = 23; // Invalid interface type cast
  errSafeCall               = 24; // Error in safecall method

implementation

end.