Содержание материала

Работа с Bluetooth в Delphi

Часть 2

 

Вступление

В первой части статьи мы научились получать список локальных радиомодулей Bluetooth и узнавать их свойства.

Теперь пришло время получить список устройств Bluetooth, которые подключены к нашим локальным радиомодулям.

Получение списка устройств Bluetooth

 

Для получения списка устройств Bluetooth нам понадобятся следующие функции (они очень похожи на функции, используемые для получения списка локальных радиомодулей).

BluetoothFindFirstDevice - начинает перечисление устройств Bluetooth.

Объявление функции:

Code:

function BluetoothFindFirstDevice(

          const pbtsp : BLUETOOTH_DEVICE_SEARCH_PARAMS;

          var pbtdi : BLUETOOTH_DEVICE_INFO): HBLUETOOTH_DEVICE_FIND; stdcall;

 

Параметры:

Pbtsp

Указатель на структуру BLUETOOTH_DEVICE_SEARCH_PARAMS. Член dwSize этой структуры должен содержать размер структуры (устанавливается посредством SizeOf(BLUETOOTH_DEVICE_SEARCH_PARAMS)). Член hRadio должен содержать описатель локального радиомодуля, полученный вызовом функции BluetoothFindFirstRadio.

Pbtdi

Структура BLUETOOTH_DEVICE_INFO в которую будет возвращена информации об устройстве Bluetooth.

Возвращаемые значения:

· В случае успешного выполнения функция вернет корректный описатель в качестве результата.
· В случае ошибки будет возвращен 0. Для получения кода ошибки используйте функцию GetLastError

BluetoothFindNextDevice - находит следующее устройство Bluetooth.

Объявление функции:

Code:

function BluetoothFindNextDevice(hFind : HBLUETOOTH_DEVICE_FIND;

                                var pbtdi : BLUETOOTH_DEVICE_INFO): BOOL; stdcall;

 

Параметры:

hFind

Описатель, который вернула функция BluetoothFindFirstDevice

pbtdi

Структура BLUETOOTH_DEVICE_INFO, в которую будет помещена информацию об устройстве

Возвращаемые значения:

· Вернет TRUE, если устройство найдено.
· Вернет FALSE в случае отсутствия устройства. Используйте GetLastError для получения кода ошибки.

BluetoothFindDeviceClose - закрывает описатель перечисления устройств Bluetooth.

Объявление функции:

Code:

function BluetoothFindDeviceClose(hFind : HBLUETOOTH_DEVICE_FIND): BOOL; stdcall;

Добавить комментарий

Не использовать не нормативную лексику.

Просьба писать ваши замечания, наблюдения и все остальное,
что поможет улучшить предоставляемую информацию на этом сайте.

ВСЕ КОММЕНТАРИИ МОДЕРИРУЮТСЯ ВРУЧНУЮ, ТАК ЧТО СПАМИТЬ БЕСПОЛЕЗНО!


Защитный код
Обновить