我的代码如下：

class TPack
{
public:
    int    nType;
    int    nLen;
    BYTE   *pData;        __fastcall TPack()
        :nType(0), nLen(0), pData(NULL)
    {
    };        __fastcall ~TPack()
    {
        if (pData != NULL)
            delete []pData;
    };
};    void __fastcall TLmsForm::IdTCPServerExecute(TIdPeerThread *AThread)
{
    TPack *pPack = new TPack;
    try {
        pPack->nType = AThread->Connection->ReadInteger(true);
        pPack->nLen  = AThread->Connection->ReadInteger(true);
        if (pPack->nLen > 0)
        {
            pPack->pData = new BYTE[pPack->nLen];
            AThread->Connection->ReadBuffer(pPack->pData, pPack->nLen);
        }
    }
    catch (...)
    {
        AThread->Connection->Disconnect();
        if (pPack->pData != NULL)
        {
            delete [] pPack->pData;
            pPack->pData = NULL;
        }
    }
    if (pPack->pData == NULL)
    {
        delete pPack;
        return;
    }        switch (pPack->nType)
    {
    case PACK_ADDGROUP:
        ParsePackAddGroup(pPack);
        Broadcast(pPack);
        break;
    case PACK_DELGROUP:
        ParsePackDelGroup(pPack);
        Broadcast(pPack);
        break;
    }
    delete pPack;
}

用BoundsChecker调试显示行 TPack *pPack = new TPack; 出错： Questionable use of thread Thread created using CreateThread rather than _beginthread 好像会发生内存泄漏，我对线程不是很熟悉，该怎样修改程序呢？ 發表人 - biqiyun 於 2005/09/14 18:23:18

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.