home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Internet 2000 May / MICD_2000_05.iso / CBuilder5 / INSTALL / DATA1.CAB / Program_Built_Files / Include / Vcl / itemedit.hpp < prev    next >
C/C++ Source or Header  |  2000-02-01  |  5KB  |  141 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) 'ItemEdit.pas' rev: 5.00
  6.  
  7. #ifndef ItemEditHPP
  8. #define ItemEditHPP
  9.  
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #pragma option push -Vx
  13. #include <LibHelp.hpp>    // Pascal unit
  14. #include <ComCtrls.hpp>    // Pascal unit
  15. #include <StdCtrls.hpp>    // Pascal unit
  16. #include <Dialogs.hpp>    // Pascal unit
  17. #include <Forms.hpp>    // Pascal unit
  18. #include <Controls.hpp>    // Pascal unit
  19. #include <Graphics.hpp>    // Pascal unit
  20. #include <Classes.hpp>    // Pascal unit
  21. #include <Messages.hpp>    // Pascal unit
  22. #include <Windows.hpp>    // Pascal unit
  23. #include <SysUtils.hpp>    // Pascal unit
  24. #include <SysInit.hpp>    // Pascal unit
  25. #include <System.hpp>    // Pascal unit
  26.  
  27. //-- user supplied -----------------------------------------------------------
  28.  
  29. namespace Itemedit
  30. {
  31. //-- type declarations -------------------------------------------------------
  32. class DELPHICLASS TItemInfo;
  33. class PASCALIMPLEMENTATION TItemInfo : public System::TObject 
  34. {
  35.     typedef System::TObject inherited;
  36.     
  37. private:
  38.     Classes::TStringList* FSubItems;
  39.     Classes::TList* FSubItemImages;
  40.     AnsiString FCaption;
  41.     int FImageIndex;
  42.     int FStateIndex;
  43.     
  44. public:
  45.     __fastcall TItemInfo(Comctrls::TListItem* Item);
  46.     __fastcall virtual ~TItemInfo(void);
  47. };
  48.  
  49.  
  50. class DELPHICLASS TListViewItems;
  51. class PASCALIMPLEMENTATION TListViewItems : public Forms::TForm 
  52. {
  53.     typedef Forms::TForm inherited;
  54.     
  55. __published:
  56.     Stdctrls::TGroupBox* GroupBox1;
  57.     Stdctrls::TGroupBox* PropGroupBox;
  58.     Stdctrls::TButton* New;
  59.     Stdctrls::TButton* Delete;
  60.     Stdctrls::TLabel* Label1;
  61.     Stdctrls::TLabel* Label2;
  62.     Stdctrls::TLabel* Label3;
  63.     Comctrls::TTreeView* TreeView;
  64.     Stdctrls::TButton* NewSub;
  65.     Stdctrls::TEdit* Text;
  66.     Stdctrls::TEdit* Image;
  67.     Stdctrls::TEdit* StateImage;
  68.     Stdctrls::TButton* Button4;
  69.     Stdctrls::TButton* Cancel;
  70.     Stdctrls::TButton* Apply;
  71.     Stdctrls::TButton* Button7;
  72.     void __fastcall NewClick(System::TObject* Sender);
  73.     void __fastcall NewSubClick(System::TObject* Sender);
  74.     void __fastcall DeleteClick(System::TObject* Sender);
  75.     void __fastcall ValueChange(System::TObject* Sender);
  76.     void __fastcall TextExit(System::TObject* Sender);
  77.     void __fastcall ImageExit(System::TObject* Sender);
  78.     void __fastcall StateImageExit(System::TObject* Sender);
  79.     void __fastcall FormCreate(System::TObject* Sender);
  80.     void __fastcall ApplyClick(System::TObject* Sender);
  81.     void __fastcall TreeViewChange(System::TObject* Sender, Comctrls::TTreeNode* Node);
  82.     void __fastcall TreeViewChanging(System::TObject* Sender, Comctrls::TTreeNode* Node, bool &AllowChange
  83.         );
  84.     void __fastcall TreeViewDragOver(System::TObject* Sender, System::TObject* Source, int X, int Y, Controls::TDragState 
  85.         State, bool &Accept);
  86.     void __fastcall TreeViewDragDrop(System::TObject* Sender, System::TObject* Source, int X, int Y);
  87.     void __fastcall TreeViewEdited(System::TObject* Sender, Comctrls::TTreeNode* Node, AnsiString &S);
  88.     void __fastcall Button7Click(System::TObject* Sender);
  89.     void __fastcall TreeViewKeyDown(System::TObject* Sender, Word &Key, Classes::TShiftState Shift);
  90.     void __fastcall TreeViewEditing(System::TObject* Sender, Comctrls::TTreeNode* Node, bool &AllowEdit
  91.         );
  92.     
  93. private:
  94.     Comctrls::TListItems* FItems;
  95.     bool FDropping;
  96.     void __fastcall FlushControls(void);
  97.     void __fastcall GetItem(TItemInfo* ItemInfo, Comctrls::TListItem* Value);
  98.     void __fastcall SetItem(TItemInfo* Value);
  99.     void __fastcall SetStates(void);
  100.     void __fastcall SetSubItem(const AnsiString S, int ImageIndex);
  101.     MESSAGE void __fastcall UMTreeEdit(Messages::TMessage &M);
  102.     
  103. public:
  104.     __property Comctrls::TListItems* Items = {read=FItems};
  105. public:
  106.     #pragma option push -w-inl
  107.     /* TCustomForm.Create */ inline __fastcall virtual TListViewItems(Classes::TComponent* AOwner) : Forms::TForm(
  108.         AOwner) { }
  109.     #pragma option pop
  110.     #pragma option push -w-inl
  111.     /* TCustomForm.CreateNew */ inline __fastcall virtual TListViewItems(Classes::TComponent* AOwner, int 
  112.         Dummy) : Forms::TForm(AOwner, Dummy) { }
  113.     #pragma option pop
  114.     #pragma option push -w-inl
  115.     /* TCustomForm.Destroy */ inline __fastcall virtual ~TListViewItems(void) { }
  116.     #pragma option pop
  117.     
  118. public:
  119.     #pragma option push -w-inl
  120.     /* TWinControl.CreateParented */ inline __fastcall TListViewItems(HWND ParentWindow) : Forms::TForm(
  121.         ParentWindow) { }
  122.     #pragma option pop
  123.     
  124. };
  125.  
  126.  
  127. //-- var, const, procedure ---------------------------------------------------
  128. static const Word UM_TREEEDIT = 0x400;
  129. extern PACKAGE bool __fastcall EditListViewItems(Comctrls::TListItems* AItems);
  130.  
  131. }    /* namespace Itemedit */
  132. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  133. using namespace Itemedit;
  134. #endif
  135. #pragma option pop    // -w-
  136. #pragma option pop    // -Vx
  137.  
  138. #pragma delphiheader end.
  139. //-- end unit ----------------------------------------------------------------
  140. #endif    // ItemEdit
  141.