当前位置:首页 > 文章中心 > 正文内容

「按键精灵」做一个日志窗口,别管实不实用,反正就是好看

dgx6667个月前 (05-15)文章中心25

大家好,我是公众号3分钟学堂的郭立员~

前言

在群里看到他们发了一个日志窗口的截图,大家都说很高级很好看,所以我用ps临摹了一个。

截图中日志窗口是别的软件的,所以我打算给按键做一个这种效果的日志窗口。

一、看一下效果图


二、制作原理

在默认的悬浮窗上添加一个半透明的背景图片,让它看起来好看一些。

三、制作步骤

在按键中悬浮窗就相当于一个word文档,可以加文字,加图片,修改位置,修改尺寸,设置颜色等等

下面我就逐步给大家讲解编写过程。

①新建一个空白的悬浮窗,包括新建悬浮窗命令和展示悬浮窗命令,之后所有的悬浮窗效果都放在这两个命令之间。

FW.NewFWindow "浮窗名", 20, 50, 435, 520
//之后添加的所有内容和效果都放在这个位置


FW.Show ("浮窗名")
Delay 15000


考虑到背景图的大小,这里悬浮窗设置的是435*520的尺寸,当然悬浮窗是可以根据你设置的尺寸缩放背景图的,为了实际像素显示,我设置的这个尺寸。

我们自己编写悬浮窗代码时,一定要注意浮窗名和控件名称不能写错字

浮窗名就是整个悬浮窗的名称,一般只有一个。

控件名称就是悬浮窗里面的内容,比如文字,图片,按钮,这些东西的名称。

记住不要有错别字,不要有错别字,不要有错别字!

②悬浮窗设置背景图

FW.NewFWindow "浮窗名", 20, 50, 435, 520
//以下是新增内容
FW.SetPicture ("浮窗名", "/sdcard/pictures/bg.png")


FW.Show ("浮窗名")
Delay 15000


添加了一个FW.SetPicture命令,图片就是我临摹的背景图

③添加标题文字:日志窗口

写标题文字的同时,我把文字颜色,文字大小位置一起设置了

FW.NewFWindow "浮窗名", 20, 50, 435, 520
FW.SetPicture ("浮窗名", "/sdcard/pictures/bg.png")
//以下是新增内容
FW.AddTextView ("浮窗名", "标题", "日志窗口", 170, 20, 300, 45)
FW.SetTextColor("标题","e7d86b")
FW.SetTextSize ("标题", 15)


FW.Show ("浮窗名")
Delay 15000


④添加日志正文

日志正文的和标题添加方法是一样,也是添加文字后设置文字大小、位置、颜色,具体参数根据。

不同支持就是正文是要显示多行内容的。

显示方法是在换行位置加上\n,它是换行符,加上它以后自动变成多行。

FW.NewFWindow "浮窗名", 20, 50, 435, 520
FW.SetPicture ("浮窗名", "/sdcard/pictures/bg.png")
FW.AddTextView ("浮窗名", "标题", "日志窗口", 170, 20, 300, 45)
FW.SetTextColor("标题","e7d86b")
FW.SetTextSize ("标题", 15)
//以下是新增内容
FW.AddTextView ("浮窗名", "正文", "2022-10-13 9:15:20 日志检测中...\n2022-10-13 9:15:20 日志检测中...", 30, 60, 300, 45)
FW.SetTextColor("正文","e7d86b")
FW.SetTextSize("正文",13)


FW.Show ("浮窗名")
Delay 15000



⑤添加关闭按钮

样式方面我设置的是深色背景按钮,上面有一个浅色的大写的X

功能方面调用了一个关闭悬浮窗显示的函数。

位置大小这些根据实际情况进行调整。

FW.NewFWindow "浮窗名", 20, 50, 435, 520
FW.SetPicture ("浮窗名", "/sdcard/pictures/bg.png")
FW.AddTextView ("浮窗名", "标题", "日志窗口", 170, 20, 300, 45)
FW.SetTextColor("标题","e7d86b")
FW.SetTextSize ("标题", 15)
FW.AddTextView ("浮窗名", "正文", "2022-10-13 9:15:20 日志检测中...\n2022-10-13 9:15:20 日志检测中...", 30, 60, 300, 45)
FW.SetTextColor("正文","e7d86b")
FW.SetTextSize("正文",13)
//以下是新增内容
FW.AddButton("浮窗名", "按键", "X", 370, 30, 30, 30)
FW.SetBackColor("按键","000000")
FW.SetTextColor("按键","e7d86b")
FW.SetOnClick("按键", 关闭悬浮窗)


FW.Show ("浮窗名")
Delay 15000


Function 关闭悬浮窗()
  FW.Close("浮窗名")
End Function


⑥增加一个悬浮窗可移动的属性

