Магнитола delphi grundig x350bt настроить bluetooth

Добавил пользователь Алексей Ф.
Обновлено: 19.09.2024

Этой статьей хочу начать серию по работе с Bluetooth в Delphi под Microsoft Windows XP.

Все программы написаны на Delphi 6 и тестировались со стандартным стеком Bluetooth от Microsoft под Windows XP + SP2.

Все необходимые библиотеки прилагаются. Так что дополнительно ничего качать не нужно. При разработке использовал только API функции с JEDI.

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

BluetoothFindFirstRadio

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

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

function	BluetoothFindFirstRadio(
const	pbtfrp : PBlueToothFindRadioParams;
var	phRadio : THandle): HBLUETOOTH_RADIO_FIND; stdcall;

pbtfrp - указатель на структуру BLUETOOTH_FIND_RADIO_PARAMS. Член dwSize этой структуры должен содержать размер структуры (устанавливается посредством SizeOf(BLUETOOTH_FIND_RADIO_PARAMS)).
phRadio - описатель (Handle) найденного устройства.

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

BluetoothFindNextRadio

Находит следующий установленный радиомодуль Bluetooth.

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

function	BluetoothFindNextRadio(
hFind : HBLUETOOTH_RADIO_FIND;
var	phRadio : THandle): BOOL; stdcall;

hFind - Описатель, который вернула функция BluetoothFindFirstRadio.
phRadio - Сюда будет помещен описатель следующего найденного радиомодуля.

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

BluetoothFindRadioClose

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

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

function	BluetoothFindRadioClose(
hFind : HBLUETOOTH_RADIO_FIND): BOOL; stdcall;

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

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

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

Напишем такую процедуру. procedure EnumRadio; var hRadio: THandle; BFRP: BLUETOOTH_FIND_RADIO_PARAMS; hFind: HBLUETOOTH_RADIO_FIND; begin // Инициализация структуры BLUETOOTH_FIND_RADIO_PARAMS BFRP.dwSize := SizeOf(BFRP); // Начинаем поиск hFind := BluetoothFindFirstRadio(@BFRP, hRadio); if (hFind <> 0) then begin repeat // Что-то сделать с полученным описателем // Закрыть описатель устройства CloseHandle(hRadio); // Находим следующее устройство until (not BluetoothFindNextRadio(hFind, hRadio)); // Закрываем поиск BluetoothFindRadioClose(hFind); end; end;

Это, конечно, здорово, но в принципе бесполезно. Давайте еще что-нибудь сделаем. Например, получим информацию о радиомодуле Bluetooth.Получение информации о радиомодуле Bluetooth

Для получения информации о радиомодуле Bluetooth используется функция

BluetoothGetRadioInfo

Возвращает информацию о радиомодуле, который представлен описателем.

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

function	BluetoothGetRadioInfo(
hRadio : THandle;
var	pRadioInfo : BLUETOOTH_RADIO_INFO): DWORD; stdcall;

hRadio - Описатель локального радиомодуля, который получен функцией BluetoothFindRadioFirst или BluetoothFindRadioNext.
pRadioInfo - Структура, в которую записывается информация об указанном радиомодуле. Член dwSize должен быть равен размеру структуры.

Вернет ERROR_SUCCESS, если информация получена, в противном случае код ошибки.

Структура BLUETOOTH_RADIO_INFO выглядит так:

_BLUETOOTH_RADIO_INFO = record

dwSize	:	dword;
address	:	BLUETOOTH_ADDRESS;
szName	:	array [0..BLUETOOTH_MAX_NAME_SIZE - 1] of widechar;
ulClassofDevice	:	ulong;
lmpSubversion	:	word;
manufacturer	:	word;

end;

dwSize	-	Размер структуры в байтах
address	-	Адрес локального радиомодуля
szName	-	Имя радиомодуля
ulClassofDevice	-	Класс устройства
lmpSubversion	-	Устанавливается производителем
manufacturer	-	Код производителя (константы BTH_MFG_Xxx). Для получения новых кодов обратитесь к сайту спецификаций Bluetooth.

Это уже что-то. Воспользуемся этой информацией и напишем такую процедуру. procedure GetRadioInfo(hRadio: THandle); var RadioInfo: BLUETOOTH_RADIO_INFO; begin // Инициализация структуры BLUETOOTH_RADIO_INFO FillChar(RadioInfo, 0, SizeOf(RadioInfo)); RadioInfo.dwSize := SizeOf(RadioInfo); // Получаем информацию if (BluetoothGetRadioInfo(hRadio, RadioInfo) = ERROR_SUCCESS) then begin // Используем полученную информацию end; end; Заключение

