RVRTFErr.pas
上传用户:daoqigc
上传日期:2021-04-20
资源大小:2795k
文件大小:1k
源码类别:

RichEdit

开发平台:

Delphi

  1. {*******************************************************}
  2. {                                                       }
  3. {       RichView                                        }
  4. {       Error codes for RTF parser (TRVRTFReader).      }
  5. {                                                       }
  6. {       Copyright (c) Sergey Tkachenko                  }
  7. {       svt@trichview.com                               }
  8. {       http://www.trichview.com                        }
  9. {                                                       }
  10. {*******************************************************}
  11. unit RVRTFErr;
  12. interface
  13.   {----------------------------- error codes --------------------------}
  14. type
  15.   TRVRTFErrorCode = (
  16.     rtf_ec_OK,                   // No error
  17.     rtf_ec_StackUnderflow,       // Unmatched '}'
  18.     rtf_ec_StackOverflow,        // Too many '{' -- memory exhausted
  19.     rtf_ec_UnmatchedBrace,       // RTF ended during an open group.
  20.     rtf_ec_InvalidHex,           // Invalid hex character found in data
  21.     rtf_ec_BadTable,             // RTF table (sym or prop) invalid
  22.     rtf_ec_Assertion,            // Assertion failure
  23.     rtf_ec_EndOfFile,            // End of file reached while reading RTF
  24.     rtf_ec_FileOpenError,        // Parser cannot open input file
  25.     rtf_ec_Exception,            // Exception
  26.     rtf_ec_InvalidPicture,       // Invalid picture or object in RTF
  27.     rtf_ec_Aborted
  28.     );
  29. implementation
  30. end.