国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > Delphi > 正文

Delphi 常見文件處理及注冊表文件的使用實例

2020-01-31 20:50:10
字體:
來源:轉載
供稿:網友

Delphi 常見文件處理及注冊表文件的使用實例

前言:

 Registry為我們提供了操作注冊表的方法,這里我們用TRegIniFile提供的方法,TRegIniFile繼承自TRegistry,TRegIniFile提供的方法類似于前面講到的操作Ini文件的方法,這樣就大大簡化了我們操作"神秘"注冊表的方法,下面是常用的方法:

  1. function CreateKey(const Key: String): Boolean;  創建Key
  2. function OpenKey(const Key: String; CanCreate: Boolean): Boolean; 打開Key,當CanCreate為True時,如果Key不存在,會自動創建
  3. procedure EraseSection(const Section: String); 刪除
  4. WriteString,WriteInteger,WriteBool,WriteCurrency 寫值
  5. ReadString,ReadInteger,ReadBool,ReadCurrency  讀值
  6. ReadSection,ReadSections,ReadSectionValues 這些是不是很眼熟,和INI文件的方法一樣

看例子

創建節點

var  reg:TRegIniFile; begin  reg := TRegIniFile.Create;    //創建實例  reg.RootKey := HKey_Local_Machine;  //設置根值  if reg.OpenKey('SOFTWARE/MyReg',True) then  //打開 HKey_Local_Machine/SOFTWARE/MyReg,如果MyReg不存在,則自動創建  begin  //在HKey_Local_Machine/SOFTWARE/MyReg下創建MySec項,然后在MySec中創建一個字符串MyValue,值為China  reg.WriteString('MySec','MyValue','China');  end; end; 

刪除值

var  reg:TRegIniFile; begin  reg := TRegIniFile.Create;    //創建實例  reg.RootKey := HKey_Local_Machine;  //設置根值  if reg.OpenKey('SOFTWARE/MyReg/MySec',True) then  begin  //刪除HKey_Local_Machine/SOFTWARE/MyReg/MySec下MyValue一項  reg.DeleteValue('MyValue');  end; end; 

刪除Key

var  reg:TRegIniFile; begin  reg := TRegIniFile.Create;    //創建實例  reg.RootKey := HKey_Local_Machine;  //設置根值  if reg.OpenKey('SOFTWARE/MyReg',True) then  begin  //刪除HKey_Local_Machine/SOFTWARE/MyReg下的MySec  reg.EraseSection('MySec');  end; end; 

讀取Key的列表以及讀取Key下值的列表都與INI文件的操作類似,

如有疑問請留言或者到本站社區交流討論,感謝閱讀,希望能幫助到大家,謝謝大家對本站的支持!

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表

圖片精選

主站蜘蛛池模板: 克什克腾旗| 柳江县| 勐海县| 宜阳县| 龙江县| 读书| 四会市| 安丘市| 镇安县| 驻马店市| 洛川县| 鹿邑县| 左贡县| 来安县| 含山县| 天祝| 皋兰县| 定日县| 石首市| 新疆| 鄂托克前旗| 罗田县| 重庆市| 新竹市| 太仆寺旗| 弥渡县| 南澳县| 孙吴县| 新巴尔虎左旗| 布拖县| 石泉县| 濮阳市| 左贡县| 罗定市| 彰化县| 宝山区| 长治县| 陇川县| 星子县| 松江区| 于都县|