運行狀態刪除某窗體上的所有控件。(30分)

  • 主题发起人 主题发起人 leway
  • 开始时间 开始时间

var
i:integer;
begin
for i:=form1.ComponentCount-1 downto 0 do
Form1.Components.free;
end;
 
接受答案了.
 
后退
顶部