简单问题,白给分! formname.close;freeandnil(formname); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var mylogin : TLoginForm ;begin mylogin := TLoginForm.create ; try MyLogin.showModal ; ..... //mrOk ; finally MyLogin.Free ; end;end ; program Project1;uses Forms, Unit1 in 'Unit1.pas' {Form1};{$R *.RES}begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run;end.最好写在这个位置 有关内存泄漏的查找解决思路方法 从网上看到的感觉不错 给大家分享 两个DBChart使用TbarSeries,一样的代码效果却不同 bde_c_tbl.IsEmpty;表里明明有数据,怎么还返回true 调用窗口的数值回传问题 ProgressBar1有关问题 请教关闭一个事件和开启动一个事件的问题 如何自动生成Delphi多层数据库应用项目全部源代码 导出数据到ACCESS问题 如何读出内存中进程的内存大小是多少? 关于接口和类的关系 怎样取得当前计算机的名称?急用 怎样用Delphi发邮件(在smtp需要验证的情况下)
mylogin : TLoginForm ;
begin
mylogin := TLoginForm.create ;
try
MyLogin.showModal ;
..... //mrOk ;
finally
MyLogin.Free ;
end;
end ;
Forms,
Unit1 in 'Unit1.pas' {Form1};{$R *.RES}begin Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
最好写在这个位置