Пока все. В следующей статье рассмотрим, как получить список присоединенных устройств и опросить сервисы, которые они представляют.

Готовый рабочий пример использования указанных функций вы можете найти здесь.

Автомобиль я купил вместе с древней автомагнитолой GRUNDIG. Гамнитола ещё с кассетой. Но тем не менее она фирмовая и в отличие от современных дешовых китайчиков обладает высоким чутьём приёмника и очень сочным качественным звуком. В принципе, и приёмника хватает. Но наши руки не для скуки, а мозг хочет чего-то большего. Магнитола выглядит вот так:

Самое простое — втыкаем в магнитолу bluetooth-модуль, сопрягаем её с телефоном. А уж на телефоне разной всякой музыки у меня как грязи! При этом не то что диски разные, но и даже флешки с собой носить домой не нужно чтобы музыку обновлять. Всё в телефоне, а он всегда с собой.

Поиск модуля bluetooth. Что нам предложат наши узкоглазые братья? Самым подходящим для меня на алиэкспресс оказался вот такой модуль:

Смысл такой: этот модуль втыкается в любую дырку ЮСБ. Будь то зарядник простой или компьютер — неважно. Разъём ЮСБ тут используется лишь для подключения питания для модуля 5 вольт. С другой стороны разъём на стандартный стерео-джек 3,5мм. Это выход, который передаёт звук на любой усилитель или активные колонки. Хоть в компьютерные втыкай и будут играть с телефона без проводов через блютус.

Теперь самое главное. Модуль готовый. Вопрос куда его подключать к автомагнитоле? Если магнитола имеет линейный вход — то вопрос отпадает. Туда этот модуль и подключаем.
В моём случае было немного сложнее. Линейного входа нет. Есть только режим "радио" и "кассета". Решение было простым. Используем переключатель "LOUD". Он всегда нажат, т.к. придаёт звуку бОльшую сочность. Отрезаем от него дорожки. Проволочки запаиваем в таком положении, чтобы функция "LOUD" оказалась всегда включена. А освободившимися контактами переключателя рвём звуковые каналы левый и правый на входе в темброблок перед регулятором громкости. При этом при нажатии переключателя родные каналы звука разрываются и подключается внешний вход с модуля bluetooth. Тут опять поджидала небольшая заминка. У переключателя две пары контактов. А нам ещё надо питание подавать на модуль блютус. Получается надо три пары — левый с правым каналом звука и питание на модуль. Поставил маленькое реле. Переключатель одной парой запитывает реле, а у реле две пары контактов. Вуаля! Три пары нашли:)

Вобщем теперь всё круто! Нажимаю "LOUD" — телефон сам цепляется. Заводим любимую музыку и таем от наслаждения:)

Модуль теоретически можно воткнуть в любую магнитолу. Даже не воткнуть, а подключить. У меня он на проводах за магнитолой валяется. Нужно лишь организовать линейный вход в магнитоле и обеспечить модуль питанием 5 вольт. Я внутри магнитолы воткнул КРЕНку 5-вольтовую. А питание наружу вывел куском кабеля от удлинителя ЮСБ. На конце "МАМА", в неё втыкается модуль и получает свои 5 вольт.

Кстати, логика работы модуля такова, что звук передаётся только с плейера телефона. Если во время проигрывания поступает входящий звонок, то плейер становится на паузу. Разговариваем по телефону как обычно. Через магнитолу звук не транслируется. После разговора и отбоя проигрывание музыки возобновляется. Мне это нравится. Не хочу чтобы в разговоре принимали участие все пассажиры автомобиля. Если что, в продаже есть немного другие модули — с подключением микрофона. С таким модулем будет уже громкая связь и разговор по телефону в режиме"свободные руки".

Этой статьей хочу начать серию по работе с Bluetooth в Delphi под Microsoft Windows XP.

Все программы написаны на Delphi 6 и тестировались со стандартным стеком Bluetooth от Microsoft под Windows XP + SP2.

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

BluetoothFindFirstRadio

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

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

function	BluetoothFindFirstRadio(
const	pbtfrp : PBlueToothFindRadioParams;
var	phRadio : THandle): HBLUETOOTH_RADIO_FIND; stdcall;

