发信人: zxg (魔), 信区: BorlandDev
标  题: Re: 如何将制造控件数组？(From database board)
发信站: 哈工大紫丁香 (2000年08月30日08:25:36 星期三), 站内信件

假设我动态生成5个按扭，我想用一个函数响应这5个按扭的OnClick
事件，还要区分是哪个按扭发送的消息，如何做到？
谢谢！
【 在 lofe ()感激生活() 的大作中提到: 】
:    在C++ Builder中，创建控件数组的方法与此类似。
:    class TForm1::TForm{
:       ...
:    protected: 
:       ...
:       TEdit    *editarray[9];
:       ...
:    public:
:       VOID CreateEditArray(VOID){
:            int i;        
:            ...
:            for(i=0;i++;i<9){
:               ...
:               editarray[i] = new TEdit(this);
:               ...
:               editarray[i]->Parent  = this;
:               editarray[i]->Visible = TRUE;  
:            }
:            ...
:       };
:       VOID DestroyEditArray(VOID){
:            int i;
:            ...
:            for(i=0;i++;i<9)
:               delete editarray[i];
:       };       
:     ...
:   }; 
: 【 在 redfox (Z掉了几乎所有的版...) 的大作中提到: 】
: : 发信人: GOHKI (豪鬼), 信区: Database
: : 标  题: Re: delphi的控件数组如何定义和使用?
: : 发信站: 哈工大紫丁香 (2000年05月29日15:55:28 星期一), 站内信件
: : Delphi中是可以使用控件数组的，方法如下：
: : var
: :   editarray:array[0..9] of tedit;
: :   i:integer;
: : begin
: :   for i:=0 to 9 do
: :   begin
: :     editarray[i]:=tedit.create(self);
: :     editarray[i].parent:=self;
: :     editarray[i].left:=100;
: :     editarray[i].top:=100+i*30;
: :   end;
: : end;


--
                               ★
                             ★  ★
                            ★星星★
                           ★★★★★

※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.228.205]