Перейти к содержанию
Fire Monkey от А до Я
  • 0

[Android] Ошибка при подключении к устройству


estra

Вопрос

Пытаюсь подключиться к принтеру по Bluetooth, код следующий:

procedure TForm1.Button2Click(Sender: TObject);
var
  Manager: TBluetoothManager;
  Adapter: TBluetoothAdapter;
  Devices: TBluetoothDeviceList;
  Device: TBluetoothDevice;
  i: Integer;

  ClientSocket: TBluetoothSocket;
begin
   Manager := TBluetoothManager.Current;
   Adapter := Manager.CurrentAdapter;
   Devices := Manager.GetPairedDevices( Adapter );

   for i := 0 to Devices.Count-1 do
      if Devices[i].DeviceName = 'BT-SPP' then
      begin
         Device := Devices[i];
         Break;
      end;

   ClientSocket := Device.CreateClientSocket( BTChat_UUID, False );
   ClientSocket.Connect;
end;

На строчке ClientSocket.Connect получаю ошибку:

 

java.io.IOException: read failed, socket migth closed ot timeout, read ret: -1.

 

Что не так, почему не получается подключиться?

Ссылка на комментарий

Рекомендуемые сообщения

  • 0

Такая же ошибка и у меня.

Вот тут есть решение, вроде бы, http://stackoverflow.com/questions/25698585/bluetooth-connection-failed-java-io-ioexception-read-failed-socket-might-clos

Помогите переделать код на Delphi

ry {

                bluetoothSocket.connect();
                success = true;
                break;
            } catch (IOException e) {
                //try the fallback
                try {
                    Class<?> clazz = tmp.getRemoteDevice().getClass();
                    Class<?>[] paramTypes = new Class<?>[] {Integer.TYPE};
                    Method m = clazz.getMethod("createRfcommSocket", paramTypes);
                    Object[] params = new Object[] {Integer.valueOf(1)};
                    bluetoothSocket  = (BluetoothSocket) m.invoke(tmp.getRemoteDevice(), params);
                    Thread.sleep(500);
                    bluetoothSocket.connect();
                    success = true;
                    break;
Изменено пользователем AlexShaman
Ссылка на комментарий

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

  • Последние посетители   0 пользователей онлайн

    • Ни одного зарегистрированного пользователя не просматривает данную страницу
×
×
  • Создать...