首页 相关文章 INI文件的读写

INI文件的读写

  function readInifile(fileName,section,Ident:string):string;? //读取配置文件
  var
  ? ini:tinifile;
  begin
  ? ini:=tinifile.Create(fileName);
  ? result:=ini.ReadString(section,ident,'');
  ? ini.Free;
  end;

  procedure writeInifile(const fileName,Section, Ident, Value: string); //写inifile
  var
  ? ini:tinifile; aPathName:string;
  begin
  ? try
  ??? aPathName:= ExtractFileDir(fileName);
  ??? if not DirectoryExists(aPathName) then
  ????? ForceDirectories(aPathName);

  ??? ini:=...[ 查看全文 ]

2016-02-19 标签:

INI文件的读写的相关文章

手机页面
收藏网站 回到头部