Borland C＋＋ Builder作為Inprise（原Borland）公司新推出的快速應(yīng)用程序開發(fā)工具（RAD），具有威力強(qiáng)大的C＋＋語言和快捷便利的可視化編程完美結(jié)合的優(yōu)點(diǎn)，遺憾的是其沒有直接提供像VB中的控件數(shù)組的功能，需要開發(fā)者自己編程實(shí)現(xiàn)。
　　 VB中的一個(gè)控件數(shù)組可以1、允許多個(gè)控件共享同一個(gè)事件句柄，2、提供了運(yùn)行期間增加一個(gè)控件的機(jī)制，3、提供了一種方便的組合控件的方法。前兩項(xiàng)在C＋＋ Builder中早已實(shí)現(xiàn)，而且CB更有一個(gè)優(yōu)點(diǎn)。即不同類型的控件可以使用相同的句柄（只需在相關(guān)控件的Object Inspector窗口中的EVENT事件設(shè)置即可）。
　　 C＋＋ Builder中使用了Tlist類對(duì)象來組合控件數(shù)組，與VB控件數(shù)組元素必須為同一類型控件相比較，C＋＋ Builder中的Tlist類對(duì)象可以組合任意類型的控件而不必強(qiáng)求同一種類，這樣就大大地方便了程序開發(fā)者。例如可以把在不同Panel面板控件上的所有控件組合為一個(gè)控件數(shù)組。
　　 作者在開發(fā)實(shí)時(shí)監(jiān)控程序時(shí)，應(yīng)用Tlist類對(duì)象創(chuàng)建、維護(hù)了多類型的控件數(shù)組。其實(shí)現(xiàn)原理與方法詳見以下的原程序代碼。實(shí)例程序?qū)崿F(xiàn)了動(dòng)態(tài)創(chuàng)建一個(gè)包含8個(gè)TEdit類型控件和4個(gè)TImage類型控件的控件數(shù)組，在程序運(yùn)行中對(duì)所創(chuàng)建的控件進(jìn)行修改、維護(hù)的功能（簡(jiǎn)單起見，只對(duì)TImage控件的Parent屬性進(jìn)行了修改，對(duì)控件數(shù)組中各個(gè)控件的屬性修改及事件處理句柄均可依此方法修改）。
　　 1、創(chuàng)建一個(gè)新的工程文件（New Application），在Form1上放置兩個(gè)TPanel類型的Panel1和Panel2,調(diào)整大小合適，再在窗體下方放置四個(gè)TButton類型Button1,Button2,Button3,Button4，設(shè)置控件屬性如下：Button1－>Caption=“新建控件數(shù)組”，Button2－>Caption=“改變控件位置”， Button3－>Caption=“還原到原位置”， Button4－>Caption=“退出”；Button2－>Enabled=false，Button3－>Enabled=false。
　　 （注：以下黑體字部分為需要手工添加的代碼）
　　2、在文件Unit1.H中加入以下聲明：
　　class TForm1 : public TForm
　　{
　　__published: // IDE－managed Components
　　 TPanel ＊Panel1;
　　 TPanel ＊Panel2;
　　 TButton ＊Button1;
　　 TButton ＊Button2;
　　 TButton ＊Button3;
　　 TButton ＊Button4;
　　private: // User declarations
　　 TList ＊MyVCL;
　　public: // User declarations
　　 __fastcall TForm1(TComponent＊ Owner);
　　 virtual __fastcall ～TForm1( );
　　};
　　3、切換到工程的Form界面，雙擊工程的主界面Form，創(chuàng)建一個(gè)OnCreate事件句柄，在文件Unit1.CPP中加入以下代碼：
　　void __fastcall TForm1::FormCreate(TObject ＊Sender)
　　{
　　 MyVCL = new TList;//創(chuàng)建TList對(duì)象
　　}
　　將TForm1析構(gòu)函數(shù)加入到文件Unit1.CPP中：
　　__fastcall TForm1::～TForm1()
　　{
　　 delete MyVCL; //刪除TList對(duì)象
　　}
　　 4、雙擊標(biāo)簽（Caption）為“創(chuàng)建控件數(shù)組”的按鈕，創(chuàng)建一個(gè)OnClick事件句柄，添加以下代碼到OnClick事件句柄中：
　　void __fastcall TForm1::Button1Click(TObject ＊Sender)
　　{
　　 //創(chuàng)建新的控件，調(diào)整其位置，并加入到MyVcl（TList 類）之中
　　 int temptop=5;
　　 for (int i=0;i<4;i＋＋) {
　　 TEdit ＊EditNow = new TEdit(this);
　　 EditNow－>Parent=Panel1;
　　 EditNow－>Text= IntToStr(i);
　　 EditNow－>ReadOnly=true;
　　 EditNow－>Top=temptop;
　　 EditNow－>Height=24;
　　 EditNow－>Width=24;
　　 EditNow－>Left=10;
　　 MyVCL－>Add(EditNow); //加入到控件數(shù)組中
　　 TImage ＊ImageOff= new TImage(this);
　　 ImageOff－>Parent=Panel1;
　　 ImageOff－>Picture－>LoadFromFile(“None.BMP”);
　　 ImageOff－>Top=temptop;
　　 ImageOff－>Height=24;
　　 ImageOff－>Width=24;
　　 ImageOff－>Left=EditNow－>Left＋EditNow－>Width;
　　 MyVCL－>Add(ImageOff); //加入到控件數(shù)組中
　　 TEdit ＊EditStatus = new TEdit(this);
　　 EditStatus－>Parent=Panel1;
　　 EditStatus－>Font－>Name = “Arial”;
　　 EditStatus－>Font－>Size = 12;
　　 EditStatus－>Text=“禁止訪問”;
　　 EditStatus－>ReadOnly=true;
　　 EditStatus－>Top=temptop;
　　 EditStatus－>Height=24;
　　 EditStatus－>Width=80;
　　 EditStatus－>Left= ImageOff－>Left＋ImageOff－>Width;
　　 MyVCL－>Add(EditStatus); //加入到控件數(shù)組中
　　 temptop=temptop＋24＋5;
　　}
　　 Button1－>Enabled=false;
　　 Button2－>Enabled=true;
　　}
　　5、同4所示方法，依次雙擊標(biāo)簽的標(biāo)題（Caption）為“改變控件位置”、 “還原到原位置”、 “退出”的按鈕，創(chuàng)建對(duì)應(yīng)的OnClick事件句柄，添加以下代碼到對(duì)應(yīng)的OnClick事件句柄中：
　　void __fastcall TForm1::Button2Click(TObject ＊Sender)
　　{
　　 for (int i=0;i<4;i＋＋)
　　 ((TImage＊)MyVCL－>Items[i＊3＋1])－>Parent=Panel2;
　　 Button2－>Enabled=false;
　　 Button3－>Enabled=true;
　　}
　　void __fastcall TForm1::Button3Click(TObject ＊Sender)
　　{
　　 for (int i=0;i<4;i＋＋)
　　 ((TImage＊)MyVCL－>Items[i＊3＋1])－>Parent=Panel1;
　　 Button3－>Enabled=false;
　　 Button2－>Enabled=true;
　　}
　　void __fastcall TForm1::Button4Click(TObject ＊Sender)
　　{
　　 Close(); //關(guān)閉窗體
　　}
　　由上所述，實(shí)際的代碼大多只是用于設(shè)定控件位置和基本屬性，真正實(shí)現(xiàn)控件數(shù)組功能的代碼并不太多，也不復(fù)雜，而且十分的靈活；需要注意的是使用TList類對(duì)象組合中的各項(xiàng)控件之前，必須先將其強(qiáng)制轉(zhuǎn)換為一個(gè)對(duì)象指針以指明其類型，才能對(duì)其屬性進(jìn)行修改/賦值操作。

總結(jié)

以上是生活随笔為你收集整理的[CB]控件数组的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。