全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:2029
推到 Plurk!
推到 Facebook!

Ctrl + Alt + Del 一問

答題得分者是:hagar
ko
資深會員


發表:28
回覆:785
積分:444
註冊:2002-08-14

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-02-07 15:14:25 IP:61.221.xxx.xxx 未訂閱
各位大大: 有關一篇文章如下 Disable task switching procedure SystemKeys(Disable: Boolean);  var OldVal : LongInt; begin  SystemParametersInfo     (SPI_SCREENSAVERRUNNING,      Word(Disable),      @OldVal,      0); end;    來源http://delphi.about.com/library/weekly/aa022701a.htm 我想請問適用於2000 或 xp 嗎?
引言: 有些事情不能只用2個銅板來決定< face="Verdana, Arial, Helvetica">
------
======================
昏睡~
不昏睡~
不由昏睡~
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-02-07 15:23:58 IP:203.73.xxx.xxx 未訂閱
引言: 各位大大: 有關一篇文章如下 Disable task switching procedure SystemKeys(Disable: Boolean); var OldVal : LongInt; begin SystemParametersInfo (SPI_SCREENSAVERRUNNING, Word(Disable), @OldVal, 0); end; 來源http://delphi.about.com/library/weekly/aa022701a.htm 我想請問適用於2000 或 xp 嗎?
引言: 有些事情不能只用2個銅板來決定< face="Verdana, Arial, Helvetica">
ko 你好: 請參考以下的連結文章
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
ramonliu
一般會員


發表:0
回覆:3
積分:0
註冊:2002-03-13

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-02-07 15:37:50 IP:202.154.xxx.xxx 未訂閱
嗯... nt xp 不行這樣子玩...  給你一個位置... 它說明了有 那些 disable 方式... 
ko
資深會員


發表:28
回覆:785
積分:444
註冊:2002-08-14

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-02-07 16:15:15 IP:61.221.xxx.xxx 未訂閱
RaynorPao大大 小弟就是參考你指定的那篇... 才會有疑問的?????? > 小弟只是一個疑問??? 為何我根據 >????????????? 我有看解說... >>, // >< face="Verdana, Arial, Helvetica">引言:有些事情不能只用2個銅板來決定
------
======================
昏睡~
不昏睡~
不由昏睡~
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-02-07 16:29:49 IP:203.73.xxx.xxx 未訂閱
引言: RaynorPao大大 小弟就是參考你指定的那篇... 才會有疑問的?????? < face="Verdana, Arial, Helvetica"> ko 你好: 可是我貼給 hagar 兄的連結是以下這兩篇耶 > 至於~~使用結果如何~~那就要問 > 呼叫 > --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-02-07 16:59:50 IP:202.39.xxx.xxx 未訂閱
1.小弟的 PC 是 NT 4.0, 用的是包子大人 所提供的第一個連結的 dWinlock 的 Demo 程式 試驗 Disable Ctrl Alt Del 的結果可以 美中不足的是畫面會閃一下 2.在包子大人及眾家高手面前, 不要稱小弟為大大啦! :-) -- 將進酒 杯莫停 與君歌一曲 請君為我傾耳聽 (hagar@gcn.net.tw)
ko
資深會員


