問：
怎么才能在pb的程序中屏蔽ctrl alt del 和 windows鍵？

答：
借花敬佛 ，ilike大哥的文章：
此程序是調(diào)用SystemParametersInfo API函數(shù)完成。

先定義：

Function uLong SystemParametersInfoA (ulong uAction, ulong uParam, ref

any lpvParam, ulong fuWinIni) Library "user32.dll"
Integer SPI_SCREENSAVERRUNNING = 97
//使Ctrl+Alt+Del失效:
Integer i_ret
any any_value
i_ret = SystemParametersInfoA(SPI_SCREENSAVERRUNNING, 1, any_value, 0)

//恢復(fù)Ctrl+Alt+Del作用:
Integer i_ret
any any_value
i_ret = SystemParametersInfoA(SPI_SCREENSAVERRUNNING, 0, any_value, 0)

上面這段是陶清網(wǎng)站(pb7.nethome.com.cn)上的方法，嚴格來說這段代碼實際是屏蔽了ctrl+alt+del這個鍵的組合，而并非不讓程序出現(xiàn)在任務(wù)列表中。

這種方法有些缺陷：

1.其他程序也無法通過這個ctrl+alt+del關(guān)閉了,有時候有些程序還是需要通過這個鍵關(guān)的。

2.任務(wù)列表并非只能通過ctrl+alt+del打開的，如果通過其他方法打開，那么這種方法就失效了。

下面是讓程序真正不出現(xiàn)在任務(wù)列表的方法：

定義:

function long GetCurrentProcessId ( ) library "kernel32"
function long RegisterServiceProcess ( long dwProcessID, long dwtype )

library "kernel32"

Constant long RSP_SIMPLE_SERVICE = 1
Constant long RSP_UNREGISTER_SERVICE = 0

在application -> open event中:

Long ll_ProcessID
ll_ProcessID = GetCurrentProcessId ( )
RegisterServiceProcess ( ll_ProcessID, RSP_SIMPLE_SERVICE )

這樣程序?qū)⒉怀霈F(xiàn)在任務(wù)列表中，用戶也就無法強行結(jié)束任務(wù)。

記住,在application close event中要加：

Long ll_ProcessID
ll_ProcessID = GetCurrentProcessId ( )
RegisterServiceProcess ( ll_ProcessID, RSP_UNREGISTER_SERVICE)

來釋放資源。
－－－－－－－－－－－－－－－－－－－－
補充：

補充一下，看了DELPHI的API調(diào)用，如果不指定SPI_SCREENSAVERRUNNING的值，就可以屏蔽所有熱鍵，你試試
哦，再找了一下，原來將這個常量設(shè)為97就可以屏蔽ctrl+alt+del,alt+tab,ctrl+esc(window鍵),原理是欺騙wind
續(xù)：欺騙windows正處于屏保狀態(tài)。找得好苦，看來網(wǎng)上的API介紹太不深入了：（
補充：最重要的一點，在NT或2000下是不可以屏蔽的