ynzsc001 发表于 2023-7-6 15:45:05

悬浮窗不知道的怎么显示动态数据

由于是初学者,试着改软件例程实现悬浮窗   显示GPS实时海拔数据,课怎么弄也弄不出来。希望有董的前辈指导哈。(目前的积分不够最低标准20分)
事件 按钮1.被单击()
        如果 位置传感器1.设备是否有效() = 真 则
                如果 位置传感器1.设备是否已开启() = 假 则
                        信息框("提示","请先开启GPS!","确定")
                        位置传感器1.打开设置界面()                       
                否则       
                        位置传感器1.开始监测()
                结束 如果
        否则
                信息框("错误","GPS设备无效!","确定")
        结束 如果
结束 事件

事件 位置传感器1.位置改变(纬度 为 双精度小数型,经度 为 双精度小数型,海拔 为 双精度小数型,速度 为 双精度小数型,方向 为 双精度小数型)

        标签1.标题 = "海拔:" & 海拔\1 & "m"
        标签2.标题 = "精度:" & 位置传感器1.取精度()\1 & "m"
结束 事件

事件 主窗口.创建完毕()
                如果 权限操作1.取系统版本号()>=23 则
                如果 权限操作1.检查创建悬浮按钮权限() = 假 则
                        权限操作1.申请创建悬浮按钮权限()
                结束 如果
        结束 如果
结束 事件


事件 权限操作1.申请创建悬浮按钮权限完毕(申请结果 为 逻辑型)
        如果 申请结果 = 真 则
                弹出提示("申请悬浮窗权限成功")
        否则       
                弹出提示("申请悬浮窗权限失败")
        结束 如果
结束 事件


事件 按钮2.被单击()
                如果 权限操作1.取系统版本号()>=23 则
                如果 权限操作1.检查创建悬浮按钮权限() = 真 则
                        创建悬浮按钮(" 海拔:",红色,15,无色,"icon.png",600,200,取绝对像素(100),取绝对像素(50))
                否则       
                        弹出提示("没有悬浮窗权限,请到系统设置里开启悬浮窗权限")
                结束 如果
        否则       
                创建悬浮按钮("海拔",红色,9,无色,"icon.png",0,0,500,500)
        结束 如果
结束 事件

事件 权限操作1.申请完毕(权限数组 为 文本型(),申请结果 为 整数型())
       
结束 事件

kfyd163 发表于 2023-7-8 09:33:23

都没会的吗

QQ306736786 发表于 2023-8-25 17:48:44

新手学习中

congna 发表于 2023-9-10 06:20:26

kfyd163 发表于 2023-7-8 09:33
都没会的吗

应该是最近几年 都开启了收费风 没人愿意分享经验了 以前教程都免费 现在腾讯带头搞收费
页: [1]
查看完整版本: 悬浮窗不知道的怎么显示动态数据