請教如何DELPHI 增加一個dWORD值 |
|
缺席
|
|
yish35
一般會員   發表：5 回覆：29 積分：6 註冊：2007-01-10 發送簡訊給我 |
各位大大，請教
由於KTOP上沒有教人如何增加dWORD值 如我想增加 "1" -->foxy 那我在 //===中間，要如何寫呢 感謝各位 [ code xxxx ] R:=Tregistry.create; R.RootKey:=HKEY_CURRENT_USER; keytmp1:='\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\'; keytmp2:='DisallowRun'; keytmp3:=''; keyname:=keytmp1 keytmp2; edit2.text:=keyname; if R.OpenKey(keyname,true) then BEGIN edit1.text:='OK'; //找尋值是否存在 If R.ValueExists('1') then begin edit4.text:='ok'; end else begin edit4.text:='false' //=============== //加入我想要增加的 //================= end; //if R.ValueExists R.CLOSEKEY; R.FREE; end; //if openkeyy [/code ]
------
環境 DELPHI 7 Delphi 新手，請多指教 |
|
yish35
一般會員 發表：5 回覆：29 積分：6 註冊：2007-01-10 發送簡訊給我 |
|
|
taishyang
站務副站長   發表：377 回覆：5490 積分：4563 註冊：2002-10-08 發送簡訊給我 |
發表時間：2008-07-29 10:17:55
IP:121.33.xxx.xxx 訂閱
系統時間：2024-11-25 6:49:36
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |