程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 更多編程語言 >> 更多關於編程 >> delphi樹立、讀取、存貯INI文件的辦法《二》

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;

固然,這非常輕易並破解,你可以用XOR停止異或操作,或許倒取反
值...詳細的要看你怎樣完成了.總之,本文章只拋磚引玉而已. 
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved