home *** CD-ROM | disk | FTP | other *** search
/ PC World 2002 May / PCWorld_2002-05_cd.bin / Software / Komercni / ability / 2000 / DATA.Z / abdata.bi < prev    next >
Encoding:
Text File  |  2001-01-19  |  16.9 KB  |  500 lines
  1. <begin>
  2.  
  3. class DoCmd /// Commands using database objects ///
  4. {
  5. [methods:
  6.     [id(0x000003eb), helpstring("method Beep")]
  7.     HRESULT Beep();
  8.     [id(0x000003f0), helpstring("method Echo")]
  9.     HRESULT Echo(VARIANT EchoOn, VARIANT StatusBarText);
  10.     [id(0x000003f7), helpstring("method Maximize")]
  11.     HRESULT Maximize();
  12.     [id(0x000003f8), helpstring("method Minimize")]
  13.     HRESULT Minimize();
  14.     [id(0x000003f9), helpstring("method MoveSize")]
  15.     HRESULT MoveSize(VARIANT Right, VARIANT Down, VARIANT Width, VARIANT Height);
  16.     [id(0x000003fb), helpstring("method OpenForm")]
  17.     HRESULT OpenForm(VARIANT FormName);
  18.     [id(0x000003fc), helpstring("method OpenQuery")]
  19.     HRESULT OpenQuery(VARIANT QueryName);
  20.     [id(0x000003fd), helpstring("method OpenTable")]
  21.     HRESULT OpenTable(VARIANT Name);
  22.     [id(0x00000600), helpstring("method OpenRelation")]
  23.     HRESULT OpenRelation(VARIANT RelationName);
  24.  
  25.     [id(0x000003ff), helpstring("method Quit")]
  26.     HRESULT Quit(AbdQuitOption Options);
  27.     [id(0x0000040f), helpstring("method OpenReport")]
  28.     HRESULT OpenReport(VARIANT ReportName);
  29.     [id(0x00000642), helpstring("method RunCommand")]
  30.     HRESULT RunCommand(AbdCommand Command);
  31.  
  32.     [id(0x00000403), helpstring("method Restore")]
  33.     HRESULT Restore();
  34. ]
  35. };
  36.  
  37.  
  38. class Application //////
  39. {
  40. [properties:
  41.     [id(0x000007d5), propget, helpstring("property Application")]
  42.     HRESULT Application([retval] Application **ppRet);
  43.     [id(0x00000827), propget, helpstring("property Parent")]
  44.     HRESULT Parent([retval] IDispatch **ppRet);
  45.     [id(0x000007db), propget, helpstring("property CurrentObjectType")]
  46.     HRESULT CurrentObjectType([retval] AbdObjectType *pRet);
  47.     [id(0x000007dc), propget, helpstring("property CurrentObjectName")]
  48.     HRESULT CurrentObjectName([retval] BSTR *pRet);
  49.     [id(0x000007d2), propget, helpstring("property Forms")]
  50.     HRESULT Forms([retval] IForms **ppRet);
  51.     [id(0x000007d3), propget, helpstring("property Queries")]
  52.     HRESULT Queries([retval] IQueries **ppRet);
  53.     [id(0x000007d4), propget, helpstring("property Relations")]
  54.     HRESULT Relations([retval] IRelations **ppRet);
  55.     [id(0x000007d6), propget, helpstring("property Reports")]
  56.     HRESULT Reports([retval] IReports **ppRet);
  57.     [id(0x000007d7), propget, helpstring("property Tables")]
  58.     HRESULT Tables([retval] ITables **ppRet);
  59.     [id(0x000007e9), propget, helpstring("property DoCmd")]
  60.     HRESULT DoCmd([retval] IDoCmd **pRet);
  61.     [id(0x00000864), propget, helpstring("property Visible")]
  62.     HRESULT Visible([retval] VARIANT_BOOL *pfVisible);
  63.     [id(0x00000864), propput, helpstring("property Visible")]
  64.     HRESULT Visible(VARIANT_BOOL fVisible);
  65.     [id(0x00000865), propget, helpstring("property UserControl")]
  66.     HRESULT UserControl([retval] VARIANT_BOOL *pfUserCtrl);
  67.     [id(0x00000865), propput, helpstring("property UserControl")]
  68.     HRESULT UserControl(VARIANT_BOOL fUserCtrl);
  69.     [id(0x0000083e), propget, helpstring("property DBEngine")]
  70.     HRESULT DBEngine([retval] DBEngine **ppRet );
  71.     [propget, id(1), helpstring("property Databases")] 
  72.     HRESULT Databases([retval] IDatabases* *pVal);
  73.     [propget, id(2), helpstring("property ActiveDatabase")] 
  74.     HRESULT ActiveDatabase([retval] IDatabase* *pVal);
  75.     [propget, id(3), helpstring("property ActiveDataObject")] 
  76.     HRESULT ActiveDataObject([retval] IDispatch* *pVal);
  77.     [propget, id(4), helpstring("property ActiveRecord")] 
  78.     HRESULT ActiveRecord([retval] Fields* *pVal);
  79. ]
  80. [methods:
  81.     [id(0x0000085e), helpstring("method NewCurrentDatabase")]
  82.     HRESULT NewCurrentDatabase(BSTR filepath);
  83.     [id(0x0000085c), helpstring("method OpenCurrentDatabase")]
  84.     HRESULT OpenCurrentDatabase(BSTR filepath, VARIANT_BOOL Exclusive);
  85.     [id(0x000007df), helpstring("method Echo")]
  86.     HRESULT Echo(short EchoOn, BSTR bstrStatusBarText);
  87.     [id(0x0000085d), helpstring("method CloseCurrentDatabase")]
  88.     HRESULT CloseCurrentDatabase();
  89.     [id(0x000007e0), helpstring("method Quit")]
  90.     HRESULT Quit(AbdQuitOption Option);
  91.     [id(0x00000801), helpstring("method CurrentDb")]
  92.     HRESULT CurrentDb([retval] Database **ppRet);
  93.     [id(0x0000086e), helpstring("method RefreshTitleBar")]
  94.     HRESULT RefreshTitleBar();
  95.     [id(0x0000088a), helpstring("method RefreshDatabaseWindow")]
  96.     HRESULT RefreshDatabaseWindow();
  97. ]
  98. };
  99.  
  100.  
  101. class Forms //////
  102. {
  103. [properties:
  104.     [id(2005), propget, helpstring("property Application")]
  105.     HRESULT Application( retval Application **ppRet);
  106.     [id(2087), propget, helpstring("property Parent")]
  107.     HRESULT Parent( retval IDispatch **ppRet);
  108.     [id(00000000), propget, helpstring("property Item")]
  109.     HRESULT Item( VARIANT Index,  retval Form **ppRet);
  110.     [id(2001), propget, helpstring("property Count")]
  111.     HRESULT Count( retval long *pRet);
  112. ]
  113. [methods:
  114.     [id(1), helpstring("method Open")] 
  115.     HRESULT Open(VARIANT Index, [retval]Form** ppRet);
  116. ]
  117. };
  118.  
  119. class Tables //////
  120. {
  121. [properties:
  122.     [id(2005), propget, helpstring("property Application")]
  123.     HRESULT Application( retval Application **ppRet);
  124.     [id(2087), propget, helpstring("property Parent")]
  125.     HRESULT Parent( retval IDispatch **ppRet);
  126.     [id(00000000), propget, helpstring("property Item")]
  127.     HRESULT Item( VARIANT Index,  retval ABTable **ppRet);
  128.     [id(2001), propget, helpstring("property Count")]
  129.     HRESULT Count( retval long *pRet);
  130. ]
  131. [methods:
  132.     [id(1), helpstring("method Open")] 
  133.     HRESULT Open(VARIANT Index, [retval]ABTable** ppRet);
  134. ]
  135. };
  136.  
  137. class Queries //////
  138. {
  139. [properties:
  140.     [id(2005), propget, helpstring("property Application")]
  141.     HRESULT Application( retval Application **ppRet);
  142.     [id(2087), propget, helpstring("property Parent")]
  143.     HRESULT Parent( retval IDispatch **ppRet);
  144.     [id(00000000), propget, helpstring("property Item")]
  145.     HRESULT Item( VARIANT Index,  retval ABQuery **ppRet);
  146.     [id(2001), propget, helpstring("property Count")]
  147.     HRESULT Count( retval long *pRet);
  148. ]
  149. [methods:
  150.     [id(1), helpstring("method Open")] 
  151.     HRESULT Open(VARIANT Index, [retval]ABQuery** ppRet);
  152. ]
  153. };
  154.  
  155. class Relations //////
  156. {
  157. [properties:
  158.     [id(2005), propget, helpstring("property Application")]
  159.     HRESULT Application( retval Application **ppRet);
  160.     [id(2087), propget, helpstring("property Parent")]
  161.     HRESULT Parent( retval IDispatch **ppRet);
  162.     [id(00000000), propget, helpstring("property Item")]
  163.     HRESULT Item( VARIANT Index,  retval ABRelation **ppRet);
  164.     [id(2001), propget, helpstring("property Count")]
  165.     HRESULT Count( retval long *pRet);
  166. ]
  167. [methods:
  168.     [id(1), helpstring("method Open")] 
  169.     HRESULT Open(VARIANT Index, [retval]ABRelation** ppRet);
  170. ]
  171. };
  172.  
  173.  
  174. class Properties //////
  175. {
  176. [properties:
  177.     [id(2005), propget, helpstring("property Application")]
  178.     HRESULT Application( retval Application **ppRet);
  179.     [id(2087), propget, helpstring("property Parent")]
  180.     HRESULT Parent( retval IDispatch **ppRet);
  181.     [id(00000000), propget, helpstring("property Item")]
  182.     HRESULT Item( VARIANT Index,  retval IDispatch **ppRet);
  183.     [id(2001), propget, helpstring("property Count")]
  184.     HRESULT Count( retval long *pRet);
  185. ]
  186. };
  187.  
  188. class Form //////
  189. {
  190. [properties:
  191.     [id(39), propget, helpstring("property FormName")]
  192.     HRESULT FormName( retval BSTR *pRet);
  193.     [id(39), propput, helpstring("property FormName")]
  194.     HRESULT FormName( BSTR Val);
  195.  
  196.     [id(0x00000829), propget, helpstring("property Form")]
  197.     HRESULT Form([retval] Form **ppRet);
  198.     [id(0x0000082b), propget, helpstring("property Properties")]
  199.     HRESULT Properties([retval] IProperties **ppRet);
  200.  
  201.     [id(00000000), propget, helpstring("property Controls")]
  202.     HRESULT Controls( retval IControls **ppRet);
  203.     [propget, id(3), helpstring("property Database")] 
  204.     HRESULT Database([retval] IDatabase* *pVal);
  205.     [propget, id(4), helpstring("property Type")] 
  206.     HRESULT Type([retval] long *pVal);
  207. ]
  208. [methods:
  209.     [id(1), helpstring("method Close")]
  210.     HRESULT Close();
  211.     [id(2), helpstring("method Activate")]
  212.     HRESULT Activate();
  213. ]
  214. };
  215.  
  216.  
  217. class Report //////
  218. {
  219. [properties:
  220.  
  221.     [id(0x00000027), propget, helpstring("property ReportName")]
  222.     HRESULT ReportName([retval] BSTR *pRet);
  223.     [id(0x00000014), propget, helpstring("property Name")]
  224.     HRESULT Name([retval] BSTR *pRet);
  225.     [id(0x0000082b), propget, helpstring("property Properties")]
  226.     HRESULT Properties([retval] IProperties **ppRet);
  227.     [id(00000000), propget, helpstring("property Controls")]
  228.     HRESULT Controls([retval] IControls **ppRet);
  229.  
  230.     [propget, id(3), helpstring("property Database")] 
  231.     HRESULT Database([retval] IDatabase* *pVal);
  232.     [propget, id(4), helpstring("property Type")] 
  233.     HRESULT Type([retval] long *pVal);
  234.     [id(2097), propget, helpstring("property Report")]
  235.     HRESULT Report( retval Report **ppRet);
  236. ]
  237. [methods:
  238.     [id(2153), helpstring("method Print")]
  239.     HRESULT Print( BSTR Expr);
  240.     [id(1), helpstring("method Close")]
  241.     HRESULT Close();
  242.     [id(2), helpstring("method Activate")]
  243.     HRESULT Activate();
  244. ]
  245. };
  246.  
  247. class Reports //////
  248. {
  249. [properties:
  250.     [id(2005), propget, helpstring("property Application")]
  251.     HRESULT Application( retval Application **ppRet);
  252.     [id(2087), propget, helpstring("property Parent")]
  253.     HRESULT Parent( retval IDispatch **ppRet);
  254.     [id(00000000), propget, helpstring("property Item")]
  255.     HRESULT Item( VARIANT Index,  retval Report **ppRet);
  256.     [id(2001), propget, helpstring("property Count")]
  257.     HRESULT Count( retval long *pRet);
  258. ]
  259. [methods:
  260.     [id(1), helpstring("method Open")] 
  261.     HRESULT Open(VARIANT Index, [retval]Report** ppRet);
  262. ]
  263. };
  264.  
  265.  
  266. class AbDataProperty //////
  267. {
  268. [properties:
  269.     [id(2005), propget, helpstring("property Application")]
  270.     HRESULT Application( [retval] Application **ppRet);
  271.     [id(2087), propget, helpstring("property Parent")]
  272.     HRESULT Parent( [retval] IDispatch **ppRet);
  273. ]
  274. };
  275.  
  276. class Database //////
  277. {
  278. [properties:
  279.     [propget, id(2), helpstring("property Tables")] 
  280.     HRESULT Tables([retval] ITables* *pVal);
  281.     [propget, id(3), helpstring("property Querys")] 
  282.     HRESULT Queries([retval] IQueries* *pVal);
  283.     [propget, id(4), helpstring("property Relations")] 
  284.     HRESULT Relations([retval] IRelations* *pVal);
  285.     [propget, id(5), helpstring("property Forms")] 
  286.     HRESULT Forms([retval] IForms* *pVal);
  287.     [propget, id(6), helpstring("property Reports")] 
  288.     HRESULT Reports([retval] IReports* *pVal);
  289.     [propget, id(9), helpstring("property Name")]
  290.     HRESULT Name([retval] BSTR *pVal);
  291.     [propget, id(10), helpstring("property Admin")]
  292.     HRESULT Admin([retval] Database* *pVal);
  293. ]
  294. [methods:
  295.     [id(8), helpstring("method Close")] 
  296.     HRESULT Close();
  297. ]
  298. };
  299.  
  300. class Databases //////
  301. {
  302. [properties:
  303.     [propget, id(8), helpstring("property Application")]
  304.     HRESULT Application([retval] IDispatch* *pVal);
  305.     [propget, id(0), helpstring("property Item")]
  306.     HRESULT Item(VARIANT Index, [retval] IDatabase* *pVal);
  307.     [propget, id(10), helpstring("property Count")] 
  308.     HRESULT Count([retval] long *pVal);
  309. ]
  310. [methods:
  311.     [id(5), helpstring("method Open")]
  312.     HRESULT Open(BSTR fileName, VARIANT_BOOL exclusive);
  313.     [id(6), helpstring("method Add")]
  314.     HRESULT Add(BSTR filepath);
  315. ]
  316. };
  317.  
  318.     
  319. class BField //////
  320. {
  321. [properties:
  322.     [id(0x00000014), propget, helpstring("property Name")]
  323.     HRESULT Name([retval] BSTR *pRet);
  324.     [id(0x00000014), propput, helpstring("property Name")]
  325.     HRESULT Name(BSTR pRet);
  326.  
  327.     [id(0x0000001c), propget, helpstring("property BackColor")]
  328.     HRESULT BackColor([retval] long *pRet);
  329.     [id(0x000000cb), propget, helpstring("property ForeColor")]
  330.     HRESULT ForeColor([retval] long *pRet);
  331.     [id(0x000000cb), propput, helpstring("property ForeColor")]
  332.     HRESULT ForeColor(long pRet);
  333.  
  334.     [id(0x00000022), propget, helpstring("property FontName")]
  335.     HRESULT FontName([retval] BSTR *pRet);
  336.     [id(0x00000022), propput, helpstring("property FontName")]
  337.     HRESULT FontName(BSTR pRet);
  338.     [id(0x00000023), propget, helpstring("property FontSize")]
  339.     HRESULT FontSize([retval] short *pRet);
  340.     [id(0x00000023), propput, helpstring("property FontSize")]
  341.     HRESULT FontSize(short pRet);
  342.     [id(0x00000025), propget, helpstring("property FontWeight")]
  343.     HRESULT FontWeight([retval] short *pRet);
  344.     [id(0x00000025), propput, helpstring("property FontWeight")]
  345.     HRESULT FontWeight(short pRet);
  346.     [id(0x00000021), propget, helpstring("property FontItalic")]
  347.     HRESULT FontItalic([retval] VARIANT_BOOL *pRet);
  348.     [id(0x00000021), propput, helpstring("property FontItalic")]
  349.     HRESULT FontItalic(VARIANT_BOOL pRet);
  350.     [id(0x00000020), propget, helpstring("property FontBold")]
  351.     HRESULT FontBold([retval] short *pRet);
  352.     [id(0x00000020), propput, helpstring("property FontBold")]
  353.     HRESULT FontBold(short pRet);
  354. ]
  355. };
  356.  
  357.  
  358. class Table //////
  359. {
  360. [properties:
  361.  
  362.     [propget, id(0x0000000D), helpstring("property Database")] 
  363.     HRESULT Database([retval] IDatabase* *pVal);
  364.     [propget, id(0x0000000E), helpstring("property Type")] 
  365.     HRESULT Type([retval] long *pVal);
  366.     [id(1), helpstring("property Fields")]
  367.     HRESULT Fields( retval Fields ** ppRet);
  368.     [id(2), propget, helpstring("property Name")]
  369.     HRESULT Name( retval BSTR * pVal);
  370.     [id(7), propget, helpstring("property CurrentRecord")]
  371.     HRESULT CurrentRecord( retval long * pRet);
  372.     [id(7), propput, helpstring("property CurrentRecord")]
  373.     HRESULT CurrentRecord( long pRet);
  374.     [propget, id(0x00000010), helpstring("property RecordCount")]
  375.     HRESULT RecordCount(retval long *pVal);
  376.     [propget, id(0x00000011), helpstring("property BOF")]
  377.     HRESULT BOF(retval VARIANT_BOOL *pVal);
  378.     [propget, id(0x00000012), helpstring("property EOF")]
  379.     HRESULT EOF(retval VARIANT_BOOL *pVal);
  380. ]
  381. [methods:
  382.     [id(0x00000008), helpstring("method EditRecord")]
  383.     HRESULT EditRecord();
  384.     [id(0x00000009), helpstring("method AddNewRecord")]
  385.     HRESULT AddNewRecord();
  386.     [id(0x0000000A), helpstring("method UpdateRecord")]
  387.     HRESULT UpdateRecord();
  388.  
  389.     [id(3), helpstring("method MoveFirst")]
  390.     HRESULT MoveFirst();
  391.     [id(4), helpstring("method MoveLast")]
  392.     HRESULT MoveLast();
  393.     [id(5), helpstring("method MoveNext")]
  394.     HRESULT MoveNext();
  395.     [id(6), helpstring("method MovePrevious")]
  396.     HRESULT MovePrevious();
  397.     [id(0x0000000B), helpstring("method Close")]
  398.     HRESULT Close();
  399.     [id(0x0000000C), helpstring("method Activate")] 
  400.     HRESULT Activate();
  401. ]
  402. };    
  403.  
  404.  
  405. class Query //////
  406. {
  407. [properties:
  408.     [propget, id(0x0000000D), helpstring("property Database")] 
  409.     HRESULT Database([retval] IDatabase* *pVal);
  410.     [propget, id(0x0000000E), helpstring("property Type")] 
  411.     HRESULT Type([retval] long *pVal);
  412.     [id(1), helpstring("property Fields")]
  413.     HRESULT Fields( retval Fields ** ppRet);
  414.     [id(2), propput, helpstring("property Name")]
  415.     HRESULT Name( retval BSTR * pVal);
  416.     [id(2), propget, helpstring("property Name")]
  417.     HRESULT Name( BSTR Val);
  418.     [id(7), propget, helpstring("property CurrentRecord")]
  419.     HRESULT CurrentRecord( retval long * pRet);
  420.     [id(7), propput, helpstring("property CurrentRecord")]
  421.     HRESULT CurrentRecord( long pRet);
  422.     [propget, id(0x00000010), helpstring("property RecordCount")]
  423.     HRESULT RecordCount(retval long *pVal);
  424.     [propget, id(0x00000011), helpstring("property BOF")]
  425.     HRESULT BOF(retval VARIANT_BOOL *pVal);
  426.     [propget, id(0x00000012), helpstring("property EOF")]
  427.     HRESULT EOF(retval VARIANT_BOOL *pVal);
  428. ]
  429. [methods:
  430.  
  431.     [id(0x00000008), helpstring("method EditRecord")]
  432.     HRESULT EditRecord();
  433.     [id(0x00000009), helpstring("method AddNewRecord")]
  434.     HRESULT AddNewRecord();
  435.     [id(0x0000000A), helpstring("method UpdateRecord")]
  436.     HRESULT UpdateRecord();
  437.  
  438.     [id(3), helpstring("method MoveFirst")]
  439.     HRESULT MoveFirst();
  440.     [id(4), helpstring("method MoveLast")]
  441.     HRESULT MoveLast();
  442.     [id(5), helpstring("method MoveNext")]
  443.     HRESULT MoveNext();
  444.     [id(6), helpstring("method MovePrevious")]
  445.     HRESULT MovePrevious();
  446.     [id(0x0000000B), helpstring("method Close")]
  447.     HRESULT Close();
  448.     [id(0x0000000C), helpstring("method Activate")]
  449.     HRESULT Activate();
  450. ]
  451. };    
  452.  
  453.  
  454. class Relation //////
  455. {
  456. [properties:
  457.     [propget, id(0x0000000D), helpstring("property Database")] 
  458.     HRESULT Database([retval] IDatabase* *pVal);
  459.     [propget, id(0x0000000E), helpstring("property Type")] 
  460.     HRESULT Type([retval] long *pVal);
  461.     [id(1), helpstring("property Fields")]
  462.     HRESULT Fields( retval Fields ** ppRet);
  463.     [id(2), propget, helpstring("property Name")]
  464.     HRESULT Name( retval BSTR * pVal);
  465.     [id(2), propput, helpstring("property Name")]
  466.     HRESULT Name( BSTR Val);
  467.     [id(7), propget, helpstring("property CurrentRecord")]
  468.     HRESULT CurrentRecord( retval long * pRet);
  469.     [id(7), propput, helpstring("property CurrentRecord")]
  470.     HRESULT CurrentRecord( long pRet);
  471.     [propget, id(0x00000010), helpstring("property RecordCount")]
  472.     HRESULT RecordCount(retval long *pVal);
  473.     [propget, id(0x00000011), helpstring("property BOF")]
  474.     HRESULT BOF(retval VARIANT_BOOL *pVal);
  475.     [propget, id(0x00000012), helpstring("property EOF")]
  476.     HRESULT EOF(retval VARIANT_BOOL *pVal);
  477. ]
  478. [methods:
  479.     [id(0x00000008), helpstring("method EditRecord")]
  480.     HRESULT EditRecord();
  481.     [id(0x00000009), helpstring("method AddNewRecord")]
  482.     HRESULT AddNewRecord();
  483.     [id(0x0000000A), helpstring("method UpdateRecord")]
  484.     HRESULT UpdateRecord();
  485.     
  486.     [id(3), helpstring("method MoveFirst")]
  487.     HRESULT MoveFirst();
  488.     [id(4), helpstring("method MoveLast")]
  489.     HRESULT MoveLast();
  490.     [id(5), helpstring("method MoveNext")]
  491.     HRESULT MoveNext();
  492.     [id(6), helpstring("method MovePrevious")]
  493.     HRESULT MovePrevious();
  494.     [id(0x0000000B), helpstring("method Close")]
  495.     HRESULT Close();
  496.     [id(0x0000000C), helpstring("method Activate")] 
  497.     HRESULT Activate();
  498. ]
  499. };    
  500.