請問大大，我現在是用pageControl來顯示BMP圖檔，可是當我在Sheet2 load 圖檔時，圖卻會跑到Sheet1的image物件下顯示，為什麼勒?? (我為了避免發生無法預期的錯誤所以在Sheet1建立一個OpenPictureDialog1、在Sheet2建立一個OpenPictureDialog2)，還是我少設定了什麼東西。    這是我現在測試的程式

void __fastcall TForm1::Button1Click(TObject *Sender)
{
       if(OpenPictureDialog1->Execute())
   {
      for(int i=0; iFiles->Count; i  )
      {
         if(FileExists(OpenPictureDialog1->Files->Strings[i]))
         {
            TImage *image=dynamic_cast(FindComponent("Image" IntToStr(i 1)));
            if(image)
            {
               image->Picture->LoadFromFile(OpenPictureDialog1->Files->Strings[i]);
            }
         }
      }
   }    }
//---------------------------------------------------------------------------    void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
  if(OpenPictureDialog2->Execute())
   {
      for(int i=0; iFiles->Count; i  )
      {
         if(FileExists(OpenPictureDialog2->Files->Strings[i]))
         {
            TImage *image=dynamic_cast(FindComponent("Image" IntToStr(i 1)));
            if(image)
            {
               image->Picture->LoadFromFile(OpenPictureDialog2->Files->Strings[i]);
            }
         }
      }
   }    }

發表人 - iii0628 於 2005/04/08 01:42:01

iii0628 您好：    請在前述兩處的前一行各插入一個 ShowMessage(image->Name); 敘述，然後再次執行程式，在兩個 TabSheet 各別載入圖形一次，看看顯示出來的名稱各別是什麼？您就知道原因在那裡了。 我不知道您在 Sheet1 與 Sheet2 各別放了幾個 Image？可以肯定的是兩個 TabSheet 上邊的 Image 設定名稱一定是不同的，但是您在兩個程序中都使用相同的名稱 ("Image" IntToStr(i 1))，結果當然是都載入到 Image1, Image2.... 那邊去囉。