delphi中代码:
procedure TMain.BitBtn0702Click(Sender: TObject);
begin
Form_GQWH:=tform_GQWH.create(self);
Form_GQWH.showmodal;
Form_GQWH.free;
end;
我知道是先打开一个窗体,使之显示出来,那么.free是做什么的啊?
谢谢!
procedure TMain.BitBtn0702Click(Sender: TObject);
begin
Form_GQWH:=tform_GQWH.create(self);
Form_GQWH.showmodal;
Form_GQWH.free;
end;
我知道是先打开一个窗体,使之显示出来,那么.free是做什么的啊?
谢谢!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货