delphi 自增edit控件

除了自增EDIT控件，还有通过两个Radiobutton来控制所有自增的Edit控件的Readonly属性，拜托高手们替我这个菜鸟解答，不甚感激

---

sorry, Do not understand what you said!

---

自己先顶下，呵呵

---

我把代码发给你，你帮我看看啊这段代码是formcreat事件的：          Et : array of TEdit;（在全局中声明的）
 
  setlength(Et,200);
  for k := 1 to 7  do
      begin
          for j := 0 to 12 do
              begin
                Et[k + 7*j]              := TEdit.Create(self);
                Et[k + 7*j].Parent      := self.GroupBox1;
                Eh                      := 21;
                Ew                      := 80;
                Et[k + 7*j].Width        := 80;
                Et[k + 7*j].Left        := 2 + 80*(k-1);
                Et[k + 7*j].Top