求助：把VC++帮我翻译成DELPHI

Question

class ISAPI_STRING
{
public:    ISAPI_STRING(
        DWORD   dwMaxAlloc = 0
        );    virtual
    ~ISAPI_STRING();    BOOL
    Copy(
        CHAR *  szString,
        DWORD   cchString = 0
        );    BOOL
    CopyW(
        WCHAR * szStringW,
        DWORD   cchStringW = 0
        );    BOOL
    Append(
        CHAR *  szString,
        DWORD   cchString = 0
        );    BOOL
    AppendW(
        WCHAR * szStringW,
        DWORD   cchStringW = 0
        );    BOOL
    Printf(
        CHAR *  szString,
        ...
        );    BOOL
    Vsprintf(
        CHAR *  szFormat,
        va_list args
        );    VOID
    CalcLen(
        VOID
        );    DWORD
    QueryCB(
        VOID
        );    DWORD
    QueryCCH(
        VOID
        );    BOOL
    SetLen(
        DWORD   cchNewLength
        );    DWORD
    QueryBufferSize(
        VOID
        );    BOOL
    ResizeBuffer(
        DWORD   cbSize
        );    DWORD
    QueryMaxAlloc(
        VOID
        );    VOID
    SetMaxAlloc(
        DWORD   dwMaxAlloc
        );    CHAR *
    FindStr(
        CHAR *  szSubString,
        BOOL    fCaseInsensitive = FALSE,
        DWORD   dwStartingOffset = 0
        );    BOOL
    Base64Encode(
        VOID *  pBuffer,
        DWORD   cbBuffer
        );    BOOL
    Escape(
        BOOL    fAllowDoubleEscaping = FALSE
        );    VOID
    Unescape(
        VOID
        );    CHAR *
    QueryStr(
        VOID
        );    VOID
    ZeroBuffer(
        VOID
        );private:    ISAPI_BUFFER    _Buffer;    BOOL
    CopyToOffset(
        CHAR *  szString,
        DWORD   cchString,
        DWORD   dwOffset
        );    BOOL
    CopyWToOffset(
        WCHAR * szStringW,
        DWORD   cchStringW,
        DWORD   dwOffset
        );
};

Answer 1

楼主，告诉你个方法，你可以试试。百度“Delphi C++ 数据类型”
找一份数据类型对照表，然后照着翻译，很容易了，因为Delphi本身的类写法基本和C++一样 。

Answer 2

和没看一样，主要这不是单纯的数据类型的转换，是CLESS我不会转换

Answer 3

这只是个类的定义，看懂了自己重新定义类吧
主要是Delphi中的宽字符类型不是wchar*
具体是什么自己查查吧

Answer 4

type
 ISAPI_STRING = class(TObject)
  public
    constructor Create ( dwMaxAlloc : DWord = 0);
    destructor Destroy; override;
    function copy(szString : pchar; cchString: DWord = 0) : BOOl;
end；
下面的函数感觉都差不多