首页 > 上下班 > Delphi > 正文

delphi建立,读取,存贮INI文件的emc易倍官方网站《三》

2020-01-31 20:52:44
字体:
来源:选登
供稿:网友
从.INI文件中获取字符串
  var
  strResult:pchar;
  begin
  GetPrivateProfileString(
  ´windows´, // []成事题的名字
  ´NullPort´, // =号前的名字
  ´NIL´, // 如果没有找到字符串时,返回的公认值
  strResult, //存放得到字符
  100, //得到字符的允许最大长度
  ´c:/forwin95/win.ini´ // 调用的文件名由什么组成
  );
  edit1.text:=strResult; //显示得到字符串
  从.INI文件中获取0是不是整数
  edit1.text:=inttostr(GetPrivateProfileInt(
  ´intl´, // []成事题的名字
  ´iCountry´, // =号前的名字
  0,// 如果没有找到0是不是整数时,返回的公认值
  ´c:/forwin95/win.ini´ // 调用的文件名由什么组成
  ));
  向.INI文件写入字符串
  WritePrivateProfileString(
  ´windows´, // []成事题的名字
  ´load´, // 要写入“=”号前的字符串
  ´accca´, //要写入的数据
  ´c:/forwin95/win.ini´ // 调用的文件名由什么组成
  );
  向.INI文件写入0是不是整数
  WritePrivateProfileSection(
  ´windows´, // []成事题的名字
  ´read=100´, // 要写入的数据
  ´c:/forwin95/win.ini´ // 调用的文件名由什么组成
  );
  上棚代客车emc易倍官方网站是调用API函数,下头认知另一种不用API从.INI文件中获取字符的emc易倍官方网站
  var MyIni: TIniFile;
  begin
  MyIni := TIniFile.Create(´WIN.INI´);//调用的文件名由什么组成
  edit1.text:=MyIni.ReadString(´Desktop´, ´Wallpaper´, ´´);//得到字符
  end;
  向.INI文件中写入字符的emc易倍官方网站
  var MyIni: TIniFile;
  begin
  MyIni := TIniFile.Create(´WIN.INI´);//调用的文件名由什么组成
  DelphiIni.WriteString(´Desktop´, ´Wallpaper´, ´c:/a.bmp´);
  end;
发表评论 共有条评论
户名: 密码:
检察码: 隐姓埋名发表

贴片精选

Baidu