如何保存当前窗体的运行状态？

Question

用控件，或者自己写个ini文件，每次关闭时，往ini文件保存相关信息，打开时则从ini文件中读取相关信息。

Answer 1

使用什么控件？？
怎样向ini文件中写信息，读信息？

Answer 2

DELPHI中有个TIniFile类，去看看帮助吧，很简单的

Answer 3

在formclose中
var
  inifile: Tinifile;
begin
  ……
  inifile.writestring(窗体宽度，……);
  ……
end;在formcreate或其他标志程序开始的地方写。
var
  inifile: Tinifile;
  formwidth: Integer
begin
  ……
  inifile.readstring(窗体宽度,formwidth，……);
  ……
  form.width := formwidth;
end;

Answer 4

好象RxLib中有一个保存窗口状态的

Answer 5

在Delphi中，可以通过TRegistry类方便地对注册表进行操作。使用TRegistry类的时候，要在
uses语句中包含registry单元。
下面是TRegistry类中定义的几个常用的方法：
 CloseKey 关闭一个键。
 CreateKey 创建一个新键。
 DeleteKey 删除一个已经存在的键
 DeleteValue 删除键中的一个数值
 HasSubKeys 测试一个键是否有子键
 KeyExists 测试一个键是否存在。
 OpenKey 打开一个键。
 ReadBool 读取一个键中某个具体数值，该数值为布尔类型的数据。
 ReadInteger 读取一个键中某个具体数值，该数值为整数类型的数据。
 ReadString 读取一个键中某个具体数值，该数值为字符串类型的数据。
 WriteBool 向一个键中写入某个具体数值，该数值为布尔类型的数据。
 WriteInteger 向一个键中写入某个具体数值，该数值为整数类型的数据
 WriteString 向一个键中写入某个具体数值，该数值为字符串类型的数据。//下面是向注册表中写信息的例子
interface
uses ........, Registry;var
 Reg:TRegistry;
begin
 Reg:=TRegistry.Create;
 Try
  Reg.RootKey :=HKEY_CURRENT_USER;
  Reg.OpenKey('\SoftWare\MyReg',true)=true then
  Reg.WriteInteger('frmWidth',Form1.width);
  Reg.WriteInteger('frmHeight',Form1.height);
  Reg.WriteInteger('frmLeft',Form1.left);
  Reg.WriteInteger('frmTop',Form1.top);
 finally
   Reg.CloseKey ;
   Reg.Free ;
 end;  //end of try
end;

Answer 6

控件：AhmStoredEdit，可以自动存储内容