pbtfrp - указатель на структуру BLUETOOTH_FIND_RADIO_PARAMS. Член dwSize этой структуры должен содержать размер структуры (устанавливается посредством SizeOf(BLUETOOTH_FIND_RADIO_PARAMS)).
phRadio - описатель (Handle) найденного устройства.

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

BluetoothFindNextRadio

Находит следующий установленный радиомодуль Bluetooth.

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

function	BluetoothFindNextRadio(
hFind : HBLUETOOTH_RADIO_FIND;
var	phRadio : THandle): BOOL; stdcall;

hFind - Описатель, который вернула функция BluetoothFindFirstRadio.
phRadio - Сюда будет помещен описатель следующего найденного радиомодуля.

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

BluetoothFindRadioClose

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

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

function	BluetoothFindRadioClose(
hFind : HBLUETOOTH_RADIO_FIND): BOOL; stdcall;

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

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

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

Для получения информации о радиомодуле Bluetooth используется функция

BluetoothGetRadioInfo

Возвращает информацию о радиомодуле, который представлен описателем.

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

function	BluetoothGetRadioInfo(
hRadio : THandle;
var	pRadioInfo : BLUETOOTH_RADIO_INFO): DWORD; stdcall;

hRadio - Описатель локального радиомодуля, который получен функцией BluetoothFindRadioFirst или BluetoothFindRadioNext.
pRadioInfo - Структура, в которую записывается информация об указанном радиомодуле. Член dwSize должен быть равен размеру структуры.

Вернет ERROR_SUCCESS, если информация получена, в противном случае код ошибки.

Структура BLUETOOTH_RADIO_INFO выглядит так:

_BLUETOOTH_RADIO_INFO = record

dwSize	:	dword;
address	:	BLUETOOTH_ADDRESS;
szName	:	array [0..BLUETOOTH_MAX_NAME_SIZE - 1] of widechar;
ulClassofDevice	:	ulong;
lmpSubversion	:	word;
manufacturer	:	word;

end;

dwSize	-	Размер структуры в байтах
address	-	Адрес локального радиомодуля
szName	-	Имя радиомодуля
ulClassofDevice	-	Класс устройства
lmpSubversion	-	Устанавливается производителем
manufacturer	-	Код производителя (константы BTH_MFG_Xxx). Для получения новых кодов обратитесь к сайту спецификаций Bluetooth.

Готовый рабочий пример использования указанных функций вы можете найти здесь.

Какие существуют способы решения проблем, возникающих при подключении Bluetooth к магнитоле с мобильного устройства?

В настоящее время Bluetooth – это незаменимая технология для многих испанских пользователей, которые используют это устройство для установления соединения со своим автомобилем. Важно отметить, что в эпоху реализации Android Авто, это не что-то новое и инновационное, так как раньше подобная связь устанавливалась благодаря наличию радио, через его настройки. Несмотря на то, что данное подключение производится автоматически, все же иногда возникают непредвиденные проблемы и неполадки с устройством, которые влияют на качество соединения и проводимость сигнала с Bluetooth.

Операция по подключению мобильного телефона к автомобилю через Bluetooth становится сложной и нерешаемой, если Вы столкнетесь с подобной ситуацией и не будете знать, что предпринять. Такая проблема может произойти на мобильных устройствах абсолютно любой марки с операционной системой Google, следовательно данная проблема является распространенной и имеет высокую частотность. Несмотря на то, что Вам может показаться подключение телефона к автомобиля через Bluetooth очень сложным процессом, мы нашли для Вас ряд решений, которые будут Вам полезны. Мы уверены, что некоторые из приведенных способов точно сработают, главное сделать всё по инструкции!

Подключение мобильного телефона не найдено или его соединение не распознано

При подключении устройства к автомобилю могут возникнут непредвиденные проблемы и ошибки подключения, которые в свою очередь зависят от нескольких факторов и обстоятельств. Одной из распространенных проблем является несовместимость вашего автомобиля с подключением к конкретному мобильному устройству, в связи с чем возникает плохая звуковая передача. Скорее всего, радио, установленное в машине – слишком старое, поэтому мультимедийный звук мобильного устройства не передается ни через систему динамиков, ни через громкую связь автомобиля.

Еще один фактор, который влияет на подключение наиболее часто – это отсутствие активации в параметрах подключения к нашей машине. Чтобы проверить активирован ли Bluetooth, необходимо воспользоваться следующей инструкцией: открыть Настройки> Подключения> Bluetooth, далее нужно коснуться соединения, чтобы определить успешно ли работает устройство. Таким образом, мы увидим, что проблема заключается в отключенном звуке на устройстве.