添加了FW.IsTouchMove ("浮窗名", 1),整个悬浮窗展示效果就完成了。

FW.NewFWindow "浮窗名", 20, 50, 435, 520
FW.SetPicture ("浮窗名", "/sdcard/pictures/bg.png")
FW.AddTextView ("浮窗名", "标题", "日志窗口", 170, 20, 300, 45)
FW.SetTextColor("标题","e7d86b")
FW.SetTextSize ("标题", 15)
FW.AddTextView ("浮窗名", "正文", "2022-10-13 9:15:20 日志检测中...\n2022-10-13 9:15:20 日志检测中...", 30, 60, 300, 45)
FW.SetTextColor("正文","e7d86b")
FW.SetTextSize("正文",13)
FW.AddButton("浮窗名", "按键", "X", 370, 30, 30, 30)
FW.SetBackColor("按键","000000")
FW.SetTextColor("按键","e7d86b")
FW.SetOnClick("按键", 关闭悬浮窗)
FW.IsTouchMove ("浮窗名", 1)


FW.Show ("浮窗名")
Delay 15000


Function 关闭悬浮窗()
  FW.Close("浮窗名")
End Function


⑦日志内容的更新展示

想让文字变化,需要用FW.SetTextView重新设置要展示的文字内容;

如果想要文字有滚动效果,还要用一个数组存储文字,新增一条日志,就要删除一条旧的日志;

想要日志窗口长时间停留在屏幕上,需要多线程,单独一个线程用来展示日志窗口。

关于这部分的源码,我在之前的一篇文章已经写过,大家可以点击链接,查看。

【源码分享】给按键脚本做一个日志悬浮窗


四、常见问题

问:这个日志窗口影不影响找图找色?

答:影响!别管实不实用,反正就是好看。


五、获取背景图的方法

滑到文章底部,点赞文章,然后联系我,备注【背景图】找我领取。

如果你看到其他好看的背景图需要临摹,也可以在评论区留言告诉我。

扫描二维码推送至手机访问。

版权声明:本文由第六芝士网发布,如需转载请注明出处。

本文链接:http://www.dgx666.com/post/1625.html

分享给朋友:

“「按键精灵」做一个日志窗口,别管实不实用,反正就是好看” 的相关文章

CAD打开运行时出现致命错误,这三种解决办法亲测有效

本人使用CAD十余年,并有从事CAD专业教学的工作。所以不管是自己使用CAD还是我的学员使用CAD,都有遇到过这么一个问题,就是CAD打开运行时会出现致命错误。如下图。这个情况很多同学都会遇到过,而且不管是重装CAD或者换版本可能还是会出现这问题。因为出现这种问题的原因比较杂乱,所以接下来给大家分享...

AutoCAD一打开就崩溃闪退怎么解决呢?

我们在使用cad2010或者cad2012、cad2014版本的cad大都会出现打开就崩溃闪退的情况,那么出现这种情况到底如何解决呢?我试过卸载cad并且重新安装cad并且重新用注册机注册激活,但是打开依然还是闪退,还是崩溃,那么到底如何解决cad闪退的问题呢?通过我的一番试验和查找,终于亲测找到了...

各种软件自下载

室内/外设计 AutoCAD CAD2004 CAD2004下载地址:链接:http://pan.baidu.com/s/1i5lBAQT 密码:y02h CAD2005 CAD2005下载地址:链接:http://pan.baidu.com/s/1jI02Bn4 密码:u3je CAD2006 C...

天正CAD软件批量导入坐标技巧总结,学会后轻松变高手

excel坐标批量导入cad的方法如下:步骤一、cad如何批量导入坐标?首先,将要批量导入CAD的高程坐标导入到excel中。步骤二、在excel中新建E列为展点划线,新建F列为注释。步骤三、在excel表格的E列中输入如下公式:【="line"&B2&","&C2】,在F列中输入如下公式:【="-...

「AutoCAD之快捷工具」CAD自带黑科技Express Tools (ET)概述

【AutoCAD之快捷工具】CAD自带黑科技Express Tools (ET)概述神秘的安装选项CAD中有一个"犹抱琵琶半遮面"的家伙从AutoCAD 2006开始在安装软件时出现了一个叫做"express tools"的拓展选项在安装的过程之默认为:"不安装"(在此顺便鄙视一下那些强制安装、隐藏...

如何在圆柱与圆锥面上绘制文字,关键在于SolidWorks包覆命令

今天给大家分享一个小技巧,是关于包覆命令在圆柱和圆锥面上的如何使用进行文字内容绘制,以及需要注意的事项。1. 首先我们打开 Solidworks2018软件,点击拉伸凸台,选择上视基准面,绘制一个圆,如图所示:2. 我们绘制好草图之后,选择完成,点击拉伸,如图所示:3.完成拉伸后,我们选择草图里面的...