如果我用了10個Panel(Panel1~Panel10),是否可以寫一個迴圈讓10個Panel一起變顏色,而不用寫成像下面的程式啊? Panel1->Color=clRed;Panel2->Color=clRed;Panel3->Color=clRed;......

lanfanra您好: 法一

for (int i = 0; i < ComponentCount; i  )
  {
    if ( Components[i]->ClassNameIs("TPanel") )
      (dynamic_cast(Components[i]))->Color = clRed;
  } 

法二

for (int i = 1; i <= 10; i  )
  {
   ((TPanel *)FindComponent("Panel" IntToStr(i)))->Color=clRed ;
  }

順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～ 發表人 -

對不起,再請問一下:如果用法二,在別的Form要如何表示呢? 如:Form2->Panel1->Color=clRed;Form2->Panel2->Color=clRed;...

lanfanra您好: 我不曉得有沒有更快更好的方式,不過下面是我直覺的想法您參考看看

//Unit1.cpp
#include "Unit1.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 Form2->Show();
 Form2->ChangePanelColor(); //改變Form2上的Panel顏色
}
//---------------------------------------------------------------------------
//Unit2.h
class TForm2 : public TForm
{
__published:        // IDE-managed Components
        TPanel *Panel1;
        TPanel *Panel2;
        TPanel *Panel3;
        TPanel *Panel6;
        TPanel *Panel4;
        TPanel *Panel5;
        TPanel *Panel7;
        TPanel *Panel8;
        TPanel *Panel9;
        TPanel *Panel10;
private:        // User declarations
public:                // User declarations
   void __fastcall ChangePanelColor();
        __fastcall TForm2(TComponent* Owner);
};    //Unit2.cpp
//---------------------------------------------------------------------------
void __fastcall TForm2::ChangePanelColor()
{
 for (int i = 1; i <= 10; i  )
  {
   ((TPanel *)FindComponent("Panel" IntToStr(i)))->Color=clRed ;
  }
}
//---------------------------------------------------------------------------

順心 <>～我也是在學習的階段,回答的不好請您多多見諒與指教～

我想我只能說,我太愛你了