急，关于保存问题；(在线等待！！！！！)

Question

在不用数据库的情况下，
edit的初始值可以随时变化；
例如：1、edit.text := '22'
      2、然后运行后，我将edit的值改为33，
      3、关闭，
      4、再运行时，eidt的值则为33；

Answer 1

有很多种方法,
一.txt,ini等待文件
二.注册表
三.写在应用程序自身一和二比较常用,三少用,不过最简介,不需要辅助成分.方法三的一个例子(忘记是哪位大侠写的了):use ...
...
  public
    test:byte;
...procedure TForm1.FormCreate(Sender: TObject);
var
  fs:TFileStream;
begin
  fs:=TFileStream.Create(application.ExeName,fmopenread or fmsharedenynone);
  fs.Seek(-1,soFromEnd);
  fs.Read(test,1);
  fs.Free;
  edit1.text:=inttostr(test);
end;procedure TForm1.FormDestroy(Sender: TObject);
var
  f:Textfile;
  fs:TFileStream;
  i:byte;
  fn:string;
begin
  fn:=copy(application.ExeName,length(ExtractFilePath(application.ExeName))+1,length(application.ExeName)-length(ExtractFilePath(application.ExeName)));
  i:=1;//改变这里
  copyfile(pchar(application.ExeName),'temp.exe',false);
  fs:=TFilestream.Create('temp.exe',fmopenwrite or fmshareExclusive);
  fs.Seek(-1,soFromEnd);
  fs.Write(i,1);
  fs.Free;
  assignfile(f,'delSelf.bat');
  rewrite(f);
  writeln(f,'del '+fn);
  writeln(f,'ren temp.exe '+fn);
  writeln(f,'del %0');
  closefile(f);
  winExec('delSelf.bat',sw_hide);
end;

Answer 2

用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！用INI文件！！！

Answer 3

zdcnow(磁效应) 
不行啊，

Answer 4

保存到一个txt文件中去就可以了~

Answer 5

huangxc520(黄晓春) :
    可以的.
    要不留下email,我写一个发过去给你.

Answer 6

我也想了解，学习
[email protected]