home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Internet 2000 May / MICD_2000_05.iso / CBuilder5 / INSTALL / DATA1.CAB / Program_Built_Files / Include / Vcl / nmuue.hpp < prev    next >
C/C++ Source or Header  |  2000-02-01  |  3KB  |  91 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1999 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'NMUUE.pas' rev: 5.00
  6.  
  7. #ifndef NMUUEHPP
  8. #define NMUUEHPP
  9.  
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #pragma option push -Vx
  13. #include <NMConst.hpp>    // Pascal unit
  14. #include <Classes.hpp>    // Pascal unit
  15. #include <SysUtils.hpp>    // Pascal unit
  16. #include <SysInit.hpp>    // Pascal unit
  17. #include <System.hpp>    // Pascal unit
  18.  
  19. //-- user supplied -----------------------------------------------------------
  20.  
  21. namespace Nmuue
  22. {
  23. //-- type declarations -------------------------------------------------------
  24. #pragma option push -b-
  25. enum UUMethods { uuMime, uuCode };
  26. #pragma option pop
  27.  
  28. typedef char ExchangeTable[64];
  29.  
  30. class DELPHICLASS TNMUUProcessor;
  31. class PASCALIMPLEMENTATION TNMUUProcessor : public Classes::TComponent 
  32. {
  33.     typedef Classes::TComponent inherited;
  34.     
  35. private:
  36.     Classes::TNotifyEvent FOnBeginEncode;
  37.     Classes::TNotifyEvent FOnEndEncode;
  38.     Classes::TNotifyEvent FOnBeginDecode;
  39.     Classes::TNotifyEvent FOnEndDecode;
  40.     char EncodingTable[64];
  41.     Classes::TStream* FInputStream;
  42.     Classes::TStream* FOutputStream;
  43.     void __fastcall StdDecode(void);
  44.     void __fastcall Base64Decode(void);
  45.     void __fastcall ReadLnFromStream(Classes::TStream* FromStream, AnsiString &Dline);
  46.     
  47. protected:
  48.     UUMethods fUUMethod;
  49.     void __fastcall SetEncodeTable(void);
  50.     Byte __fastcall UuDEC(Byte InByte);
  51.     
  52. public:
  53.     __fastcall virtual TNMUUProcessor(Classes::TComponent* AOwner);
  54.     void __fastcall Encode(void);
  55.     void __fastcall Decode(void);
  56.     __property Classes::TStream* InputStream = {read=FInputStream, write=FInputStream};
  57.     __property Classes::TStream* OutputStream = {read=FOutputStream, write=FOutputStream};
  58.     
  59. __published:
  60.     __property UUMethods Method = {read=fUUMethod, write=fUUMethod, default=0};
  61.     __property Classes::TNotifyEvent OnBeginEncode = {read=FOnBeginEncode, write=FOnBeginEncode};
  62.     __property Classes::TNotifyEvent OnEndEncode = {read=FOnEndEncode, write=FOnEndEncode};
  63.     __property Classes::TNotifyEvent OnBeginDecode = {read=FOnBeginDecode, write=FOnBeginDecode};
  64.     __property Classes::TNotifyEvent OnEndDecode = {read=FOnEndDecode, write=FOnEndDecode};
  65. public:
  66.     #pragma option push -w-inl
  67.     /* TComponent.Destroy */ inline __fastcall virtual ~TNMUUProcessor(void) { }
  68.     #pragma option pop
  69.     
  70. };
  71.  
  72.  
  73. //-- var, const, procedure ---------------------------------------------------
  74. #define CRLF "\r\n"
  75. static const char CR = '\xd';
  76. static const char LF = '\xa';
  77. extern PACKAGE char UUTABLE[64];
  78. extern PACKAGE char MimeTable[64];
  79. extern PACKAGE Byte base64Table[80];
  80.  
  81. }    /* namespace Nmuue */
  82. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  83. using namespace Nmuue;
  84. #endif
  85. #pragma option pop    // -w-
  86. #pragma option pop    // -Vx
  87.  
  88. #pragma delphiheader end.
  89. //-- end unit ----------------------------------------------------------------
  90. #endif    // NMUUE
  91.