之前用BCB寫的撥放器撥avi的影片 當撥到影片4500左右的frame後，之後就show不出來了，請問有沒有人碰過一樣的問題？

各位前輩好 我是使用之前 TmyAvi版友所發表的avi轉bmp範例http://delphi.ktop.com.tw/board.php?cid=31&fid=79&tid=41765


來改寫作為讀avi frame的程式
下面是GetFrame的部分
---------------------------

void __fastcall TMyAVI::GetFrame(Graphics::TBitmap *pBitmap, long Index)
{
PGETFRAME pGetFrame;
if(pStreamInfo->dwLength != 0 && (DWORD)Index < pStreamInfo->dwLength)
{
// Prepare to decompress video frames from the specified video stream
// CALL: [API] AVIStreamGetFrameOpen()
pGetFrame = AVIStreamGetFrameOpen(pVideoStream, pBIH);
// NOTE: If the system cannot find a decompressor that can decompress
// the stream to the given format, or to any RGB format, the
// function returns NULL.
if(pGetFrame == NULL)
{
MessageBox(NULL, "ERROR: AVIStreamGetFrameOpen( ) can't find a decompressor.", "Can't find decoder!", MB_OK);
AVIStreamGetFrameClose(pGetFrame);
return;
}
// Return the address of a decompressed video frame
// CALL: [API] AVIStreamGetFrame()
Byte *pDIB = (Byte *)AVIStreamGetFrame(pGetFrame, Index);
// get the data of 'real bitmap'
Byte *pDest = (Byte *)pFBitmap->ScanLine[FHeight - 1];
CopyMemory(pDest, pDIB 0x28, pBIH->biSizeImage);
// and copy to desired TBitmap
pBitmap->Assign(pFBitmap);
// Finally, release resources used to decompress video frames
// CALL: [API] AVIStreamGetFrameClose()
AVIStreamGetFrameClose(pGetFrame);
}
}

----------------------------
但當影片frames讀取到數千張(不同的電腦當的frame數都不一樣)時 程式就會當掉
錯誤顯示在getframe( )裡面
是不是有memory的部分沒有釋放完全？
錯誤的地方如下:
圖示

編輯記錄