Если Вы убедились, что проблема заключается в этом, попробуйте заново переподключить Ваше устройство и проверить соединение. В случае, если данный способ не приносит никаких результатов, мы предлагаем Ваш обратиться к следующему способу, который возможно Вам поможет. Для начала Вам необходимо удостовериться, если ли поблизости еще какие-нибудь другие устройства?

Наличие других электронных устройств поблизости также может быть преградой для нормального функционирования соединения и вызывать помехи и неполадки при подключении. Беспроводные наушники, компьютеры, WI-FI или даже какая-то бытовая техника может быть причиной нарушения соединения, все эти приборы необходимо убрать как можно дальше от аппаратуры. Активность других устройств и их волновое излучение создает препятствие для получения сигнала.

Откройте раздел Bluetooth и попробуйте удалить Ваш автомобиль из его настроек

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

После удаления нашего автомобиля из настроек Bluetooth, мы должна повторить сопряжение устройств и попробовать найти новый сигнал, скорее всего в этот раз соединение будет более устойчивое, это похоже на помехи и неполадки, которые случаются с мобильным телефоном, и очень часто нам нужно просто его перезагрузить, чтобы обновить систему работы. Считается, что данный метод работает эффективнее всего и именно к нему часто прибегают пользователи Bluetooth устройств. Для тестирования данного метода, Вам следует воспользоваться следующей инструкцией:

Откройте настройки Вашего мобильного устройства и получить к нему доступ.
Перейдите в раздел, связанный с подключением устройств.
Найдите слово Bluetooth и нажмите на эту кнопку.
Вам откроется список устройств, где Вам необходимо найти именно Ваш автомобиль.
Удалите данное устройство из Вашего Bluetooth.
Попытайтесь переподключиться еще раз, выполнив повторное сопряжение с Вашим автомобилем.

Убедитесь, что Ваш Bluetooth активирован и имеет определенное имя или наименование для быстрого поиска

Одной из причин отсутствия соединения является деактивация Вашего Bluetooth в мобильном телефоне, или возможно, его скрытая активность, из-за которой мы не видим устройство в списке возможных.

Bluetooth без имени затрудняет работу многих телефонов Android, так как в этом случае устройство невозможно обнаружить. Однако разработчики наших смартфонов создали специальную регулировку на мобильных устройствах, которая позволит устранить данную проблему. Для активации данной опции, предлагаем Вам обратиться к следующей инструкции:

Сигнал утерян или данное соединение не работает

В данном случае необходимо соединить наш терминал с другим устройством, чтобы проверить функционирование данного типа соединения. То есть мы должны попытаться подключить к нашему терминалу другое устройство, например, другой смартфон. Такой способ позволит определить проблема кроется в работе самого Bluetooth, или причина совсем иная. Если в данном случае возникают какие-то помехи или проблемы, то нам необходимо перезапустить именно терминал, чтобы перезагрузить систему и повторить подключение.

Самым критическим решением является полное форматирование нашего мобильного устройства, но важно помнить: чтобы ничего не потерять – необходимо заранее сделать резервную копию всего устройства. Очень часто простая перезагрузка смартфона решает многие неполадки и проблемы, не спешите делать полное форматирование устройства, возможно системе нужно перезагрузиться.

Чтобы не потерять ценные данные Вашего устройства, старайтесь обращаться к перезагрузке сети подключения и системы устройства, полное форматирование – это самый последний способ, которым следует пользоваться.

Откройте настройки своего мобильного устройства.
Найдите раздел Система и нажмите на эту кнопку.
Найдите кнопку Сбросить и нажмите на нее.
Далее необходимо осуществить сброс настроек сети.
Вы увидите переключатель, на который необходимо нажать, чтобы выполнить это действие.

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

Поговорим о внедрении беспроводных технологий. Конкретно речь пойдёт о передаче звука по Блютуз. Например, стоит в вашем автомобиле старенькая магнитола, которой Bluetooth и не снился. Что можно сделать в этой ситуации? Конечно, можно купить современную модель. Ну а если вы не готовы к этому шагу или в вашем авто стоит магнитола нестандартной формы, найти замену которой не так то просто? И если при этом вы ещё и не прочь поработать руками, значит вам точно сюда.

Что понадобится для модернизации

