今有一个控件,用的是vc的com写成的,发布了dll和以及com的接口文件,.h
怎么翻译成delphi的呢?对com不是太熟
#if !defined(_M_IA64) && !defined(_M_AMD64)
#pragma warning( disable: 4049 )  /* more than 64k source lines */
#ifdef __cplusplus
extern "C"{
#endif 
#include <rpc.h>
#include <rpcndr.h>#ifdef _MIDL_USE_GUIDDEF_#ifndef INITGUID
#define INITGUID
#include <guiddef.h>
#undef INITGUID
#else
#include <guiddef.h>
#endif#define MIDL_DEFINE_GUID(type,name,l,w1,w2,b1,b2,b3,b4,b5,b6,b7,b8) \
        DEFINE_GUID(name,l,w1,w2,b1,b2,b3,b4,b5,b6,b7,b8)#else // !_MIDL_USE_GUIDDEF_#ifndef __IID_DEFINED__
#define __IID_DEFINED__typedef struct _IID
{
    unsigned long x;
    unsigned short s1;
    unsigned short s2;
    unsigned char  c[8];
} IID;#endif // __IID_DEFINED__#ifndef CLSID_DEFINED
#define CLSID_DEFINED
typedef IID CLSID;
#endif // CLSID_DEFINED#define MIDL_DEFINE_GUID(type,name,l,w1,w2,b1,b2,b3,b4,b5,b6,b7,b8) \
        const type name = {l,w1,w2,{b1,b2,b3,b4,b5,b6,b7,b8}}#endif !_MIDL_USE_GUIDDEF_MIDL_DEFINE_GUID(IID, IID_IDirectUI,0x4227721F,0x467C,0x452B,0xB4,0x5D,0xAD,0x8B,0x04,0xA3,0xE1,0xB4);
MIDL_DEFINE_GUID(IID, LIBID_directuiComLib,0x79C6BB2E,0x1365,0x4346,0x9E,0x96,0x28,0xCA,0xF6,0x39,0x48,0x9E);
MIDL_DEFINE_GUID(CLSID, CLSID_DirectUI,0x1E3A9D21,0x6A51,0x428F,0xB5,0xFA,0x71,0xD1,0x09,0xF5,0x99,0x14);#undef MIDL_DEFINE_GUID#ifdef __cplusplus
}
#endif#endif /* !defined(_M_IA64) && !defined(_M_AMD64)*/