怎么将edit1里的值保存到INI或文本文件中
如何将edit1里的值保存到INI或文本文件中
如何将edit1里的值保存到INI文件或文本文件中,以便下次打开程序时候自动调用,第一次用INI
EDIT.TEXT的值是文件路径:'d:\abc\ccd'
------解决方案--------------------
procedure TForm1.Button1Click(Sender: TObject);
var
ini:TIniFile;
begin
ini :=TIniFile.Create('d:\abc\ccd\test.txt');
Try
ini.WriteString('test','Edit1',Edit1.text);
Finally
Ini.Free;
End;
end;
------解决方案--------------------
把WriteString改成ReadString,第3个参数是默认值
Edit1.Text:=ini.ReadString('XXOO','A','');
Edit2.Text:=ini.ReadString('XXOO','B','');
...
ini文本裡面的格式是:
[XXOO]
A=小三
B=小四
C=小五
...
如何将edit1里的值保存到INI文件或文本文件中,以便下次打开程序时候自动调用,第一次用INI
EDIT.TEXT的值是文件路径:'d:\abc\ccd'
------解决方案--------------------
procedure TForm1.Button1Click(Sender: TObject);
var
ini:TIniFile;
begin
ini :=TIniFile.Create('d:\abc\ccd\test.txt');
Try
ini.WriteString('test','Edit1',Edit1.text);
Finally
Ini.Free;
End;
end;
------解决方案--------------------
把WriteString改成ReadString,第3个参数是默认值
Edit1.Text:=ini.ReadString('XXOO','A','');
Edit2.Text:=ini.ReadString('XXOO','B','');
...
ini文本裡面的格式是:
[XXOO]
A=小三
B=小四
C=小五
...