在Form上删除一个SpeedButton控件(在线等待) (200分)

  • 主题发起人 主题发起人 yue_shan
  • 开始时间 开始时间
Y

yue_shan

Unregistered / Unconfirmed
GUEST, unregistred user!
我用循环在一个窗体上做了10个SpeedButton,再删除它们,然后需要时又循环生成,这时
就显示不出来了,哪位高手指点一下,在线等待
 
设计时做的控件,最好不要删除,
除非你自己创建的东西,才可以自己删除。
自己创建的东西,比如TSpeedButton.Create(ownerControl)
其中ownerControl是控件的所有着
然后还要赋Parent,即控件的父控件
 
把生成用的代码贴出来,八层错在Parent之类上了.
 
变通一下,可以把visiable设成false
 
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
i:= ComponentCount -1;
while i >=0 do begin
if Components is TSpeedButton then begin
ShowMessage(Components.Name);
Components.Free;
end;
dec(i);
end;
end;
 
不可能,你把代码帖出来。
 
是可以动态生成控件的
 
to yue_shan:
首先你有没有指定speedbutton的parent属性值?
如果没有指定它的父级所有者,它根本不知道在什么地主显示。
你把这句写上看看。
speedbutton.parent :=self;
 
如果 speedbutton.parent :=self;不能显示,在加入一句
speedbutton.show;
 
估计是parent没写或写错
 
多人接受答案了。
 
后退
顶部