各位大大好： 小弟現在開檔時，將開檔的副檔名設為"XXX.CCD"，因為我現在處理的圖片為"XXX.BMP"。 如何將讀進來的檔案名稱改為"XXX.CCD.BMP"使得圖片可以顯示在image1上面 謝謝回答

下面這段, 只要你確定 .CCD 檔裡面存的資料格式確實是 .BMP 的格式 就應該可以讀入, 也不用改檔名了  

procedure TForm1.Button1Click(Sender: TObject);
var
  sFn: String;
  sFStream: TFileStream;
  FormImage: TBitmap;
begin
  if (OpenDialog1.Execute) then
  begin
    FormImage := TBitmap.Create;
    try
      sFStream := TFileStream.Create(OpenDialog1.FileName, fmOpenRead        );
      FormImage.LoadFromStream(sFStream);
      try
        Image1.Picture.Assign(FormImage);
      finally
        sFStream.Free;
      end;
    finally
      FormImage.Free;
    end;
  end;
end;

不好意思，請問一下這要如何用 謝謝回答

應該是我不好意思啦, 貼錯版了, 之前是 DELPHI 的程式 換 BCB    開新專案, 加一個 TImage 元件, ㄧ個 TOpenDialog 元件, ㄧ個 TButton 元件 然後在 TButton 元件的 OnClick 事件內 加入    

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  if (OpenDialog1->Execute()) 
  {
    TFileStream *sFStream = new TFileStream(OpenDialog1->FileNae, fmOpenRead);
    TBitmap * FormImage = new Graphic::TBitmap();
    FormImage->LoadFromStream(sFStream);
    Image1->Picture->Assign(FormImage);
    delete FormImage;
    delete sFSream;
  }
}

這是大概的程式碼, 我有好一陣子沒寫BCB了, 不知道與法是否正確, 手邊也沒有BCB, 麻煩自己 Debug ㄧ下