if(OpenDialog1->Execute())
{
 //前面這段需補上你的檔名解析程式
 //可用ExtractFileName函式及字串相關函式來作,解出start_no的值
 ...
 ...
 //以下是連續讀入並播放圖檔
 AnsiString FileName;
 for(int i = start_no ; i < end_no ; i   )
 {
   FileName.printf("xxxxd",i); //這是在取檔名(xxxx i),檔名是依據i的值來取,若i不滿三位數前面就補上0
   FileName=FileName ".raw"; //加上附檔名,你的程式是要開啟".raw"檔       {//以下這段就是你讀入raw檔的程式
    TMemoryStream* bin=new TMemoryStream();
    bin->LoadFromFile(OpenDialog1->FileName);
    int dwSize=Image1->Height*Image1->Width;
    Byte *pixel=new BYTE[dwSize];
    bin->Read(pixel, dwSize);        Graphics::TBitmap *bmp = new Graphics::TBitmap();
    bmp->PixelFormat=pf24bit;
    bmp->Height=Image1->Height;
    bmp->Width=Image1->Width;        for(int y=0; yHeight; y  )
    {
      ptr=(Byte *)bmp->ScanLine[y];
      for(int x=0; xWidth; x  )
      {
        ptr[x*3]=pixel[y*Image1->Width x];
        ptr[x*3 1]=pixel[y*Image1->Width x];
        ptr[x*3 2]=pixel[y*Image1->Width x];
      }
    }
    Image1->Picture->Assign(bmp);
    Application->ProcessMessages();
    delete bmp;
    delete bin;
   }
 }
}