e4a连接HC05蓝牙模块出错控制51单片机 -

标题: e4a连接HC05蓝牙模块出错控制51单片机 [打印本页]

作者: gaojiaxin123 时间: 2020-5-22 11:20
标题: e4a连接HC05蓝牙模块出错控制51单片机
我用e4a写的app，用来控制51单片机。虽然这个app可以搜索到蓝牙模块HC05的名称和地址，但是显示配对不成功（False），也连接不上，下面是蓝牙连接的代码和app的界面显示，请大佬帮我看看到底是哪里出了问题？谢谢了！

事件主窗口.创建完毕()
      标签3.背景颜色=无色
      标签4.背景颜色=无色
      图片框1.背景颜色=无色
      图片框3.背景颜色=无色
      按钮7.可用=假
      按钮9.可用=假
      K1开关="1"
      K2开关="1"
      K3开关="1"
      如果蓝牙1.是否存在() = 假则
            信息框("信息","本机找不到蓝牙设备，程序将退出！","确定")
            结束程序()
      结束如果

      如果蓝牙1.是否已开启() = 假则
         蓝牙1.开启蓝牙()
      结束如果
结束事件

事件蓝牙1.蓝牙设置完毕(设置结果为整数型)
      判断设置结果
            分支 1 '开启蓝牙
                     弹出提示("蓝牙已开启")
                     蓝牙1.置可被发现() '置可被发现
            分支 2       '不开启蓝牙
                     信息框("信息","蓝牙未被开启，程序将退出！","确定")
                     结束程序()
            分支 3       '置可被发现
                     弹出提示("蓝牙已设置为可被发现")
                     蓝牙1.置工作模式(2) '蓝牙串口通信
            分支 4       '不置可被发现
                     信息框("信息","蓝牙未被设置为可被发现，程序将退出！","确定")
                     结束程序()
      结束判断
结束事件

事件按钮1.被单击()
      蓝牙1.断开连接()
      按钮3.可用=假
      按钮7.可用=假
      按钮9.可用=假
      按钮1.标题 = "搜索设备"
      列表框1.可视=真
      列表框1.清空项目()
      蓝牙1.搜索设备() '搜索设备
      弹出提示("正在搜索")
结束事件

事件蓝牙1.发现设备(设备名称为文本型,设备地址为文本型,是否已配对为逻辑型)
      如果是否已配对则
            列表框1.添加项目(设备名称 & "/" & 设备地址 & "/" & "(已配对)")
      则
            列表框1.添加项目(设备名称 & "/" & 设备地址 & "/" & "(未配对)")
结束事件

事件列表框1.表项被单击(项目索引为整数型)
      变量设备信息为文本型
      变量文本数组为文本型()
      变量设备地址为文本型
      设备信息 = 列表框1.取项目内容(项目索引)
      文本数组 = 分割文本(设备信息,"/")
      设备地址 = 文本数组(1)
      弹出提示(设备地址)
      蓝牙1.停止搜索()
      蓝牙1.连接设备(设备地址)'连接设备
      弹出提示("正在连接")
结束事件

事件蓝牙1.连接完毕(连接结果为逻辑型,设备名称为文本型,设备地址为文本型,连接模式为整数型)
      变量设备信息为文本型
      变量文本数组为文本型()
      如果连接结果 = 真则
            按钮1.标题 = "已连接"
            列表框1.可视=假
         按钮7.可用=真
         按钮9.可用=真
      否则
            弹出提示("连接失败")
      结束如果
结束事件

作者: 51hei**1140 时间: 2020-5-22 17:05
你好！
有一部分不能连接和手机蓝牙硬件模块有关

作者: zqy181818 时间: 2020-5-23 12:36
发生的APK出来让大伙试试看。是不是APP的问题。

作者: 哎呀呀a 时间: 2020-5-23 20:06
可能是app的问题

欢迎光临 (http://www.51hei.com/bbs/)