發表:28
回覆:785
積分:444
註冊:2002-08-14

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-02-07 17:14:43 IP:61.221.xxx.xxx 未訂閱
RaynorPao大大: 沒錯那2篇其中一篇http://delphi.about.com/library/weekly/aa012103a.htm 上面寫到要用dWinlock的物件來做Disable的動作,可是他還有連結一篇不用dWinlock的,我就是參考後才有問題... 結論:呼叫
------
======================
昏睡~
不昏睡~
不由昏睡~
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-02-07 17:26:09 IP:203.73.xxx.xxx 未訂閱
引言: RaynorPao大大: 沒錯那2篇其中一篇http://delphi.about.com/library/weekly/aa012103a.htm 上面寫到要用dWinlock的物件來做Disable的動作,可是他還有連結一篇不用dWinlock的,我就是參考後才有問題... < face="Verdana, Arial, Helvetica"> ko 你好: 請問....你是參考哪一篇文章的呢??< > 能不能麻煩你貼上來呢??< > hagar 兄你好: 客氣了~~多謝你的熱心分享喔 --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#9 引用回覆 回覆 發表時間:2003-02-07 17:29:55 IP:202.39.xxx.xxx 未訂閱
小弟節錄 Resolution 那段如下: RESOLUTION You can disable CTRL+ESC on a system-wide basis by replacing  the NT Task Manager. This is not recommended.  You can disable ALT+TAB and ALT+ESC while a particular application is running if that application registers hotkeys for those  combinations with Register HotKey().     Another mechanism to disable these key combinations, as well as  the newer Windows key, is to use a low level keyboard hook  (WH_KEYBOARD_LL). This hook is available on Windows NT 4.0  Service Pack 3 and later. The low level keyboard hook can also detect CTRL ALT DEL, but it cannot disable it. 如果是有關紅色那部份的話 Ctrl Alt Del 是沒法 Disable 的 再看您前面的回答 您用到 SystemParamterInfo 這個 API 這個用法只適用在 Win9x 系列 在 Win2000/XP/NT 下是行不通的 -- 將進酒 杯莫停 與君歌一曲 請君為我傾耳聽 (hagar@gcn.net.tw)
evon
一般會員


發表:1
回覆:10
積分:2
註冊:2003-02-19

發送簡訊給我
#10 引用回覆 回覆 發表時間:2003-02-19 04:17:13 IP:211.78.xxx.xxx 未訂閱
利用 SPI_SCREENSAVERRUNNING 來障避Disable Ctrl Alt Del 只適用在 Win9x & WinMe 不適用於 NT級作業系統 如 WinNt,Win2000,Win XP 我搜尋了各種資料,目前並沒有人提供可用(NT 下)的方法!! 如果為了擔心程式被惡意結束,建議您向木馬程式的方式。 利用自己所 Create Thread 注射到 Explorer.exe 在 Thread.Execute 中不斷的檢查程式是否存在! 不在,則重新呼叫!
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#11 引用回覆 回覆 發表時間:2003-02-19 08:16:43 IP:202.39.xxx.xxx 未訂閱
引言: 我搜尋了各種資料,目前並沒有人提供可用(NT 下)的方法!!
http://delphi.about.com/library/weekly/aa012103a.htm 上述網址中的元件 即可 disable NT 系列中的 Ctrl Alt Del 鍵 作法是重寫 Gina.DLL
ko
資深會員


發表:28
回覆:785
積分:444
註冊:2002-08-14

發送簡訊給我
#12 引用回覆 回覆 發表時間:2003-02-19 10:35:13 IP:61.221.xxx.xxx 未訂閱
感謝hagar兄,RaynorPao兄,evon等大大熱情的回應: 最近比較忙,粉久沒上k.top~ 以下是我所看到的文章,請參閱: Disable task switching Using the SystemParametersInfo API function you can trick Windows into thinking that the screen saver is running. Doing so disables the Ctrl-Alt-Delete key sequence from displaying the "Close Program" dialog and rebooting the computer and Alt-Tab from switching to another application. It also stops Ctrl-Esc from opening the Start Menu. If you wish to disable those keys while your application is running call the following SystemKeys function (place it in the Implementation section of your unit's code - and call from any procedure in your application - where needed). When you call SystemKeys, if Disable is True, the keys will be disabled, False otherwise. procedure SystemKeys(Disable: Boolean); var OldVal : LongInt; begin SystemParametersInfo (SPI_SCREENSAVERRUNNING, Word(Disable), @OldVal, 0); end; 其中98的部分是可以完成,但是沒注意看hagar兄post的那段,至於改寫Gina.DLL 是可行的!感謝hagar大大大力支持 也感謝,參予文章的各位大大!!!
------
======================
昏睡~
不昏睡~
不由昏睡~
evon
一般會員


發表:1
回覆:10
積分:2
註冊:2003-02-19

發送簡訊給我
#13 引用回覆 回覆 發表時間:2003-02-19 15:23:22 IP:211.78.xxx.xxx 未訂閱
to hagar : 謝謝指教!
系統時間:2024-04-28 17:23:47
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!