【开源】＝＝API打造屏幕挂机锁＝＝

610761555

即兴查API写的小程序；
功能比较简陋的一个屏幕锁，供学习交流使用！
主要功能：
窗口自适应系统分辨率；
控件居中；
窗口无边框；
窗口透明；

游客，如果您要查看本帖隐藏内容请回复

1. 空间 TLL示例
   
2. var hwnd,GWL_EXSTYLE,GWL_STYLE,WS_EX_LAYERED
   
3. 
   
4. 功能 锁屏_点击()
   
5.     control.show("锁屏",false)
   
6.     var ret,桌面_宽,桌面_高,已锁定_宽,已锁定_高,已锁定_x,已锁定_y,解锁_宽,解锁_高,密码_宽,密码_高
   
7.     window.setwindowtop(hwnd) //窗口置顶
   
8.     system.getscreen(桌面_宽,桌面_高) //取系统分辨率
   
9.     window.setwindowsize(hwnd,桌面_宽,桌面_高) //置窗口大小
   
10.     window.setwindowpos(hwnd,0,0) //设置窗口位置
    
11.     //控件根据系统分辨率居中排列
    
12.     window.getwindowsize(control.gethandle("已锁定"),已锁定_宽,已锁定_高) //取控件宽和高
    
13.     window.getwindowsize(control.gethandle("解锁"),解锁_宽,解锁_高)
    
14.     window.getwindowsize(control.gethandle("密码"),密码_宽,密码_高)
    
15.     已锁定_x=桌面_宽/2-(已锁定_宽+解锁_宽+密码_宽)/2
    
16.     已锁定_y=桌面_高/2-已锁定_高/2
    
17.     control.setpos("已锁定",已锁定_x,已锁定_y,0,0,1)
    
18.     control.setpos("解锁",已锁定_x+已锁定_宽,已锁定_y,0,0,1)
    
19.     control.setpos("密码",已锁定_x+已锁定_宽+解锁_宽,已锁定_y,0,0,1)
    
20.    
    
21.     窗口底色=13160660 //窗口自身底色
    
22.     透明方式=2 //dwFlags是透明方式，可以取两个值：LWA_ALPHA=2  LWA_COLORKEY=1
    
23.     透明度=50
    
24.    
    
25.     ret=dllcall("user32","int","GetWindowLongA","int",hwnd,"int",GWL_EXSTYLE)
    
26.     ret=ret+WS_EX_LAYERED
    
27.     dllcall("user32","int","SetWindowLongA","int",hwnd,"int",GWL_EXSTYLE,"int",ret)
    
28.     dllcall("user32","int","SetLayeredWindowAttributes","int",hwnd,"int",窗口底色,"int",透明度,"int",透明方式)
    
29. 功能结束
    
30. 
    
31. 功能 初始化()
    
32.     control.show("热键0",false)
    
33.     hwnd=window.getmyhwnd() //取窗口句柄
    
34.     GWL_EXSTYLE=-20  //扩展窗口风格
    
35.     GWL_STYLE=-16
    
36.     WS_EX_LAYERED=524288 //窗口扩展属性
    
37.     //去除边框
    
38.     dllcall("user32.dll","int","SetWindowLongA","int",hwnd,"int",GWL_EXSTYLE,"int",256)
    
39.     dllcall("user32.dll","int","SetWindowLongA","int",hwnd,"int",GWL_STYLE,"int",WS_EX_LAYERED)
    
40. 功能结束
    
41. 
    
42. 功能 热键0_热键()
    
43.     help.exit()
    
44. 功能结束
    
45. 
    
46. //点击关闭_执行操作
    
47. 功能 TLL示例_关闭()
    
48.     return false
    
49. 功能结束
    
50. 
    
51. 
    
52. 功能 解锁_点击()
    
53.     var 密码
    
54.     密码=edit.gettext("密码")
    
55.     if(密码=="123456")
    
56.         help.exit()
    
57.     endif
    
58. 功能结束
    
59. 
    
60. 空间结束

复制代码

【其它源码】
【开源】 ▇▇5173/UU898/17173交易信息查询▇▇
【开源】▇▇多线程控制台框架式/带界面/换游戏也不愁▇▇
【原创开源】一键读写界面全部控件配置_0827-1512
局域网聊天实例－－TC源码
自动取激活码激活游戏】

ZCL

SEEEEEEEEEEEEEEEEEEEEEEEEEE

wenbostudio

文防擦

lp781004

我来看看

hourglass1

6666666

1364770121

666666

mln8624939

这个非常好 我喜欢

q979033318

xsm1974

感谢分享，好东东啊。

y854271613

不能把你