home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / borland / cb / setup / cbuilder / data.z / CLSSDLPH.HPP < prev    next >
Encoding:
C/C++ Source or Header  |  1997-02-28  |  12.0 KB  |  319 lines
  1. //----------------------------------------------------------------------------
  2. // clssdlph.hpp - bcbdcc32 generated hdr (DO NOT EDIT) rev: 0
  3. // From: clssdlph.pas
  4. //----------------------------------------------------------------------------
  5. #ifndef clssdlphHPP
  6. #define clssdlphHPP
  7. //----------------------------------------------------------------------------
  8. #include <Registry.hpp>
  9. #include <BtsClass.hpp>
  10. #include <about.hpp>
  11. #include <Bde.hpp>
  12. #include <Buttons.hpp>
  13. #include <CodePage.hpp>
  14. #include <StdCtrls.hpp>
  15. #include <RichEdit.hpp>
  16. #include <ComCtrls.hpp>
  17. #include <Menus.hpp>
  18. #include <DBCtrls.hpp>
  19. #include <ExtCtrls.hpp>
  20. #include <DBGrids.hpp>
  21. #include <Grids.hpp>
  22. #include <DBTables.hpp>
  23. #include <DB.hpp>
  24. #include <Dialogs.hpp>
  25. #include <Forms.hpp>
  26. #include <Controls.hpp>
  27. #include <Graphics.hpp>
  28. #include <Classes.hpp>
  29. #include <SysUtils.hpp>
  30. #include <Messages.hpp>
  31. #include <Windows.hpp>
  32. #include <System.hpp>
  33. namespace Clssdlph
  34. {
  35. //-- type declarations -------------------------------------------------------
  36. class __declspec(delphiclass) TExtractObjects;
  37. class __declspec(pascalimplementation) TExtractObjects : public System::TObject
  38. {
  39.     typedef System::TObject inherited;
  40.     
  41. public:
  42.     void __fastcall ExtractObjectNameAndType(int StartPosition, int EndPosition,  System::AnsiString LineString
  43.         ,  System::AnsiString Phase);
  44.     
  45. protected:
  46.     System::AnsiString ObjectName;
  47.     System::AnsiString ObjectType;
  48.     int LastCommaPosition;
  49. public:
  50.     /* TObject.Create */ __fastcall TExtractObjects(void) : System::TObject() { }
  51.     /* TObject.Destroy */ __fastcall virtual ~TExtractObjects(void) { }
  52.     
  53. };
  54.  
  55. class __declspec(delphiclass) TSearchEngine;
  56. class __declspec(pascalimplementation) TSearchEngine : public System::TObject
  57. {
  58.     typedef System::TObject inherited;
  59.     
  60. public:
  61.     void __fastcall SearchForString( System::AnsiString Word, int Occurance, int StartPosition,  System::AnsiString 
  62.         Page);
  63.     
  64. protected:
  65.     long PositionFound;
  66.     long LineNumberFound;
  67.     long LineFoundPositionOne;
  68.     long NewSearchPosition;
  69. public:
  70.     /* TObject.Create */ __fastcall TSearchEngine(void) : System::TObject() { }
  71.     /* TObject.Destroy */ __fastcall virtual ~TSearchEngine(void) { }
  72.     
  73. };
  74.  
  75. class __declspec(delphiclass) TMainDlg;
  76. class __declspec(pascalimplementation) TMainDlg : public Forms::TForm
  77. {
  78.     typedef Forms::TForm inherited;
  79.     
  80. __published:
  81.     Dbtables::TTable* VCLTable;
  82.     Db::TDataSource* DataSource1;
  83.     Menus::TMainMenu* MainMenu1;
  84.     Menus::TMenuItem* File1;
  85.     Stdctrls::TLabel* DisplayTblLabel;
  86.     Menus::TMenuItem* New1;
  87.     Menus::TMenuItem* Open1;
  88.     Menus::TMenuItem* Save1;
  89.     Menus::TMenuItem* SaveAs1;
  90.     Dbtables::TQuery* DestTblQuery;
  91.     Dbtables::TTable* DestTable;
  92.     Menus::TMenuItem* Search1;
  93.     Menus::TMenuItem* Windows1;
  94.     Menus::TMenuItem* Help1;
  95.     Dialogs::TOpenDialog* FileOPenDlg;
  96.     Dbtables::TQuery* DisplayTblQuery;
  97.     Menus::TMenuItem* SaveAll1;
  98.     Menus::TMenuItem* Project1;
  99.     Menus::TMenuItem* Project2;
  100.     Dbtables::TTable* HeaderParser;
  101.     Menus::TMenuItem* WIN32Table1;
  102.     Menus::TPopupMenu* PopupMenu5;
  103.     Menus::TMenuItem* ViewHeader2;
  104.     Menus::TMenuItem* EditHeader2;
  105.     Menus::TMenuItem* ViewSource1;
  106.     Menus::TMenuItem* About1;
  107.     Dbtables::TStringField* HeaderParserHeaderName;
  108.     Dbtables::TBooleanField* HeaderParserParse;
  109.     Dbtables::TBatchMove* BatchMove1;
  110.     Dbtables::TTable* ParseVclTable;
  111.     Dbtables::TTable* Errorlogging;
  112.     Dbtables::TStringField* ErrorloggingUser;
  113.     Dbtables::TStringField* ErrorloggingClassName;
  114.     Dbtables::TStringField* ErrorloggingListBoxText;
  115.     Dbtables::TStringField* ErrorloggingMemberName;
  116.     Dbtables::TTable* ClassListTab;
  117.     Dbtables::TStringField* ClassListTabClassName;
  118.     Extctrls::TPanel* Panel4;
  119.     Comctrls::TRichEdit* DeclarationRichEdit;
  120.     Extctrls::TPanel* Panel5;
  121.     Comctrls::TRichEdit* SourceEntryPage;
  122.     Dbgrids::TDBGrid* DBGrid1;
  123.     Extctrls::TPanel* Panel6;
  124.     Extctrls::TPanel* Panel7;
  125.     Comctrls::TPageControl* PageControl1;
  126.     Extctrls::TPanel* Panel8;
  127.     Stdctrls::TListBox* QuickClassListbox;
  128.     Extctrls::TPanel* Panel1;
  129.     Extctrls::TPanel* Panel2;
  130.     Dbctrls::TDBNavigator* DBNavigator1;
  131.     Menus::TMenuItem* Print1;
  132.     Menus::TMenuItem* PrintDefinition1;
  133.     Dialogs::TPrintDialog* PrintDialog1;
  134.     Menus::TMenuItem* ParseallHeaders1;
  135.     Extctrls::TTimer* Timer2;
  136.     Db::TDatabase* ClassOrgDB;
  137.     Menus::TMenuItem* Grid;
  138.     Menus::TMenuItem* Declaration;
  139.     Menus::TMenuItem* Definition;
  140.     Menus::TMenuItem* QuickClassBox;
  141.     Menus::TMenuItem* MemberList;
  142.     Menus::TMenuItem* ChangeFonts;
  143.     Dialogs::TFontDialog* FontDialog1;
  144.     Menus::TMenuItem* ChangeBkGround;
  145.     Menus::TMenuItem* HeaderPage1;
  146.     Menus::TMenuItem* Declaration1;
  147.     Menus::TMenuItem* Definition1;
  148.     Menus::TMenuItem* QuickClassBox1;
  149.     Menus::TMenuItem* MemberList1;
  150.     Dialogs::TColorDialog* ColorDialog1;
  151.     Stdctrls::TLabel* Label1;
  152.     Stdctrls::TLabel* Label2;
  153.     Stdctrls::TLabel* Label3;
  154.     Stdctrls::TLabel* Label4;
  155.     Comctrls::TListView* MainListBox;
  156.     Controls::TImageList* ImageList1;
  157.     Dbtables::TStringField* DestTableClassName;
  158.     Dbtables::TStringField* DestTableMember;
  159.     Dbtables::TStringField* DestTableMemberName;
  160.     Dbtables::TAutoIncField* DestTableRecNum;
  161.     Dbtables::TStringField* DestTableScope;
  162.     Dbtables::TStringField* DestTableReturnType;
  163.     Dbtables::TStringField* DestTableHeader;
  164.     Dbtables::TSmallintField* DestTablePs;
  165.     Dbtables::TStringField* DestTablePType1;
  166.     Dbtables::TStringField* DestTablePObject1;
  167.     Dbtables::TStringField* DestTablePType2;
  168.     Dbtables::TStringField* DestTablePObject2;
  169.     Dbtables::TStringField* DestTablePType3;
  170.     Dbtables::TStringField* DestTablePObject3;
  171.     Dbtables::TStringField* DestTablePType4;
  172.     Dbtables::TStringField* DestTablePObject4;
  173.     Dbtables::TStringField* DestTablePType5;
  174.     Dbtables::TStringField* DestTablePObject5;
  175.     Dbtables::TStringField* DestTablePType6;
  176.     Dbtables::TStringField* DestTablePObject6;
  177.     Dbtables::TStringField* DestTablePType7;
  178.     Dbtables::TStringField* DestTablePObject7;
  179.     Dbtables::TStringField* DestTablePType8;
  180.     Dbtables::TStringField* DestTablePObject8;
  181.     Dbtables::TStringField* DestTableSecondClass;
  182.     Dbtables::TStringField* DestTableMisc;
  183.     Dbtables::TStringField* VCLTableClassName;
  184.     Dbtables::TStringField* VCLTableMember;
  185.     Dbtables::TStringField* VCLTableMemberName;
  186.     Dbtables::TAutoIncField* VCLTableRecNum;
  187.     Dbtables::TStringField* VCLTableScope;
  188.     Dbtables::TStringField* VCLTableReturnType;
  189.     Dbtables::TStringField* VCLTableHeader;
  190.     Dbtables::TSmallintField* VCLTablePs;
  191.     Dbtables::TStringField* VCLTablePType1;
  192.     Dbtables::TStringField* VCLTablePObject1;
  193.     Dbtables::TStringField* VCLTablePType2;
  194.     Dbtables::TStringField* VCLTablePObject2;
  195.     Dbtables::TStringField* VCLTablePType3;
  196.     Dbtables::TStringField* VCLTablePObject3;
  197.     Dbtables::TStringField* VCLTablePType4;
  198.     Dbtables::TStringField* VCLTablePObject4;
  199.     Dbtables::TStringField* VCLTablePType5;
  200.     Dbtables::TStringField* VCLTablePObject5;
  201.     Dbtables::TStringField* VCLTablePType6;
  202.     Dbtables::TStringField* VCLTablePObject6;
  203.     Dbtables::TStringField* VCLTablePType7;
  204.     Dbtables::TStringField* VCLTablePObject7;
  205.     Dbtables::TStringField* VCLTablePType8;
  206.     Dbtables::TStringField* VCLTablePObject8;
  207.     Dbtables::TStringField* VCLTableSecondClass;
  208.     Dbtables::TStringField* VCLTableMisc;
  209.     Menus::TMenuItem* CloseActivePage1;
  210.     Menus::TMenuItem* CloseAllPages2;
  211.     Menus::TMenuItem* ShowNextDerivation2;
  212.     Menus::TMenuItem* SearchByMemberName1;
  213.     Menus::TMenuItem* SearchByClassName1;
  214.     Menus::TMenuItem* N1;
  215.     Menus::TMenuItem* N3;
  216.     Menus::TMenuItem* N4;
  217.     Menus::TMenuItem* N5;
  218.     Menus::TMenuItem* ClassName1;
  219.     Menus::TMenuItem* LoadVCLHeader1;
  220.     Menus::TMenuItem* PrintHeaderhpp1;
  221.     Menus::TMenuItem* PrintSourcepas1;
  222.     Menus::TMenuItem* Grid1;
  223.     Menus::TMenuItem* HeaderPage;
  224.     Menus::TMenuItem* Exit1;
  225.     void __fastcall SelectaTab(System::TObject* Sender);
  226.     void __fastcall MainSetupWindow(System::TObject* Sender);
  227.     void __fastcall RebuildVCLTable(System::TObject* Sender);
  228.     void __fastcall MainDlgOnShow(System::TObject* Sender);
  229.     void __fastcall MoveToClass(System::TObject* Sender);
  230.     void __fastcall SearchMemberName1Click(System::TObject* Sender);
  231.     void __fastcall ViewHeader1Click(System::TObject* Sender);
  232.     void __fastcall ShowRecordClass1Click(System::TObject* Sender);
  233.     void __fastcall About1Click(System::TObject* Sender);
  234.     void __fastcall SearchClassName1Click(System::TObject* Sender);
  235.     void __fastcall ViewSource1Click(System::TObject* Sender);
  236.     void __fastcall FormResize(System::TObject* Sender);
  237.     void __fastcall Print1Click(System::TObject* Sender);
  238.     void __fastcall PrintDefinition1Click(System::TObject* Sender);
  239.     void __fastcall HeaderSource1Click(System::TObject* Sender);
  240.     void __fastcall ParseaNewHeader1Click(System::TObject* Sender);
  241.     void __fastcall ClosePageClick(System::TObject* Sender);
  242.     void __fastcall CloseAllPages1Click(System::TObject* Sender);
  243.     void __fastcall FormActivate(System::TObject* Sender);
  244.     void __fastcall ChangeFontsClick(System::TObject* Sender);
  245.     void __fastcall ChangeBkGroundClick(System::TObject* Sender);
  246.     void __fastcall MainListBoxClick(System::TObject* Sender);
  247.     void __fastcall ShowNextDerivation1Click(System::TObject* Sender);
  248.     void __fastcall PrintHeaderhpp1Click(System::TObject* Sender);
  249.     void __fastcall PrintSourcepas1Click(System::TObject* Sender);
  250.     void __fastcall Project1Click(System::TObject* Sender);
  251.     void __fastcall FormClose(System::TObject* Sender, Forms::TCloseAction &Action);
  252.     void __fastcall Exit1Click(System::TObject* Sender);
  253.     void __fastcall MainListBoxKeyUp(System::TObject* Sender, Word &Key, Classes::TShiftState Shift);
  254.     
  255. private:
  256.     bool InitializedTable;
  257.     bool DoesFileExist;
  258.     bool MemberSearch;
  259.     System::AnsiString CurrentSecondClass;
  260.     System::AnsiString LocalVclSource;
  261.     System::AnsiString LocalTablesDir;
  262.     System::AnsiString LocalVclHeaders;
  263.     int DefinitionLength;
  264.     System::AnsiString PasSourceFileName;
  265.     bool LocateSuccess;
  266.     Btsclass::TCloneTable* RawVCLTable;
  267.     System::AnsiString UserName;
  268.     System::AnsiString CurrentHeaderFileName;
  269.     System::AnsiString CurrentSourceFileName;
  270.     Db::TLocateOptions MySearchOptions;
  271.     long EndLineNum;
  272.     bool DefinitionEditMode;
  273.     bool DeclarationEditMode;
  274.     System::SmallString<40>  CurrentSelectedMemberName;
  275.     bool FileOpenActive;
  276.     System::SmallString<40>  ClassFinderSelectedItem;
  277.     System::SmallString<40>  CurrentTabClassName;
  278.     void __fastcall WriteRegistryKeys(void);
  279.     void __fastcall ProcessSelectedClass(void);
  280.     void __fastcall LoadSourcePage(void);
  281.     void __fastcall GetRegistryInfo(void);
  282.     void __fastcall LoadDefinitionSource( System::AnsiString MemberType);
  283.     void __fastcall LoadDeclarationSource( System::AnsiString ListBoxString);
  284.     int __fastcall DetermineImageIndex( System::AnsiString Scope,  System::AnsiString Member);
  285.     bool __fastcall IsItABadLine( System::AnsiString Line, int DefinedLineNumber);
  286.     void __fastcall ExtractClassMembers(int ClassPosition,  System::AnsiString ClassName);
  287.     void __fastcall ConvertCppToDestTable(void);
  288.     void __fastcall QueryDispTbl_LoadQuickList(void);
  289.     void __fastcall StringToTablePos( System::AnsiString SelectedText,  System::AnsiString ClassName);
  290.     void __fastcall ConvertTableToTabs(void);
  291.     void __fastcall TableToListStrings( System::AnsiString ClassName);
  292.     void __fastcall MemberToTable( System::AnsiString MemberDeclaration,  System::AnsiString MyScope,  System::AnsiString 
  293.         CppClassName, int MemberLineNumber);
  294. public:
  295.     /* TForm.Create */ __fastcall virtual TMainDlg(Classes::TComponent* AOwner) : Forms::TForm(AOwner) { }
  296.         
  297.     /* TForm.CreateNew */ __fastcall TMainDlg(Classes::TComponent* AOwner, int Dummy) : Forms::TForm(AOwner
  298.         , Dummy) { }
  299.     /* TForm.Destroy */ __fastcall virtual ~TMainDlg(void) { }
  300.     
  301. public:
  302.     /* TWinControl.CreateParented */ __fastcall TMainDlg(HWND ParentWindow) : Forms::TForm(ParentWindow
  303.         ) { }
  304.     
  305. };
  306.  
  307. //-- var, const, procedure ---------------------------------------------------
  308. extern TMainDlg* MainDlg;
  309. //-- template instantiations -------------------------------------------------
  310. template class SmallString<40> ;
  311. template class Db::TLocateOptions ;
  312.  
  313. }    /* namespace Clssdlph */
  314. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  315. using namespace Clssdlph;
  316. #endif
  317. //-- end unit ----------------------------------------------------------------
  318. #endif    // clssdlph
  319.