屏幕水印例子

sw3425369

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

' VXdk15668696195
' 'QQ13288793
_启动窗口.左边 ＝ 0
_启动窗口.顶边 ＝ 0
_启动窗口.宽度 ＝ 取屏幕宽度 ()
_启动窗口.高度 ＝ 取屏幕高度 ()
画板1.左边 ＝ 0
画板1.顶边 ＝ 0
画板1.宽度 ＝ 取屏幕宽度 ()
画板1.高度 ＝ 取屏幕高度 ()
总在最前 ＝ 真
窗口_置透明颜色 (取窗口句柄 (), #天蓝 )
' 窗口_置透明度 (取窗口句柄 (), 100, #天蓝, 真)

子程序名	返回值类型	公开	备 注
添加水印	字节集		窗口首次激活后才能用不能在创建完毕时候使用
参数名	类 型	参考	可空	数组	备 注
文字	文本型

变量名	类 型	静态	数组	备 注
i	整数型
s	整数型
f	整数型
横向	整数型
图1	字节集

画板1.文本颜色 ＝ 取颜色值 (135, 206, 250)
画板1.画笔粗细 ＝ 5
画板1.字体.字体大小 ＝ 25
画板1.字体.角度 ＝ 3150 ＋ 200
计次循环首 (15, f)
如果 (f ％ 2 ＜ 1)
s ＝ -150


s ＝ 0

计次循环首 (10, i)
如果 (f ％ 2 ＜ 1)
s ＝ s ＋ 200
画板1.定位写出 (横向, s, 文字)


画板1.定位写出 (横向, s, 文字)
s ＝ s ＋ 200

计次循环尾 ()
横向 ＝ f × 300
计次循环尾 ()
图1 ＝ 画板1.取图片 (取屏幕宽度 (), 取屏幕高度 ())
' 窗口_置透明度 (水印窗口.取窗口句柄 (), 100, 取颜色值 (0, 0, 94), 真)
' 画板1.重画 ()
' 画板1.清除 (, , , )
' 画板1.销毁 ()
返回 (图1)

子程序名	返回值类型	公开	备 注
__启动窗口_首次激活

_启动窗口.底图 ＝ 添加水印 (“阿斯顿”)
窗口_置透明度 (_启动窗口.取窗口句柄 (), 100, #天蓝, 真)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> ' VXdk15668696195<br /> ' 'QQ13288793<br /> _启动窗口.左边 ＝ 0<br /> _启动窗口.顶边 ＝ 0<br /> _启动窗口.宽度 ＝ 取屏幕宽度 ()<br /> _启动窗口.高度 ＝ 取屏幕高度 ()<br /> 画板1.左边 ＝ 0<br /> 画板1.顶边 ＝ 0<br /> 画板1.宽度 ＝ 取屏幕宽度 ()<br /> 画板1.高度 ＝ 取屏幕高度 ()<br /> 总在最前 ＝ 真<br /> 窗口_置透明颜色 (取窗口句柄 (), #天蓝)<br /> ' 窗口_置透明度 (取窗口句柄 (), 100, #天蓝, 真)<br /> <br /> .子程序 添加水印, 字节集, , 窗口首次激活后才能用不能在创建完毕时候使用<br /> .参数 文字, 文本型, 可空<br /> .局部变量 i, 整数型<br /> .局部变量 s, 整数型<br /> .局部变量 f, 整数型<br /> .局部变量 横向, 整数型<br /> .局部变量 图1, 字节集<br /> <br /> <br /> 画板1.文本颜色 ＝ 取颜色值 (135, 206, 250)<br /> 画板1.画笔粗细 ＝ 5<br /> 画板1.字体.字体大小 ＝ 25<br /> 画板1.字体.角度 ＝ 3150 ＋ 200<br /> .计次循环首 (15, f)<br /> <br />     .如果 (f ％ 2 ＜ 1)<br />         s ＝ -150<br />     .否则<br /> <br />         s ＝ 0<br />     .如果结束<br /> <br />     .计次循环首 (10, i)<br /> <br />         .如果 (f ％ 2 ＜ 1)<br />             s ＝ s ＋ 200<br />             画板1.定位写出 (横向, s, 文字)<br />         .否则<br /> <br /> <br />             画板1.定位写出 (横向, s, 文字)<br />             s ＝ s ＋ 200<br />         .如果结束<br /> <br />     .计次循环尾 ()<br /> <br />     横向 ＝ f × 300<br /> .计次循环尾 ()<br /> <br /> 图1 ＝ 画板1.取图片 (取屏幕宽度 (), 取屏幕高度 ())<br /> <br /> <br /> <br /> <br /> <br /> ' 窗口_置透明度 (水印窗口.取窗口句柄 (), 100, 取颜色值 (0, 0, 94), 真)<br /> <br /> ' 画板1.重画 ()<br /> ' 画板1.清除 (, , , )<br /> ' 画板1.销毁 ()<br /> <br /> 返回 (图1)<br /> <br /> .子程序 __启动窗口_首次激活<br /> <br /> <br /> _启动窗口.底图 ＝ 添加水印 (“阿斯顿”)<br /> 窗口_置透明度 (_启动窗口.取窗口句柄 (), 100, #天蓝, 真)

qweqwe28

学习了，谢谢大佬

liangshenda

感谢无私

莫良

请问设置字体颜色为**但实际还是有蓝色，这是咋回事呢

莫良

感谢无私

xcw

支持开源~！感谢分享

xiaobo66

这好准备做一个屏幕水印没思路 巧了 找到了

xuwenchuan

支持开源谢谢分享

12240771

真心不错，水印是倾斜的。可以用来改一改。写出个电脑背景。做信息安全提醒不错。
嘿嘿。谢谢

业余爱好学编程

谢谢楼主无私分享，收藏学习