是否有很多东西create后没有free!

解决方案 »

  1.   

    你很多窗体是AutoCreate吧。
    20M内存也不算多。我做的工具软件要用大概15M内存。
      

  2.   

    我特别注意了没用AutoCreate。系统比较大,20M够多了吧。win98处理起来很费劲。
    数据表就有别于60几个,窗体估计也不少于这个数,没数过。panel到是用了点。
      

  3.   

    1、窗体要动态创建。
      看project\options\forms查看一下,将除了主窗体外所有窗体都移动到Available forms
    里来,然后用窗体时候动态创建:
    procedure TForm1.Button1Click(Sender: TObject);
    var
      aForm: TForm2;
    begin
      aForm:= TForm2.Create(Self);
      try
        aForm.ShowModal;
      finally
        aForm.Free;
      end;
    end;2、图片用完毕立即释放。
    procedure TForm_splash.FormDestroy(Sender: TObject);
    begin
      Image1.Free;
    end;
      

  4.   

    释放所有不用的表单、TABEL、QUERY、等。
      

  5.   

    动态建立的东东用完以后一定要释放
    窗体是AutoCreate
    减少使用panel等孔件
      

  6.   

    用API打造,我的文件大小最多时,500K
      

  7.   

    窗体若是create(application),记得free哦
      

  8.   

    1、动态创建的东西在destroy时,释放。
    2、图片不要选择静态存储,要动态调用。
    3、少用panel等包容控件。
    4、多用函数,少开发重复代码。
    我的经验:)
      

  9.   

    少用点控件,少用点窗体,特别是teachart   QuickReport
    有些控件能省就省。