首頁 > 編程 > Delphi > 正文

delphi建立、讀取、存貯INI文件的方法《三》

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文件中獲取整數
  edit1.text:=inttostr(GetPrivateProfileInt(
  ´intl´, // []中標題的名字
  ´iCountry´, // =號前的名字
  0,// 如果沒有找到整數時,返回的默認值
  ´c:/forwin95/win.ini´ // 調用的文件名
  ));
  向.INI文件寫入字符串
  WritePrivateProfileString(
  ´windows´, // []中標題的名字
  ´load´, // 要寫入“=”號前的字符串
  ´accca´, //要寫入的數據
  ´c:/forwin95/win.ini´ // 調用的文件名
  );
  向.INI文件寫入整數
  WritePrivateProfileSection(
  ´windows´, // []中標題的名字
  ´read=100´, // 要寫入的數據
  ´c:/forwin95/win.ini´ // 調用的文件名
  );
  上面的方法是調用API函數,下面介紹另一種不用API從.INI文件中獲取字符的方法
  var MyIni: TIniFile;
  begin
  MyIni := TIniFile.Create(´WIN.INI´);//調用的文件名
  edit1.text:=MyIni.ReadString(´Desktop´, ´Wallpaper´, ´´);//取得字符
  end;
  向.INI文件中寫入字符的方法
  var MyIni: TIniFile;
  begin
  MyIni := TIniFile.Create(´WIN.INI´);//調用的文件名
  DelphiIni.WriteString(´Desktop´, ´Wallpaper´, ´c:/a.bmp´);
  end;
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表

圖片精選

久久re6热在线播放