假设我在退出工程时,由前面的操作得到全局字符串变量a值为:a="hello"。
退出后,当我再次运行程序时,a的值已不再是="hello"。
而我希望此时a的值仍是上一次运行工程得到的值。
请问我应该在退出整个程序时怎样保存得到的a的值?

解决方案 »

  1.   

    额有三种方法:
    1.保存到一个文件(如ini文件,txt文件等);
    2.写入注册表;
    3.写入你的数据库;
      

  2.   

    如果写入ini文件或txt文件该怎么样写呢?
    能不能请您给示范一下?
    我还没学过文件写的语法。
      

  3.   

    uses iniFiles;//程序启动的时候从ini文件中获得值给a
    procedure TForm1.FormCreate(Sender: TObject);
    Var
       iniFileName:String;
       myinifile:TiniFile;
    begin
      {从ini文件中获得需要的值}
      iniFileName:=ExtractFilePath(paramstr(0))+'yourinifile.ini';
      myinifile:=TInifile.Create(inifilename);
      a:= myinifile.readstring('标题','变量','');   //给a赋值
      myinifile.Destroy;
    end;//程序退出的时候,把变量值存入ini文件
    procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
    var
      iniFilename:string;
       myinifile:TiniFile;
    begin
      iniFileName:=ExtractFilePath(paramstr(0))+'yourinifile.ini';
      myinifile:=TInifile.Create(inifilename);
      myinifile.WriteString('标题','变量',a);
      myinifile.Destroy;
    end;