home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / borland / cb / setup / cbuilder / data.z / MASKPROP.HPP < prev    next >
Encoding:
C/C++ Source or Header  |  1997-02-28  |  3.6 KB  |  110 lines
  1. //----------------------------------------------------------------------------
  2. // MaskProp.hpp - bcbdcc32 generated hdr (DO NOT EDIT) rev: 0
  3. // From: MaskProp.pas
  4. //----------------------------------------------------------------------------
  5. #ifndef MaskPropHPP
  6. #define MaskPropHPP
  7. //----------------------------------------------------------------------------
  8. #include <Dialogs.hpp>
  9. #include <SysUtils.hpp>
  10. #include <Mask.hpp>
  11. #include <DsgnIntf.hpp>
  12. #include <Buttons.hpp>
  13. #include <ExtCtrls.hpp>
  14. #include <StdCtrls.hpp>
  15. #include <Controls.hpp>
  16. #include <Forms.hpp>
  17. #include <Graphics.hpp>
  18. #include <Classes.hpp>
  19. #include <Windows.hpp>
  20. #include <System.hpp>
  21. #pragma warn -par
  22. #pragma warn -hid 
  23. #pragma warn -inl
  24.  
  25. namespace Maskprop
  26. {
  27. //-- type declarations -------------------------------------------------------
  28. class __declspec(delphiclass) TMaskProperty;
  29. class __declspec(pascalimplementation) TMaskProperty : public Dsgnintf::TStringProperty
  30. {
  31.     typedef Dsgnintf::TStringProperty inherited;
  32.     
  33. public:
  34.     virtual Dsgnintf::TPropertyAttributes __fastcall GetAttributes(void);
  35.     virtual void __fastcall Edit(void);
  36. public:
  37.     /* TPropertyEditor.Destroy */ __fastcall virtual ~TMaskProperty(void) { }
  38.     
  39. public:
  40.     /* TObject.Create */ __fastcall TMaskProperty(void) : Dsgnintf::TStringProperty() { }
  41.     
  42. };
  43.  
  44. class __declspec(delphiclass) TMaskForm;
  45. class __declspec(pascalimplementation) TMaskForm : public Forms::TForm
  46. {
  47.     typedef Forms::TForm inherited;
  48.     
  49. __published:
  50.     Stdctrls::TEdit* InputMask;
  51.     Stdctrls::TLabel* Label1;
  52.     Stdctrls::TListBox* ListBox1;
  53.     Stdctrls::TLabel* Label2;
  54.     Stdctrls::TLabel* Label3;
  55.     Mask::TMaskEdit* TestEdit;
  56.     Stdctrls::TLabel* Label4;
  57.     Stdctrls::TEdit* Blanks;
  58.     Extctrls::TBevel* Bevel1;
  59.     Stdctrls::TCheckBox* SaveMaskCheck;
  60.     Stdctrls::TButton* Masks;
  61.     Dialogs::TOpenDialog* OpenDialog1;
  62.     Stdctrls::TButton* OKButton;
  63.     Stdctrls::TButton* CancelButton;
  64.     Stdctrls::TButton* HelpButton;
  65.     void __fastcall BlanksChange(System::TObject* Sender);
  66.     void __fastcall InputMaskChange(System::TObject* Sender);
  67.     void __fastcall ListDrawItem(Controls::TWinControl* Control, int Index, const Windows::TRect &Rect, 
  68.         Stdctrls::TOwnerDrawState State);
  69.     void __fastcall ListBoxSelect(System::TObject* Sender);
  70.     void __fastcall FormCreate(System::TObject* Sender);
  71.     void __fastcall MasksClick(System::TObject* Sender);
  72.     void __fastcall HelpButtonClick(System::TObject* Sender);
  73.     
  74. private:
  75.     bool FInEditChange;
  76.     System::AnsiString __fastcall AddBlanks( System::AnsiString Value);
  77.     void __fastcall LoadMaskList(const System::AnsiString FileName);
  78.     
  79. protected:
  80.     System::AnsiString __fastcall GetListMaskValue(int Index);
  81.     System::AnsiString __fastcall GetMaskValue(const System::AnsiString Value);
  82.     virtual void __fastcall Loaded(void);
  83. public:
  84.     /* TForm.Create */ __fastcall virtual TMaskForm(Classes::TComponent* AOwner) : Forms::TForm(AOwner)
  85.          { }
  86.     /* TForm.CreateNew */ __fastcall TMaskForm(Classes::TComponent* AOwner, int Dummy) : Forms::TForm(AOwner
  87.         , Dummy) { }
  88.     /* TForm.Destroy */ __fastcall virtual ~TMaskForm(void) { }
  89.     
  90. public:
  91.     /* TWinControl.CreateParented */ __fastcall TMaskForm(HWND ParentWindow) : Forms::TForm(ParentWindow
  92.         ) { }
  93.     
  94. };
  95.  
  96. //-- var, const, procedure ---------------------------------------------------
  97. extern TMaskForm* MaskForm;
  98.  
  99. }    /* namespace Maskprop */
  100.  
  101. #pragma warn .par
  102. #pragma warn .hid 
  103. #pragma warn .inl
  104.  
  105. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  106. using namespace Maskprop;
  107. #endif
  108. //-- end unit ----------------------------------------------------------------
  109. #endif    // MaskProp
  110.