如果我用TMemorystram 建立了一串資料流,並將一連串byte資料讀進TMemorystram 的buffer中(例如: 04 05 AB .....),今天如果我想將兩個byte的資料(例如: 02 AA)插入到最前面使其成為02 AA 04 05 AB..... 有何方法可使用嗎?? 我爬了之前有關TMemorystram的文章,大部分都是將資料流的內容做置換的動作,好像沒有有關插入資料的討論,還是小弟眼拙,漏看了.... 望各位先賢解惑,小弟先致謝了!!

Stream 顧名思義就是一串連續的資料流， 並無提供插入的 method， 如果真的要做插入的動作， 可以自己寫函式處理 .....     

//pStream：TMemoryStream 物件的指標
//ulPos：欲插入的位置
//pcData：欲插入的資料
//ulDataLen：欲插入資料的長度
void __fastcall StreamInsert(TMemoryStream * pStream, unsigned long ulPos, char * pcData, unsigned long ulDataLen)
{
    char * buf = new char[pStream->Size];        //暫存插入點之後的資料
    unsigned long ulRestDataLen = pStream->Size - ulPos;
    pStream->Seek(ulPos, soFromBeginning);
    pStream->Read(buf, ulRestDataLen);        //從插入點寫入欲插入的資料
    pStream->Seek(ulPos, soFromBeginning);
    pStream->Write(pcData, ulDataLen);        //寫回原先暫存的資料
    pStream->Write(buf, ulRestDataLen);        delete [] buf;
}
 

使用方法如下：

 
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
    TMemoryStream * pStream = new TMemoryStream();
    pStream->Write("ABCDE", 5);        StreamInsert(pStream, 2, "123", 3);             //<--- 執行完 Stream 的內容則為 "AB123CDE"        delete pStream;
}

---------------------- 我..........還很嫩!

------
我..........還很嫩!

gac大大的範例執行無誤, 感謝解惑!!