保存时,连同组件的拥有结构一起保存,就象Delphi的From View as Text一样,读取时也按该结构读出

解决方案 »

  1.   

    当然连组件所有的结构都保存了,但是由于组件的parent也是动态生成的,所以这样就比较麻烦了,我现在想到的一个方法是,每一页存成一个文件,到时候按页数来读
      

  2.   

    用WriteComponetResFile试试。首先用RemoveComponent去掉Form中你不想保存的组件,如Button等,然后用WriteComponetResFile保存Form剩余的所有组件。
    如:
        RemoveComponent(SaveBtn);
        RemoveComponent(LoadBtn);
        WriteComponentResFile('c;\test.sav',Form1);载入保存时用ReadComponentResFile,注意之前要用RegisterClass注册所以要载入控件的类型
    如:
    Classes.RegisterClass(TPageControl);
    Classes.RegisterClass(TTabSheet);
    Classes.RegisterClass(TEdit);
    ReadComponentResFile('c;\test.sav',Form1);
      

  3.   

    楼上的,好象不行啊,运行老出错,能给个完整的例子吗?
    如果想保存给这些控件写的事件呢,该怎么保存?现在好象只能保存这些控件的属性。
    还有,我想把TEdit、TLabel、TButton之类的控件在运行时,宽度用鼠标可调(就跟设计窗体时,用鼠标调整宽度长度一样),该怎么办啊?