怎样使一个 edit.text 保存上一次执行是输入的内容?

Question

放到注册表里，我有控件的，[email protected]

Answer 1

保存到注册表中，并且可以保存以前三次的输入。
具体可以写信
[email protected]

Answer 2

保存到注册表中，并且可以保存以前几次的输入。
具体可以写信
[email protected]   

Answer 3

方案一：
用著名的RX组件包里的Rx Tools页下的TFormStorage组件，此组件可自动存储你组件的某些属性，可存到Ini,Registry等，看到小照相机图标了么，好好可爱哦！
方案二：自己写INI，也不难。
//G_S_AppPath：是可执行文件所在路径
procedure TForm_login.FormShow(Sender: TObject);
var  ini: TIniFile;
begin
  {若WorkStation.ini存在则将服务器名显示在编辑框里}
  if FileExists(G_S_AppPath+'Client.ini') then begin
    try
      ini:= TIniFile.Create(G_S_AppPath+'Client.ini');
      G_S_UserName:= ini.ReadString('ServerOptions', 'UserName', '');
      edt_manager.text:= G_S_UserName;
      G_S_ServerName:= ini.ReadString('ServerOptions', 'ServerName', '');
      edt_server.Text:= G_S_ServerName;
    finally
      ini.Free;
    end;
  end;
  if trim(edt_manager.text) <> '' then edt_password.SetFocus else
    edt_manager.SetFocus;
end;
//-----------------------------
procedure TForm_login.FormCloseQuery(Sender: TObject;
  var CanClose: Boolean);
var
  ini: TIniFile;
begin
   if ModalResult = mrCancel then begin
     CanClose:= true;
     Application.Terminate;
     Exit;
   end;  
   {--------错误处理--------}
   {其他代码略......}
   {如果登陆成功则写如INI文件}
      try
        ini:= TIniFile.Create(G_S_AppPath+'Client.ini');
        ini.WriteString('ServerOptions','UserName', G_S_UserName);
        ini.WriteString('ServerOptions','ServerName', G_S_ServerName);
      finally
        ini.Free;
      end;
end;
//-----Client.INI内容------
[ServerOptions]
UserName=kk
ServerName=tiezh