home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 September / Chip_2001-09_cd1.bin / zkuste / delphi / kolekce / d12345 / MISC.ZIP / Checkgrp.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  2001-05-09  |  2.3 KB  |  75 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'Checkgrp.pas' rev: 3.00
  6.  
  7. #ifndef CheckgrpHPP
  8. #define CheckgrpHPP
  9. #include <Controls.hpp>
  10. #include <StdCtrls.hpp>
  11. #include <Messages.hpp>
  12. #include <Graphics.hpp>
  13. #include <Windows.hpp>
  14. #include <SysUtils.hpp>
  15. #include <Classes.hpp>
  16. #include <SysInit.hpp>
  17. #include <System.hpp>
  18.  
  19. //-- user supplied -----------------------------------------------------------
  20.  
  21. namespace Checkgrp
  22. {
  23. //-- type declarations -------------------------------------------------------
  24. typedef Stdctrls::TCheckBox* TCheckBoxArray[1024];
  25.  
  26. typedef TCheckBoxArray *pCheckBoxArray;
  27.  
  28. typedef void __fastcall (__closure *TOnBoxClick)(System::TObject* Sender, int Tag);
  29.  
  30. class DELPHICLASS TCheckGroup;
  31. class PASCALIMPLEMENTATION TCheckGroup : public Stdctrls::TGroupBox 
  32. {
  33.     typedef Stdctrls::TGroupBox inherited;
  34.     
  35. private:
  36.     Classes::TStringList* FItems;
  37.     int FNo_CheckBoxes;
  38.     Byte FColumns;
  39.     TOnBoxClick FOnBoxClick;
  40.     void __fastcall SetColumns(Byte Value);
  41.     void __fastcall SetItems(Classes::TStringList* Value);
  42.     HIDESBASE MESSAGE void __fastcall WMSize(Messages::TMessage &Message);
  43.     
  44. protected:
  45.     virtual void __fastcall DoBoxClick(System::TObject* Sender);
  46.     virtual void __fastcall Loaded(void);
  47.     void __fastcall SetNoCheckBoxes(int Value);
  48.     virtual void __fastcall OnItemsChange(System::TObject* Sender);
  49.     
  50. public:
  51.     TCheckBoxArray *CheckBoxes;
  52.     __fastcall virtual TCheckGroup(Classes::TComponent* AOwner);
  53.     __fastcall virtual ~TCheckGroup(void);
  54.     void __fastcall ArrangeCheckBoxes(void);
  55.     
  56. __published:
  57.     __property Byte Columns = {read=FColumns, write=SetColumns, nodefault};
  58.     __property Classes::TStringList* Items = {read=FItems, write=SetItems};
  59.     __property TOnBoxClick OnBoxClick = {read=FOnBoxClick, write=FOnBoxClick};
  60. public:
  61.     /* TWinControl.CreateParented */ __fastcall TCheckGroup(HWND ParentWindow) : Stdctrls::TGroupBox(ParentWindow
  62.         ) { }
  63.     
  64. };
  65.  
  66. //-- var, const, procedure ---------------------------------------------------
  67. #define TCHECKGROUP_VERSION (Byte)(100)
  68.  
  69. }    /* namespace Checkgrp */
  70. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  71. using namespace Checkgrp;
  72. #endif
  73. //-- end unit ----------------------------------------------------------------
  74. #endif    // Checkgrp
  75.