home *** CD-ROM | disk | FTP | other *** search
/ Maximum CD 2010 November / maximum-cd-2010-11.iso / DiscContents / calibre-0.7.13.msi / file_2726 < prev    next >
Encoding:
Text File  |  2007-06-03  |  1.7 KB  |  65 lines
  1. // TestServer.idl : IDL source for TestServer.dll
  2. //
  3.  
  4. // This file will be processed by the MIDL tool to
  5. // produce the type library (TestServer.tlb) and marshalling code.
  6.  
  7. import "oaidl.idl";
  8. import "ocidl.idl";
  9.     [
  10.         object,
  11.         uuid(50086EE8-F535-464B-806E-365ADBB727CF),
  12.         dual,
  13.         helpstring("ITestServerApp Interface"),
  14.         pointer_default(unique)
  15.     ]
  16.     interface ITestServerApp : IDispatch
  17.     {
  18.         [id(1), helpstring("method Test1")] HRESULT Test1([out, retval] ITestServerApp **pVal);
  19.         [id(2), helpstring("method Test2")] HRESULT Test2([out, retval] VARIANT *pVar);
  20.         [propget, id(3), helpstring("property MyProp1")] HRESULT MyProp1([out, retval] long *pVal);
  21.     };
  22.     [
  23.         object,
  24.         uuid(F1A3CC2E-4B2A-4A81-992D-67862076949B),
  25.         dual,
  26.         helpstring("IPippo Interface"),
  27.         pointer_default(unique)
  28.     ]
  29.     interface IPippo : IDispatch
  30.     {        
  31.         [id(1), helpstring("method Method1")] HRESULT Method1([out, retval] IPippo **val);
  32.         [propget, id(2), helpstring("property MyProp1")] HRESULT MyProp1([out, retval] long *pVal);
  33.         [id(3), helpstring("method Method2")] HRESULT Method2([in] long in1, [in, out] long *inout1,
  34.                                                               [out, retval] long *val);
  35.     };
  36.  
  37. [
  38.     uuid(41059C57-975F-4B36-8FF3-C5117426647A),
  39.     version(1.0),
  40.     helpstring("TestServer 1.0 Type Library")
  41. ]
  42. library TESTSERVERLib
  43. {
  44.     importlib("stdole32.tlb");
  45.     importlib("stdole2.tlb");
  46.     importlib("msado15.dll");
  47.  
  48.     [
  49.         uuid(49E44E89-5A72-4456-B1D5-68268A19E798),
  50.         helpstring("TestServerApp Class")
  51.     ]
  52.     coclass TestServerApp
  53.     {
  54.         [default] interface ITestServerApp;
  55.     };
  56.     [
  57.         uuid(E19C0A68-F61C-450B-A974-A7BA6957829C),
  58.         helpstring("Pippo Class")
  59.     ]
  60.     coclass Pippo
  61.     {
  62.         [default] interface IPippo;
  63.     };
  64. };
  65.