求助！！！！！

Question

procedure Trsdall_win.Button17Click(Sender: TObject);
var diaodong_win: Tdiaodong_win;//Tdiaodong_win是一个单元
begin
    diaodong_win := diaodong_win.create(Self);//执行到这里的时候出错了,错误提示为
                                        ”A compontent  named button17  already exists."
   diaodong_win.Release;
end;

Answer 1

procedure Trsdall_win.Button17Click(Sender: TObject);
var diaodong_win: Tdiaodong_win;//Tdiaodong_win是一个单元
begin
    diaodong_win := diaodong_win.create(Self);//执行到这里的时候出错了,错误提示为”A compontent  named button17  already exists."
   diaodong_win.Release;
end;

Answer 2

你在类diaodong_win的构造函数里面是不是指定了该类创建之后的名称为“button17”?

Answer 3

类diaodong_win里没有button17 ，不知道是不是在Trsdall_win里面的button17有关呢，button17控件只有在Trsdall_win里面有的

Answer 4

diaodong_win := Tdiaodong_win.create(Self);//