home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 May / VPR9705A.ISO / VPR_DATA / PROGRAM / CBTRIAL / SETUP / DATA.Z / EDITINTF.HPP < prev    next >
C/C++ Source or Header  |  1997-02-14  |  11KB  |  278 lines
  1. //----------------------------------------------------------------------------
  2. // EditIntf.hpp - bcbdcc32 generated hdr (DO NOT EDIT) rev: 0
  3. // From: EditIntf.pas
  4. //----------------------------------------------------------------------------
  5. #ifndef EditIntfHPP
  6. #define EditIntfHPP
  7. //----------------------------------------------------------------------------
  8. #include <VirtIntf.hpp>
  9. #include <Windows.hpp>
  10. #include <SysUtils.hpp>
  11. #include <System.hpp>
  12. #pragma warn -par
  13. #pragma warn -hid 
  14. #pragma warn -inl
  15.  
  16. namespace Editintf
  17. {
  18. //-- type declarations -------------------------------------------------------
  19. struct TEditPos
  20. {
  21.     short Col;
  22.     long Line;
  23. } ;
  24.  
  25. class __declspec(delphiclass) TIEditReader;
  26. class __declspec(pascalimplementation) TIEditReader : public Virtintf::TInterface
  27. {
  28.     typedef Virtintf::TInterface inherited;
  29.     
  30. public:
  31.     virtual long __stdcall GetText(long Position, char * Buffer, long Count) = 0;
  32. public:
  33.     /* TInterface.Create */ __fastcall TIEditReader(void) : Virtintf::TInterface() { }
  34.     
  35. public:
  36.     /* TObject.Destroy */ __fastcall virtual ~TIEditReader(void) { }
  37.     
  38. };
  39.  
  40. class __declspec(delphiclass) TIEditWriter;
  41. class __declspec(pascalimplementation) TIEditWriter : public Virtintf::TInterface
  42. {
  43.     typedef Virtintf::TInterface inherited;
  44.     
  45. public:
  46.     virtual bool __stdcall CopyTo(long Pos) = 0;
  47.     virtual bool __stdcall DeleteTo(long Pos) = 0;
  48.     virtual bool __stdcall Insert(char * Text) = 0;
  49.     virtual long __stdcall Position(void) = 0;
  50. public:
  51.     /* TInterface.Create */ __fastcall TIEditWriter(void) : Virtintf::TInterface() { }
  52.     
  53. public:
  54.     /* TObject.Destroy */ __fastcall virtual ~TIEditWriter(void) { }
  55.     
  56. };
  57.  
  58. class __declspec(delphiclass) TIEditView;
  59. class __declspec(pascalimplementation) TIEditView : public Virtintf::TInterface
  60. {
  61.     typedef Virtintf::TInterface inherited;
  62.     
  63. public:
  64.     virtual TEditPos __stdcall GetPos(int Index) = 0;
  65.     virtual void __stdcall SetPos(int Index, const TEditPos &Value) = 0;
  66.     virtual SIZE __stdcall GetViewSize(void) = 0;
  67.     __property TEditPos CursorPos = {read=GetPos, write=SetPos, index=0};
  68.     __property TEditPos TopPos = {read=GetPos, write=SetPos, index=1};
  69.     __property SIZE ViewSize = {read=GetViewSize};
  70. public:
  71.     /* TInterface.Create */ __fastcall TIEditView(void) : Virtintf::TInterface() { }
  72.     
  73. public:
  74.     /* TObject.Destroy */ __fastcall virtual ~TIEditView(void) { }
  75.     
  76. };
  77.  
  78. enum TSyntaxHighlighter { shNone, shC, shPascal, shSQL, shQuery };
  79.  
  80. class __declspec(delphiclass) TIEditorInterface;
  81. class __declspec(pascalimplementation) TIEditorInterface : public Virtintf::TInterface
  82. {
  83.     typedef Virtintf::TInterface inherited;
  84.     
  85. public:
  86.     virtual TIEditReader* __stdcall CreateReader(void) = 0;
  87.     virtual TIEditWriter* __stdcall CreateWriter(void) = 0;
  88.     virtual System::AnsiString __stdcall FileName(void) = 0;
  89.     virtual long __stdcall LinesInBuffer(void) = 0;
  90.     virtual bool __stdcall BufferModified(void) = 0;
  91.     virtual bool __stdcall MarkModified(void) = 0;
  92.     virtual TSyntaxHighlighter __stdcall SetSyntaxHighlighter(TSyntaxHighlighter SyntaxHighlighter) = 0
  93.         ;
  94.     virtual int __stdcall GetViewCount(void) = 0;
  95.     virtual TIEditView* __stdcall GetView(int Index) = 0;
  96. public:
  97.     /* TInterface.Create */ __fastcall TIEditorInterface(void) : Virtintf::TInterface() { }
  98.     
  99. public:
  100.     /* TObject.Destroy */ __fastcall virtual ~TIEditorInterface(void) { }
  101.     
  102. };
  103.  
  104. enum TPropertyType { ptUnknown, ptInteger, ptChar, ptEnumeration, ptFloat, ptString, ptSet, ptClass, 
  105.     ptMethod, ptWChar, ptLString, ptLWString, ptVariant };
  106.  
  107. class __declspec(delphiclass) TIComponentInterface;
  108. typedef bool __stdcall (*TGetChildCallback)(void * Param, TIComponentInterface* ComponentInterface);
  109.     
  110. class __declspec(pascalimplementation) TIComponentInterface : public Virtintf::TInterface
  111. {
  112.     typedef Virtintf::TInterface inherited;
  113.     
  114. public:
  115.     virtual System::AnsiString __stdcall GetComponentType(void) = 0;
  116.     virtual void * __stdcall GetComponentHandle(void) = 0;
  117.     virtual TIComponentInterface* __stdcall GetParent(void) = 0;
  118.     virtual bool __stdcall IsTControl(void) = 0;
  119.     virtual int __stdcall GetPropCount(void) = 0;
  120.     virtual System::AnsiString __stdcall GetPropName(int Index) = 0;
  121.     virtual TPropertyType __stdcall GetPropType(int Index) = 0;
  122.     virtual TPropertyType __stdcall GetPropTypeByName(const System::AnsiString Name) = 0;
  123.     virtual bool __stdcall GetPropValue(int Index, void *Value) = 0;
  124.     virtual bool __stdcall GetPropValueByName(const System::AnsiString Name, void *Value) = 0;
  125.     virtual bool __stdcall SetProp(int Index, const void *Value) = 0;
  126.     virtual bool __stdcall SetPropByName(const System::AnsiString Name, const void *Value) = 0;
  127.     virtual bool __stdcall GetChildren(void * Param, TGetChildCallback Proc) = 0;
  128.     virtual int __stdcall GetControlCount(void) = 0;
  129.     virtual TIComponentInterface* __stdcall GetControl(int Index) = 0;
  130.     virtual int __stdcall GetComponentCount(void) = 0;
  131.     virtual TIComponentInterface* __stdcall GetComponent(int Index) = 0;
  132.     virtual bool __stdcall Select(void) = 0;
  133.     virtual bool __stdcall Focus(void) = 0;
  134.     virtual bool __stdcall Delete(void) = 0;
  135. public:
  136.     /* TInterface.Create */ __fastcall TIComponentInterface(void) : Virtintf::TInterface() { }
  137.     
  138. public:
  139.     /* TObject.Destroy */ __fastcall virtual ~TIComponentInterface(void) { }
  140.     
  141. };
  142.  
  143. class __declspec(delphiclass) TIFormInterface;
  144. class __declspec(pascalimplementation) TIFormInterface : public Virtintf::TInterface
  145. {
  146.     typedef Virtintf::TInterface inherited;
  147.     
  148. public:
  149.     virtual System::AnsiString __stdcall FileName(void) = 0;
  150.     virtual bool __stdcall FormModified(void) = 0;
  151.     virtual bool __stdcall MarkModified(void) = 0;
  152.     virtual TIComponentInterface* __stdcall GetFormComponent(void) = 0;
  153.     virtual TIComponentInterface* __stdcall FindComponent(const System::AnsiString Name) = 0;
  154.     virtual TIComponentInterface* __stdcall GetComponentFromHandle(void * ComponentHandle) = 0;
  155.     virtual int __stdcall GetSelCount(void) = 0;
  156.     virtual TIComponentInterface* __stdcall GetSelComponent(int Index) = 0;
  157.     virtual TIComponentInterface* __stdcall GetCreateParent(void) = 0;
  158.     virtual TIComponentInterface* __stdcall CreateComponent(TIComponentInterface* Container, const System::AnsiString 
  159.         TypeName, int X, int Y, int W, int H) = 0;
  160. public:
  161.     /* TInterface.Create */ __fastcall TIFormInterface(void) : Virtintf::TInterface() { }
  162.     
  163. public:
  164.     /* TObject.Destroy */ __fastcall virtual ~TIFormInterface(void) { }
  165.     
  166. };
  167.  
  168. enum TResHeaderValue { hvFlags, hvLanguage, hvDataVersion, hvVersion, hvCharacteristics };
  169.  
  170. class __declspec(delphiclass) TIResourceEntry;
  171. class __declspec(pascalimplementation) TIResourceEntry : public Virtintf::TInterface
  172. {
  173.     typedef Virtintf::TInterface inherited;
  174.     
  175. public:
  176.     virtual char * __stdcall GetResourceType(void) = 0;
  177.     virtual char * __stdcall GetResourceName(void) = 0;
  178.     virtual bool __stdcall Change(char * NewType, char * NewName) = 0;
  179.     virtual bool __stdcall GetHeaderValue(TResHeaderValue HeaderValue, int &Value) = 0;
  180.     virtual bool __stdcall SetHeaderValue(TResHeaderValue HeaderValue, int Value) = 0;
  181.     virtual void * __stdcall GetData(void) = 0;
  182.     virtual int __stdcall GetDataSize(void) = 0;
  183.     virtual bool __stdcall SetDataSize(int NewSize) = 0;
  184.     virtual void * __stdcall GetEntryHandle(void) = 0;
  185. public:
  186.     /* TInterface.Create */ __fastcall TIResourceEntry(void) : Virtintf::TInterface() { }
  187.     
  188. public:
  189.     /* TObject.Destroy */ __fastcall virtual ~TIResourceEntry(void) { }
  190.     
  191. };
  192.  
  193. class __declspec(delphiclass) TIResourceFile;
  194. class __declspec(pascalimplementation) TIResourceFile : public Virtintf::TInterface
  195. {
  196.     typedef Virtintf::TInterface inherited;
  197.     
  198. public:
  199.     virtual System::AnsiString __stdcall FileName(void) = 0;
  200.     virtual int __stdcall GetEntryCount(void) = 0;
  201.     virtual TIResourceEntry* __stdcall GetEntry(int Index) = 0;
  202.     virtual TIResourceEntry* __stdcall GetEntryFromHandle(void * EntryHandle) = 0;
  203.     virtual TIResourceEntry* __stdcall FindEntry(char * ResType, char * Name) = 0;
  204.     virtual bool __stdcall DeleteEntry(void * EntryHandle) = 0;
  205.     virtual TIResourceEntry* __stdcall CreateEntry(char * ResType, char * Name, Word Flags, Word LanguageId
  206.         , int DataVersion, int Version, int Characteristics) = 0;
  207. public:
  208.     /* TInterface.Create */ __fastcall TIResourceFile(void) : Virtintf::TInterface() { }
  209.     
  210. public:
  211.     /* TObject.Destroy */ __fastcall virtual ~TIResourceFile(void) { }
  212.     
  213. };
  214.  
  215. enum TNotifyCode { ncModuleDeleted, ncModuleRenamed, ncEditorModified, ncFormModified, ncEditorSelected, 
  216.     ncFormSelected, ncBeforeSave, ncAfterSave, ncFormSaving, ncProjResModified };
  217.  
  218. class __declspec(delphiclass) TIModuleNotifier;
  219. class __declspec(pascalimplementation) TIModuleNotifier : public Virtintf::TInterface
  220. {
  221.     typedef Virtintf::TInterface inherited;
  222.     
  223. public:
  224.     virtual void __stdcall Notify(TNotifyCode NotifyCode) = 0;
  225.     virtual void __stdcall ComponentRenamed(void * ComponentHandle, const System::AnsiString OldName, const System::AnsiString 
  226.         NewName) = 0;
  227. public:
  228.     /* TInterface.Create */ __fastcall TIModuleNotifier(void) : Virtintf::TInterface() { }
  229.     
  230. public:
  231.     /* TObject.Destroy */ __fastcall virtual ~TIModuleNotifier(void) { }
  232.     
  233. };
  234.  
  235. class __declspec(delphiclass) TIModuleInterface;
  236. class __declspec(pascalimplementation) TIModuleInterface : public Virtintf::TInterface
  237. {
  238.     typedef Virtintf::TInterface inherited;
  239.     
  240. public:
  241.     virtual TIEditorInterface* __stdcall GetEditorInterface(void) = 0;
  242.     virtual TIFormInterface* __stdcall GetFormInterface(void) = 0;
  243.     virtual TIModuleInterface* __stdcall GetAncestorModule(void) = 0;
  244.     virtual TIResourceFile* __stdcall GetProjectResource(void) = 0;
  245.     virtual bool __stdcall IsProjectModule(void) = 0;
  246.     virtual bool __stdcall Close(void) = 0;
  247.     virtual bool __stdcall Save(bool ForceSave) = 0;
  248.     virtual bool __stdcall Rename(const System::AnsiString NewName) = 0;
  249.     virtual bool __stdcall GetFileSystem( System::AnsiString &FileSystem) = 0;
  250.     virtual bool __stdcall SetFileSystem(const System::AnsiString FileSystem) = 0;
  251.     virtual bool __stdcall ShowSource(void) = 0;
  252.     virtual bool __stdcall ShowForm(void) = 0;
  253.     virtual bool __stdcall AddNotifier(TIModuleNotifier* AModuleNotifier) = 0;
  254.     virtual bool __stdcall RemoveNotifier(TIModuleNotifier* AModuleNotifier) = 0;
  255. public:
  256.     /* TInterface.Create */ __fastcall TIModuleInterface(void) : Virtintf::TInterface() { }
  257.     
  258. public:
  259.     /* TObject.Destroy */ __fastcall virtual ~TIModuleInterface(void) { }
  260.     
  261. };
  262.  
  263. //-- var, const, procedure ---------------------------------------------------
  264. #define CursorPos (int)(0)
  265. #define ViewTopPos (int)(1)
  266.  
  267. }    /* namespace Editintf */
  268.  
  269. #pragma warn .par
  270. #pragma warn .hid 
  271. #pragma warn .inl
  272.  
  273. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  274. using namespace Editintf;
  275. #endif
  276. //-- end unit ----------------------------------------------------------------
  277. #endif    // EditIntf
  278.