求助：如何将一个C++类转换成Delphi代码
同标题，该类是DirectShow中的一个示例，求如何将其转化成Delphi代码，万分感谢！！
C/C++ code:
// 类声明
class CErrReporter : public IAMErrorLog
{
protected:
long m_lRef; // Reference count.
public:
CErrReporter() { m_lRef = 0; }
// IUnknown
STDMETHOD(QueryInterface(REFIID, void**));
STDMETHOD_(ULONG, AddRef());
STDMETHOD_(ULONG, Release());
// IAMErrorLog
STDMETHOD(LogError(LONG, BSTR, LONG, HRESULT, VARIANT*));
};
// 部分实现
STDMETHODIMP CErrReporter::QueryInterface(REFIID riid, void **ppv)
{
if (ppv == NULL) return E_POINTER;
*ppv = NULL;
if (riid == IID_IUnknown)
*ppv = static_cast<IUnknown*>(this);
else if (riid == IID_IAMErrorLog)
*ppv = static_cast<IAMErrorLog*>(this);
else
return E_NOINTERFACE;
AddRef();
return S_OK;
}
STDMETHODIMP_(ULONG) CErrReporter::AddRef()
{
return InterlockedIncrement(&m_lRef);
}
STDMETHODIMP_(ULONG) CErrReporter::Release()
{
// Store the decremented count in a temporary
// variable.
ULONG uCount = InterlockedDecrement(&m_lRef);
if (uCount == 0)
{
delete this;
}
// Return the temporary variable, not the member
// variable, for thread safety.
return uCount;
}
1、必须提供IAMErrorLog的接�
相关问答：
C\C++如何计算函数的导数,本人新手，想写个程序，但是不知道如何下手，还望高手指点一二，谢过。
这个……
跟函数的具体形式有关吧，难道你想编出个“万能”的求导函数？
俺上学时想过自动推导公式，后来 ......
内容涉及：C、C++、STL、VC++、MFC、COM、ATL、Windows网络编程、数据库编程、Windows驱动编程、软件工程、Windows操作系统编程，等等方面。
下载地址：http://www.cctry.com/forumdisplay.php?fid=46
......
写了个测试程序如下
struct hostent *hp;
char AlarmDevIP[20];
int x2;
hp = gethostbyname("www.google.com");
if (hp)
{
......
由于客戶端有的文件經常更新（遠程的，不是局域網），
所以想寫個自動更新的 程序。
看網上的 方法資料，知道些方法，但不知道具體怎么寫。
......
