VFP 愛用者社區

[goto-dream]

不允許用戶按下 CTRL + ALT + DEL 來退出應用
http://202.195.143.200/gonggong/800/vfp/jishu/014.htm

<在NT下不能用>
DECLARE INTEGER SystemParametersInfo IN win32api INTEGER,INTEGER,INTEGER,INTEGER
retval = 0

#DEFINE CAN_OP 0 && 允許作三指操
#DEFINE CAN_NOT_OP 1 && 不允許作三指操

ret = SystemParametersInfo(97,CAN_NOT_OP,retval,0)
WAIT WINDOW "現在,按下 CTRL+ALT+DEL 試一下" +CHR(13)+;
"要想恢復 Windows 的允許CTRL+ALT+DEL功能"+CHR(13)+;
"以 ret = SystemParametersInfo(97,CAN_OP 1,retval,0) 再調用一次該函數" NOWAIT

*-- ret = SystemParametersInfo(97,CAN_OP,retval,0)