註冊表寫二進值的方法 |
|
jackkcg
站務副站長 發表:891 回覆:1050 積分:848 註冊:2002-03-23 發送簡訊給我 |
此為轉貼資料 註冊表寫二進值的方法 (http://www.tommstudio.com/newclub30/) -------------------------------------------------------------------------------- 註冊表寫二進值的方法: 語句作用:在註冊表裏建立abc主鍵和EditFlags二進值 關於註冊表寫字串的資料很多,唯獨定位寫二進值語句的,翻遍了整個網路也沒有,只好自己寫了一個,在這裏作個備份,以免日後忘了,也算送給大家共用: var
reg:TRegistry;
Bufor: array[0..3] of Byte;//準備00 00 00 00 四個值位
begin
reg:=TRegistry.Create;
reg.RootKey :=HKEY_CLASSES_ROOT;//自己定義KEY根
reg.OpenKey (‘abc‘,true);//自定義abc主鍵
Bufor[0]:=0;//定位1,二進值的值,下同
Bufor[1]:=0;
Bufor[2]:=1;
Bufor[3]:=0;
reg.WriteBinaryData(‘EditFlags‘,Bufor,SizeOf(Bufor));//寫註冊表
reg.CloseKey;
reg.Free;
end; 結果?:
在HKEY_CLASSES_ROOT下,
abc鍵: EditFlags 00 00 01 00 *********************************************************
哈哈&兵燹
最會的2大絕招 這個不會與那個也不會 哈哈哈 粉好 Delphi K.Top的K.Top分兩個字解釋Top代表尖端的意思,希望本討論區能提供Delphi的尖端新知
K.表Knowlege 知識,就是本站的標語:Open our mind to make knowledge together!
希望能大家敞開心胸,將知識寶庫結合一起
------
********************************************************** 哈哈&兵燹 最會的2大絕招 這個不會與那個也不會 哈哈哈 粉好 Delphi K.Top的K.Top分兩個字解釋Top代表尖端的意思,希望本討論區能提供Delphi的尖端新知 K.表Knowlege 知識,就是本站的標語:Open our mind |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |