delphi樹立、讀取、存貯INI文件的辦法《三》

delphi樹立、讀取、存貯INI文件的辦法《三》。本站提示廣大學習愛好者：（delphi樹立、讀取、存貯INI文件的辦法《三》）文章只能為提供參考，不一定能成為您想要的結果。以下是delphi樹立、讀取、存貯INI文件的辦法《三》正文

---

從.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;