home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 9 / CDACTUAL9.iso / progs / CB / DATA.Z / LIBINTF.HPP < prev    next >
Encoding:
C/C++ Source or Header  |  1996-11-06  |  15.9 KB  |  382 lines
  1. //----------------------------------------------------------------------------
  2. // LibIntf.hpp - dcc32 generated hdr (DO NOT EDIT) rev: -2
  3. // From: LibIntf.pas
  4. //----------------------------------------------------------------------------
  5. #ifndef LibIntfHPP
  6. #define LibIntfHPP
  7. //----------------------------------------------------------------------------
  8. #ifndef FileIntfHPP
  9. #include <FileIntf.hpp>
  10. #endif
  11.  
  12. #ifndef EditIntfHPP
  13. #include <EditIntf.hpp>
  14. #endif
  15.  
  16. #ifndef ExptintfHPP
  17. #include <Exptintf.hpp>
  18. #endif
  19.  
  20. #ifndef ToolIntfHPP
  21. #include <ToolIntf.hpp>
  22. #endif
  23.  
  24. #ifndef DsgnIntfHPP
  25. #include <DsgnIntf.hpp>
  26. #endif
  27.  
  28. #ifndef TypInfoHPP
  29. #include <TypInfo.hpp>
  30. #endif
  31.  
  32. #ifndef VirtIntfHPP
  33. #include <VirtIntf.hpp>
  34. #endif
  35.  
  36. #ifndef GraphicsHPP
  37. #include <Graphics.hpp>
  38. #endif
  39.  
  40. #ifndef ClassesHPP
  41. #include <Classes.hpp>
  42. #endif
  43.  
  44. #ifndef SysUtilsHPP
  45. #include <SysUtils.hpp>
  46. #endif
  47.  
  48. #ifndef WindowsHPP
  49. #include <Windows.hpp>
  50. #endif
  51.  
  52. #ifndef SystemHPP
  53. #include <System.hpp>
  54. #endif
  55.  
  56. namespace Libintf
  57. {
  58. //-- type declarations -------------------------------------------------------
  59. enum TDesignDialog { ddAlign, ddSize, ddScale, ddTabOrder, ddCreationOrder, ddSaveTemplate };
  60.  
  61. struct TDesignerOptions
  62. {
  63.     System::Boolean DisplayGrid;
  64.     System::Boolean SnapToGrid;
  65.     System::Integer GridSizeX;
  66.     System::Integer GridSizeY;
  67.     System::Boolean ShowComponentCaptions;
  68. } ;
  69.  
  70. class __declspec(delphiclass) TIAppBuilder;
  71. class __declspec(delphiclass) TICompClass;
  72. class __declspec(pascalimplementation) TIAppBuilder : public Virtintf::TInterface
  73. {
  74.     typedef TIAppBuilder ThisClass;
  75.     typedef Virtintf::TInterface inherited;
  76.     
  77. public:
  78.     virtual void __fastcall ActiveFormModified(void) = 0;
  79.     virtual void __fastcall ComponentRenamed(const System::AnsiString CurName, const System::AnsiString 
  80.         NewName) = 0;
  81.     virtual void __fastcall ExecDesignDialog(TDesignDialog DesignDialog) = 0;
  82.     virtual void __fastcall FormActivated(void) = 0;
  83.     virtual System::Integer __fastcall GetAppHandle(void) = 0;
  84.     virtual System::AnsiString __fastcall GetPathAndBaseExeName(void) = 0;
  85.     virtual System::AnsiString __fastcall GetBaseRegKey(void) = 0;
  86.     virtual TICompClass *__fastcall GetCurCompClass(void) = 0;
  87.     virtual System::Longint __fastcall GetCurTime(void) = 0;
  88.     virtual void __fastcall GetDesignerOptions(TDesignerOptions &Options) = 0;
  89.     virtual Windows::TRect __fastcall GetMainWindowSize(void) = 0;
  90.     virtual System::Boolean __fastcall LockState(void) = 0;
  91.     virtual void __fastcall ModalEdit(System::Char EditKey, System::Pointer ReturnWindow) = 0;
  92.     virtual void __fastcall OpenForm(const System::AnsiString FormName, System::Boolean Show) = 0;
  93.     virtual void __fastcall RaiseException(const System::AnsiString Message) = 0;
  94.     virtual void __fastcall ResetCompClass(void) = 0;
  95.     virtual void __fastcall SelectionChanged(void) = 0;
  96.     virtual void __fastcall ShowClassHelp(const System::AnsiString ClassName) = 0;
  97.     virtual void __fastcall SelectItemName(const System::AnsiString PropertyName) = 0;
  98.     virtual void __fastcall ValidateActiveModule(void) = 0;
  99.     virtual void __fastcall AddExpert(Exptintf::TIExpert *Expert) = 0;
  100.     virtual void __fastcall RemoveExpert(Exptintf::TIExpert *Expert) = 0;
  101.     virtual Toolintf::TIToolServices *__fastcall GetToolServices(void) = 0;
  102.     virtual void __fastcall ExpertsLoaded(void) = 0;
  103.     virtual Fileintf::TIVirtualFileSystem *__fastcall GetFileSystem(const System::AnsiString Ident) = 0
  104.         ;
  105.     virtual System::AnsiString __fastcall MakeBackupFileName(const System::AnsiString FileName) = 0;
  106.     virtual System::Boolean __fastcall CreateBackupFile(void) = 0;
  107.     virtual System::Boolean __fastcall WinHelp(const System::AnsiString HelpFile, System::Integer Command
  108.         , System::Longint Data) = 0;
  109. public:
  110.     /* !! TInterface.Create */ __fastcall TIAppBuilder(void) : Virtintf::TInterface() { }
  111.     
  112. public:
  113.     /* !! TObject.Destroy */ __fastcall virtual ~TIAppBuilder(void) { }
  114.     
  115. };
  116.  
  117. class __declspec(pascalimplementation) TICompClass : public Virtintf::TInterface
  118. {
  119.     typedef TICompClass ThisClass;
  120.     typedef Virtintf::TInterface inherited;
  121.     
  122. public:
  123.     virtual Windows::TPoint __fastcall GetBitmapPos(System::Boolean Selected) = 0;
  124.     virtual System::AnsiString __fastcall GetClassName(void) = 0;
  125.     virtual System::AnsiString __fastcall GetDefaultPage(void) = 0;
  126.     virtual System::Integer __fastcall GetModuleIndex(void) = 0;
  127. public:
  128.     /* !! TInterface.Create */ __fastcall TICompClass(void) : Virtintf::TInterface() { }
  129.     
  130. public:
  131.     /* !! TObject.Destroy */ __fastcall virtual ~TICompClass(void) { }
  132.     
  133. };
  134.  
  135. enum TPropKind { pkProperties, pkEvents };
  136.  
  137. class __declspec(delphiclass) TIProperty;
  138. typedef void __fastcall (__closure *TGetPropProc)(TIProperty *Prop);
  139.  
  140. enum LibIntf_3 { fsVisible, fsIconic, fsZoomed };
  141.  
  142. typedef Set<LibIntf_3, fsVisible, fsZoomed>  TFormState;
  143.  
  144. enum TEditAction { eaUndo, eaCut, eaCopy, eaPaste, eaDelete, eaSelectAll, eaBringToFront, eaSendToBack, 
  145.     eaAlignToGrid };
  146.  
  147. enum LibIntf_4 { esCanUndo, esCanCut, esCanCopy, esCanPaste, esCanDelete, esCanZOrder, esCanAlignGrid, 
  148.     esCanEditOle, esCanTabOrder, esCanCreationOrder, esCanPrint };
  149.  
  150. typedef Set<LibIntf_4, esCanUndo, esCanPrint>  TEditState;
  151.  
  152. enum TShowState { ssNormal, ssMinimized, ssMaximized };
  153.  
  154. enum TAffect { afTop, afLeft, afBottom, afRight, afHCenter, afVCenter, afHSpace, afVSpace, afHWinCenter, 
  155.     afVWinCenter, afNothing };
  156.  
  157. enum TSizeAffect { asHGrow, asHShrink, asHAbsolute, asVGrow, asVShrink, asVAbsolute, asNothing };
  158.  
  159. class __declspec(delphiclass) TIFile;
  160. class __declspec(pascalimplementation) TIFile : public Virtintf::TInterface
  161. {
  162.     typedef TIFile ThisClass;
  163.     typedef Virtintf::TInterface inherited;
  164.     
  165. public:
  166.     virtual Virtintf::TIStream *__fastcall FormFileOpen(void) = 0;
  167.     virtual System::AnsiString __fastcall GetFileName(void) = 0;
  168.     virtual System::Longint __fastcall GetTimeAtLoad(void) = 0;
  169.     virtual System::Longint __fastcall GetModifyTime(void) = 0;
  170.     virtual System::Boolean __fastcall CheckFileDate(void) = 0;
  171.     virtual void __fastcall Rename(const System::AnsiString NewFileName) = 0;
  172.     virtual void __fastcall Save(void) = 0;
  173. public:
  174.     /* !! TInterface.Create */ __fastcall TIFile(void) : Virtintf::TInterface() { }
  175.     
  176. public:
  177.     /* !! TObject.Destroy */ __fastcall virtual ~TIFile(void) { }
  178.     
  179. };
  180.  
  181. class __declspec(delphiclass) TIForm;
  182. typedef void __fastcall (__closure *TGetFormProc)(TIForm *AForm);
  183.  
  184. enum TDesignerKind { dkForm, dkDataModule };
  185.  
  186. class __declspec(delphiclass) TICompInfo;
  187. class __declspec(delphiclass) TIModule;
  188. class __declspec(pascalimplementation) TIForm : public TIFile
  189. {
  190.     typedef TIForm ThisClass;
  191.     typedef TIFile inherited;
  192.     
  193. public:
  194.     virtual void __fastcall Align(TAffect Affect) = 0;
  195.     virtual void __fastcall CreateComponent(TICompClass *CompClass) = 0;
  196.     virtual System::AnsiString __fastcall FindCompClass(const System::AnsiString CompName) = 0;
  197.     virtual System::AnsiString __fastcall GetAncestorName(void) = 0;
  198.     virtual System::Integer __fastcall GetCompCount(void) = 0;
  199.     virtual void __fastcall GetDependentForms(TGetFormProc Proc) = 0;
  200.     virtual TDesignerKind __fastcall GetDesignerKind(void) = 0;
  201.     virtual void __fastcall GetFormDependencies(TGetFormProc Proc) = 0;
  202.     virtual System::Pointer __fastcall GetNVComp(System::Integer Index) = 0;
  203.     virtual TICompInfo *__fastcall GetCompInfo(System::Integer Index) = 0;
  204.     virtual TIModule *__fastcall GetModule(void) = 0;
  205.     virtual System::AnsiString __fastcall GetCompName(System::Integer Index) = 0;
  206.     virtual System::AnsiString __fastcall GetFileSystem(void) = 0;
  207.     virtual Editintf::TIFormInterface *__fastcall GetFormInterface(void) = 0;
  208.     virtual System::AnsiString __fastcall GetFormName(void) = 0;
  209.     virtual System::Integer __fastcall GetFormImage(void) = 0;
  210.     virtual void __fastcall GetFormUnits(Classes::TGetStrProc Proc) = 0;
  211.     virtual TFormState __fastcall GetState(void) = 0;
  212.     virtual System::Integer __fastcall GetTabCompCount(void) = 0;
  213.     virtual System::Boolean __fastcall GetTabCompInfo(System::Integer Order,  System::AnsiString &Name, 
  214.         System::Pointer &Comp) = 0;
  215.     virtual System::Integer __fastcall GetObjectMenuItemCount(void) = 0;
  216.     virtual System::AnsiString __fastcall GetObjectMenuItem(System::Integer Index) = 0;
  217.     virtual void __fastcall ObjectMenuAction(System::Integer Index) = 0;
  218.     virtual void __fastcall Hide(void) = 0;
  219.     virtual void __fastcall RenameFormMethod(const System::AnsiString CurName, const System::AnsiString 
  220.         NewName) = 0;
  221.     virtual void __fastcall RemoveDependentLinks(void) = 0;
  222.     virtual void __fastcall SaveInto(const System::AnsiString AName) = 0;
  223.     virtual void __fastcall Scale(System::Integer Factor) = 0;
  224.     virtual void __fastcall SetFileSystem(const System::AnsiString FileSystem) = 0;
  225.     virtual void __fastcall SetFormName(const System::AnsiString AName) = 0;
  226.     virtual void __fastcall SetSelection(const System::AnsiString Name) = 0;
  227.     virtual void __fastcall SetNVComp(System::Pointer Comp, System::Integer Order) = 0;
  228.     virtual void __fastcall SetTabCompOrder(System::Pointer Comp, System::Integer Order) = 0;
  229.     virtual void __fastcall Show(void) = 0;
  230.     virtual void __fastcall ShowAs(TShowState ShowState) = 0;
  231.     virtual void __fastcall Size(TSizeAffect Affect, System::Integer Value) = 0;
  232. public:
  233.     /* !! TInterface.Create */ __fastcall TIForm(void) : Libintf::TIFile() { }
  234.     
  235. public:
  236.     /* !! TObject.Destroy */ __fastcall virtual ~TIForm(void) { }
  237.     
  238. };
  239.  
  240. class __declspec(delphiclass) TILibrary;
  241. class __declspec(pascalimplementation) TILibrary : public Virtintf::TInterface
  242. {
  243.     typedef TILibrary ThisClass;
  244.     typedef Virtintf::TInterface inherited;
  245.     
  246. public:
  247.     virtual TIForm *__fastcall CreateForm(TIModule *AModule, const System::AnsiString AFileName, System::Boolean 
  248.         Existing, const System::AnsiString AFormName, const System::AnsiString AAncestor, const System::AnsiString 
  249.         AFileSystem) = 0;
  250.     virtual TIForm *__fastcall CreateFromStream(TIModule *AModule, const System::AnsiString AFileName, 
  251.         const System::AnsiString AFileSystem, Virtintf::TIStream *IStream) = 0;
  252.     virtual void __fastcall DesignerOptionsChanged(void) = 0;
  253.     virtual void __fastcall EditAction(TEditAction Action) = 0;
  254.     virtual TIFile *__fastcall FindFile(const System::AnsiString FileName) = 0;
  255.     virtual TIForm *__fastcall GetActiveForm(void) = 0;
  256.     virtual void __fastcall GetClassUnits(const System::AnsiString ClassName, Classes::TGetStrProc Proc
  257.         ) = 0;
  258.     virtual TICompClass *__fastcall GetCompClass(System::Integer Index) = 0;
  259.     virtual System::Integer __fastcall GetCompClassCount(void) = 0;
  260.     virtual void __fastcall GetCompHierarchy(Classes::TGetStrProc Proc) = 0;
  261.     virtual System::Integer __fastcall GetComponentBitmap(void) = 0;
  262.     virtual TEditState __fastcall GetEditState(void) = 0;
  263.     virtual System::Integer __fastcall GetModuleCount(void) = 0;
  264.     virtual System::AnsiString __fastcall GetModuleName(System::Integer Index) = 0;
  265.     virtual System::Boolean __fastcall GetOleCtrlHelp(const System::AnsiString Member, System::Integer 
  266.         &HelpCtx,  System::AnsiString &HelpFile) = 0;
  267.     virtual void __fastcall GetProperties(TPropKind PropKind, TGetPropProc Proc) = 0;
  268.     virtual System::AnsiString __fastcall GetSelectionName(void) = 0;
  269.     virtual System::AnsiString __fastcall GetSelectionType(void) = 0;
  270.     virtual void __fastcall HideWindows(void) = 0;
  271.     virtual void __fastcall IsDesignMsg(Windows::TMsg &Msg, System::Boolean &Handled) = 0;
  272.     virtual System::Boolean __fastcall IsTopmostForm(System::Integer Wnd) = 0;
  273.     virtual void __fastcall ModalEditDone(System::Pointer ReturnWindow) = 0;
  274.     virtual void __fastcall RaiseException(const System::AnsiString Message) = 0;
  275.     virtual void __fastcall ShowWindows(void) = 0;
  276.     virtual void __fastcall SetLockState(System::Boolean State) = 0;
  277.     virtual void __fastcall SetProjectName( System::AnsiString Name) = 0;
  278. public:
  279.     /* !! TInterface.Create */ __fastcall TILibrary(void) : Virtintf::TInterface() { }
  280.     
  281. public:
  282.     /* !! TObject.Destroy */ __fastcall virtual ~TILibrary(void) { }
  283.     
  284. };
  285.  
  286. class __declspec(pascalimplementation) TIModule : public Virtintf::TInterface
  287. {
  288.     typedef TIModule ThisClass;
  289.     typedef Virtintf::TInterface inherited;
  290.     
  291. public:
  292.     virtual void __fastcall Activate(System::Boolean IsForm) = 0;
  293.     virtual void __fastcall CreateMethod(const System::AnsiString Name, Typinfo::PTypeData TypeData) = 0
  294.         ;
  295.     virtual void __fastcall FormModified(void) = 0;
  296.     virtual System::AnsiString __fastcall GetAncestorClassName(const System::AnsiString ClassName) = 0;
  297.         
  298.     virtual void __fastcall GetMethods(Typinfo::PTypeData TypeData, Classes::TGetStrProc Proc) = 0;
  299.     virtual System::Boolean __fastcall FormIsTopmost(void) = 0;
  300.     virtual System::Boolean __fastcall MethodExists(const System::AnsiString Name) = 0;
  301.     virtual void __fastcall RenameComponent(TICompInfo *CompInfo, const System::AnsiString CurName, const System::AnsiString 
  302.         NewName) = 0;
  303.     virtual void __fastcall RenameForm(TICompInfo *CompInfo, const System::AnsiString NewName) = 0;
  304.     virtual void __fastcall RenameMethod(const System::AnsiString CurName, const System::AnsiString NewName
  305.         ) = 0;
  306.     virtual void __fastcall SaveInto(const System::AnsiString AName) = 0;
  307.     virtual void __fastcall ShowMethod(const System::AnsiString Name) = 0;
  308.     virtual void __fastcall GetImportedForms(Classes::TGetStrProc Proc) = 0;
  309.     virtual void __fastcall ImportForm(const System::AnsiString FormName) = 0;
  310.     virtual void __fastcall Notify(Editintf::TNotifyCode NotifyCode) = 0;
  311.     virtual void __fastcall SwapSourceFormView(void) = 0;
  312. public:
  313.     /* !! TInterface.Create */ __fastcall TIModule(void) : Virtintf::TInterface() { }
  314.     
  315. public:
  316.     /* !! TObject.Destroy */ __fastcall virtual ~TIModule(void) { }
  317.     
  318. };
  319.  
  320. class __declspec(pascalimplementation) TIProperty : public Virtintf::TInterface
  321. {
  322.     typedef TIProperty ThisClass;
  323.     typedef Virtintf::TInterface inherited;
  324.     
  325. public:
  326.     virtual void __fastcall Activate(void) = 0;
  327.     virtual System::Boolean __fastcall AllEqual(void) = 0;
  328.     virtual void __fastcall Edit(void) = 0;
  329.     virtual Dsgnintf::TPropertyAttributes __fastcall GetAttributes(void) = 0;
  330.     virtual System::AnsiString __fastcall GetCompClassName(void) = 0;
  331.     virtual System::Integer __fastcall GetEditLimit(void) = 0;
  332.     virtual System::Boolean __fastcall GetEditValue( System::AnsiString &Value) = 0;
  333.     virtual System::AnsiString __fastcall GetName(void) = 0;
  334.     virtual void __fastcall GetProperties(TGetPropProc Proc) = 0;
  335.     virtual Typinfo::PTypeInfo __fastcall GetPropType(void) = 0;
  336.     virtual System::AnsiString __fastcall GetValue(void) = 0;
  337.     virtual void __fastcall GetValues(Classes::TGetStrProc Proc) = 0;
  338.     virtual void __fastcall Revert(void) = 0;
  339.     virtual void __fastcall SetValue(const System::AnsiString Value) = 0;
  340. public:
  341.     /* !! TInterface.Create */ __fastcall TIProperty(void) : Virtintf::TInterface() { }
  342.     
  343. public:
  344.     /* !! TObject.Destroy */ __fastcall virtual ~TIProperty(void) { }
  345.     
  346. };
  347.  
  348. class __declspec(pascalimplementation) TICompInfo : public Virtintf::TInterface
  349. {
  350.     typedef TICompInfo ThisClass;
  351.     typedef Virtintf::TInterface inherited;
  352.     
  353. public:
  354.     virtual void __fastcall ClearEvent(System::Integer Index) = 0;
  355.     virtual System::AnsiString __fastcall GetClassName(void) = 0;
  356.     virtual System::Integer __fastcall GetEventCount(void) = 0;
  357.     virtual Typinfo::PPropInfo __fastcall GetEventInfo(System::Integer Index) = 0;
  358.     virtual System::AnsiString __fastcall GetEventValue(System::Integer Index) = 0;
  359.     virtual System::Pointer __fastcall GetComponentHandle(void) = 0;
  360. public:
  361.     /* !! TInterface.Create */ __fastcall TICompInfo(void) : Virtintf::TInterface() { }
  362.     
  363. public:
  364.     /* !! TObject.Destroy */ __fastcall virtual ~TICompInfo(void) { }
  365.     
  366. };
  367.  
  368. typedef TILibrary *__fastcall (*TInitLibraryFunc)(TIAppBuilder *App);
  369.  
  370. //-- var, const, procedure ---------------------------------------------------
  371. #define LibrarySignature "COMPLIB0054"
  372. //-- template instantiations -------------------------------------------------
  373. template class TEditState ;
  374. template class TFormState ;
  375.  
  376. }    /* namespace Libintf */
  377. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  378. using namespace Libintf;
  379. #endif
  380. //-- end unit ----------------------------------------------------------------
  381. #endif    // LibIntf
  382.