Qt 5.8 | Qt Bluetooth | QML Bluetooth Picture Push Example | DeviceDiscovery.qml Example File

Qt 5.8.0 Reference Documentation

# DeviceDiscovery.qml Example File

picturetransfer/DeviceDiscovery.qml

      /****************************************************************************
      **
      ** Copyright (C) 2013 BlackBerry Limited. All rights reserved.
      ** Copyright (C) 2015 The Qt Company Ltd.
      ** Contact: http://www.qt.io/licensing/
      **
      ** This file is part of the QtBluetooth module of the Qt Toolkit.
      **
      ** $QT_BEGIN_LICENSE:BSD$
      ** You may use this file under the terms of the BSD license as follows:
      **
      ** "Redistribution and use in source and binary forms, with or without
      ** modification, are permitted provided that the following conditions are
      ** met:
      **   * Redistributions of source code must retain the above copyright
      **     notice, this list of conditions and the following disclaimer.
      **   * Redistributions in binary form must reproduce the above copyright
      **     notice, this list of conditions and the following disclaimer in
      **     the documentation and/or other materials provided with the
      **     distribution.
      **   * Neither the name of The Qt Company Ltd nor the names of its
      **     contributors may be used to endorse or promote products derived
      **     from this software without specific prior written permission.
      **
      **
      ** THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
      ** "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
      ** LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
      ** A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
      ** OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
      ** SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
      ** LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
      ** DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
      ** THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
      ** (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
      ** OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE."
      **
      ** $QT_END_LICENSE$
      **
      ****************************************************************************/

      import QtQuick 2.1
      import QtBluetooth 5.2

      Item {
          Rectangle {
              id: title
              opacity: 0.7
              height: titleLabel.height + 90
              anchors.left: parent.left
              anchors.right: parent.right
              anchors.top: parent.top
              anchors.margins: 100

              color: "#5c9fba"
              Text {
                  id: titleLabel
                  text: "Select device"
                  color: "black"
                  font.pointSize: 15
                  anchors.centerIn: parent
              }
          }

          ListView {
              id: listView
              anchors.left: parent.left
              anchors.right: parent.right
              anchors.bottom: parent.bottom
              anchors.top: title.bottom
              anchors.topMargin: 0
              anchors.margins: 100
              clip: true
              add: Transition {
                  NumberAnimation { properties: "x"; from: 1000; duration: 500 }
              }
              model: BluetoothDiscoveryModel {
                  discoveryMode: BluetoothDiscoveryModel.DeviceDiscovery
                  onErrorChanged: {
                      if (error == BluetoothDiscoveryModel.NoError)
                          return;
                      if (error == BluetoothDiscoveryModel.PoweredOffError)
                          titleLabel.text = "Bluetooth turned off";
                      else
                          titleLabel.text = "Cannot find devices";
                  }
              }

              delegate: Button {
                  width: listView.width + 2
                  text: model.name
                  onClicked: root.remoteDevice = model.remoteAddress
              }
          }
      }