home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Internet 2000 May / MICD_2000_05.iso / CBuilder5 / INSTALL / DATA1.CAB / Program_Built_Files / Include / Vcl / masks.hpp < prev    next >
C/C++ Source or Header  |  2000-02-01  |  1KB  |  50 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) 'Masks.pas' rev: 5.00
  6.  
  7. #ifndef MasksHPP
  8. #define MasksHPP
  9.  
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #pragma option push -Vx
  13. #include <SysInit.hpp>    // Pascal unit
  14. #include <System.hpp>    // Pascal unit
  15.  
  16. //-- user supplied -----------------------------------------------------------
  17.  
  18. namespace Masks
  19. {
  20. //-- type declarations -------------------------------------------------------
  21. class DELPHICLASS TMask;
  22. class PASCALIMPLEMENTATION TMask : public System::TObject 
  23. {
  24.     typedef System::TObject inherited;
  25.     
  26. private:
  27.     void *FMask;
  28.     int FSize;
  29.     
  30. public:
  31.     __fastcall TMask(const AnsiString MaskValue);
  32.     __fastcall virtual ~TMask(void);
  33.     bool __fastcall Matches(const AnsiString Filename);
  34. };
  35.  
  36.  
  37. //-- var, const, procedure ---------------------------------------------------
  38. extern PACKAGE bool __fastcall MatchesMask(const AnsiString Filename, const AnsiString Mask);
  39.  
  40. }    /* namespace Masks */
  41. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  42. using namespace Masks;
  43. #endif
  44. #pragma option pop    // -w-
  45. #pragma option pop    // -Vx
  46.  
  47. #pragma delphiheader end.
  48. //-- end unit ----------------------------------------------------------------
  49. #endif    // Masks
  50.