vf 锁屏代码

Question

就用vfp 语言编写的小的锁屏程序。望大侠帮忙。

Answer 1

可以这样设计：
1.在WINDOWS中设置恢复屏保时需要密码。
2.以VFP程序启动屏幕保护程序

下面的代码启动屏保：
Declare integer SendMessage in user32 integer,integer,integer,integer
Declare integer FindWindow in Win32api string, string

fhwnd = FindWindow(0, _screen.caption)
#Define wMsg 274
#Define wParam -3776
#Define wPsave 61760

*= SendMessage(fhWnd, wMsg, wParam, 0)
= SendMessage(fhwnd, wMsg, wPsave, 0) &&开始屏幕保护

clea dlls
retu