最单调的 GPS海拔 监测
最单调的GPS海拔监测，发出来是为了赚积分问问题的。前辈些别骂我哈！{:4_108:}'注意：位置传感器组件对手机的GPS硬件要求较高，如果手机GPS硬件无法正常定位，则本组件无法获得任何定位信息
事件 按钮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.申请完毕(权限数组 为 文本型(),申请结果 为 整数型())
结束 事件
有知道的前辈指导哈，我这个GPS数据海拔要怎么才能显示到悬浮窗中？
666666666666666666 易如意中文编程学习交流论坛有你更精彩~
页:
[1]