组件数组

var
  Form1: TForm1;
  SArrayEdit : array[0..4] of TEdit; //静态
  DArrayEdit : array of TEdit; //动态

implementation

把组件声明成数组进行循环操作,省去了大量语句

SArrayEdit[i].clear; //除去TEdit.Text值

SetLength(DArrayEdit,4); //设置动态数组长度,动态数组用之前 要设定其长度

 

posted on 2011-09-10 20:25  jshchg  阅读(250)  评论(0编辑  收藏  举报

导航