Во-первых, конечно сама магнитола. Задача будет облегчена, если в вашей магнитоле есть AUX выход. Мне же придётся модернизировать очень старую модель, где естественно AUX выхода нет. Поэтому предварительно я уже реализовал в ней AUX.

Описание процесса подключения

Наиболее серьёзно нужно подойти к вопросу питания нашего модуля. В случае с Bluetooth адаптером на 5 вольт можно подключиться к USB разъёму магнитолы, при его наличии. Также можно попытаться найти на плате магнитолы 5-вольтовый линейный стабилизатор. Маркировка этого элемента может содержать цифры 7805. Конечно не факт, что в запасе у него имеется резервная мощность, необходимая для питания нашего адаптера. Лучший вариант – дополнительно купить такой стабилизатор и собрать приведённую здесь схему.
Что касается модуля XS-3868, которым я располагаю, ситуация несколько сложнее. Пределы необходимого для него питающего напряжения составляют 3,6 – 4,2 вольта. Такое на плате магнитолы вряд ли найдётся. Интегрального линейного стабилизатора на 4 вольта, насколько мне известно, тоже нет, во всяком случае, среди широко распространённых устройств.
Отсюда следует, что источник питания мне придётся собирать самостоятельно. Для этого я взял два электролитических полярных конденсатора, два керамических неполярных и очень полезную микросхему LM317. Кроме этого понадобится пара резисторов для установления требуемого выходного напряжения. Один я взял номиналом 1,5 кОм, второй на 3 кОм. Прилагается ссылка калькулятора для LM317, где можно подобрать номиналы резисторов. Там же приведена схема стабилизатора напряжения на базе LM317.

Допустимое входное напряжение для LM317 достигает 37 вольт, что создаёт большой запас надёжности, так как в бортовой сети автомобиля это значение не выше 15 вольт. На выходе моего самодельного стаба я обнаружил 3,95 вольт, то есть как раз то, что нужно.

Теперь можно подключить Bluetooth и убедиться в его работоспособности. Подаю питание на схему и ищу в телефоне доступные Bluetooth – устройства. Для входа требуется ввести пароль. В 99 случаях из 100 стандартным для подобных устройств паролем является четыре нуля (0000).

Подключившись к Блютуз и присоединив наушники, запускаю на телефоне звуковой файл. В результате получаю настоящий стерео сигнал. Качество звука лично меня вполне устраивает.
В интернете я встречал информацию, что этот Bluetooth модуль при включении кратковременно может потреблять ток до 1 ампера. По этой причине я и выбрал микросхему LM317, рассчитанную на ток до 1,5 ампер. Убедиться в наличии скачка тока при включении я не смог, так как не имею осциллографа, мультиметр же на столь короткие всплески не реагирует. Постоянное потребление в рабочем режиме по моим наблюдениям не превышает 70 мА.
Модуль XS-3868 обладает дополнительными возможностями, которые я тоже решил использовать. В частности здесь есть контакты для подключения микрофона, после чего наш модуль сможет работать как Bluetooth гарнитура для разговора по телефону.

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

Плату микрофона я вклеил в торец накладки передней панели магнитолы.
Для монтажа стабилизатора и модуля Bluetooth я нашёл свободное место на плате магнитолы и использовал двухсторонний скотч.

Стаб я обмотал изолентой, чтобы ничего случайно не замкнуть. Перегрев ему не грозит ввиду большого запаса по мощности. Осталось подключить стабилизатор к питанию. С землёй всё ясно, она как всегда на корпусе. Теперь разберёмся с плюсом. Если подключиться просто к плюсу магнитолы, получим постоянно работающий Bluetooth во всех режимах, когда к авто подключен аккумулятор. Магнитоле это требуется для сохранения различных настроек, часов. Для нашего модуля Bluetooth это в принципе тоже допустимо, но совершенно не рационально. Поэтому находим красный провод от замка зажигания, напряжение на котором появляется только при вставленном ключе и подключаем к нему плюс стаба.

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

Для проверки системы переводим магнитолу в режим AUX. В моём варианте это режим радио плюс дополнительный переключатель. Пользуемся системой следующим образом – если нужен AUX, ничего не воспроизводим по Bluetooth, ну и наоборот, нужен Bluetooth, не пользуемся AUX.
Ну, вот собственно и всё. Осталось установить магнитолу в автомобиль и наслаждаться новой функцией.

Заключение

Смотирте видео

Читайте также: