 |
|
Модераторы: PILOT, ManiaK, Mazzi |
 
|
|
помогите с проектом под Delphi дл работы с HID USB, поиск простенького проекта 
| pvabox |
|
|||
 Новичок Профиль Группа: Участник Сообщений: 35 Регистрация: 23.8.2009 Репутация: нет Всего: нет |
Пардоньте, эта старая версия файла, для его работы нужен драйвер LptWdmIO, с помощью которого при отсутствии устройства USB, данные передаются в LPT порт. Ссылку перезалил последней версией. Проверял на другом компе - все прекрасно работает. Простите за не внимательность. |
|||
|
||||
Загрузка ...
| pvabox |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 35 Регистрация: 23.8.2009 Репутация: нет Всего: нет |
Обновил и дополнил архив проекта в посте http://forum.vingrad.ru/index.php?showtopi...t&p=1996458
|
|||
|
||||
| megabyte |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 1 Регистрация: 11.1.2007 Репутация: нет Всего: нет |
Всем привет!
Я работаю над полноскоростным обменом по USB . Пытаюсь разобраться по книге Агурова. Критику не могу в его адрес высказать, человек писал видимо, что знает. Я использую контроллеры AT90 c USB модулем на борту. В моем проекте нужна скорость 8Мбит/сек - а это USB2.0 . Над этим и бьюсь. Готовый вариант устройства обмена интересует в плане ''от чего то оттолкнуться ''. А так хочу все сам сделать. Кстати в Proteus есть модуль USB с отладчиком - показывает процесс обмена данными в режиме он-лайн, также в эта программа имеет драйвер (в примерах) который устанавливается как устройство и можно в полном объеме отлаживать устройство. Правда там поддерживаемых контроллеров не много. Так что если тема интересна - буду дальше писать о результатах. Это сообщение отредактировал(а) megabyte - 25.9.2011, 16:56 |
|||
|
||||
| UniBomb |
|
|||
|
Новичок  Награды: 1 Профиль Группа: Завсегдатай Сообщений: 1754 Регистрация: 24.10.2006 Где: Санкт-Петербург Репутация: 9 Всего: 97 |
||||
|
||||
| Juris |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 8 Регистрация: 23.7.2011 Репутация: нет Всего: нет |
Уважаемый Pvabox, могли бы Вы сделать screenshot работаещего плугина Winamp и предоставить сдесь? Дело в том, что даже если в английском Windows (XP) включить поддержку русских системных фонтов, всёравно вместо букв только "?". А так можно будет по картинке сориентироватся
 Спасибо! |
|||
|
||||
| pvabox |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 35 Регистрация: 23.8.2009 Репутация: нет Всего: нет |
Juris, для отображения кириллицы воспользуйтесь прикрепленным файлом, а скриншот вот такой
 Присоединённый файл ( Кол-во скачиваний: 40 ) 
Cyrillic.zip 1,20 Kb |
|||
|
||||
| Juris |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 8 Регистрация: 23.7.2011 Репутация: нет Всего: нет |
Спасибо, pvabox! Вы очень helpful
P.S.: А это не Ваше? Похоже как то по оформлению. http://shunmax.narod.ru/index.html Это сообщение отредактировал(а) Juris - 27.9.2011, 14:54 |
|||
|
||||
| pvabox |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 35 Регистрация: 23.8.2009 Репутация: нет Всего: нет |
Нет, я о нем писал в этом посте, хотя действительно, что-то взял из оформления его плагина.
|
|||
|
||||
| andreysh |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 1 Регистрация: 29.10.2011 Репутация: нет Всего: нет |
Только что разобрался с исходником с первой страницы. HIDKomponente.zip
 Правда при разработке устройства заказывал 64бит буфер (с запасом) !!!! пока не подправил на двойку не заработало ...... ToWrite := CurrentDevice.Caps.OutputReportByteLength; for I := 0 to (ToWrite - 2) do Я так понимаю CurrentDevice.Caps.OutputReportByteLength=65; 65-2=63; 63+0=64;  Ну да ладно планирую сделать свтильник, только не через шим а использовать микросхему ULN2003AN Анод одного диода подключается сразу к двум ножкам контроллера, к одной прямо, второй через ограничивающий резистор (подобрать на макетке по люксометру половину яркости). Итого: 1-Полная яркость, 2-Пол Яркости, 3Выключен. 2*3RGB=6ножек одного порта будет достаточно. Глаз не отличит яркости по шим, сильно большая пушка по воробьям IMHO |
|||
|
||||
| zvyagaaa |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 30 Регистрация: 13.1.2008 Репутация: нет Всего: нет |
pvabox
А исходником плагина поделитесь? Пожалуйста |
|||
|
||||
| Maks55 |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 2 Регистрация: 13.10.2011 Репутация: нет Всего: нет |
Парни подскажите, компонент jvhiddevicecontroller работает в вин7? А то при обращении к HID устройствам пишет "device cannot be opened". Пример идущий с компонентом не работает. :(
|
|||
|
||||
| hash666 |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 1 Регистрация: 15.11.2011 Репутация: нет Всего: нет |
2 Maks55, а константы правильные стоят? ProductName, VendorID, ProductID.
|
|||
|
||||
| Maks55 |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 2 Регистрация: 13.10.2011 Репутация: нет Всего: нет |
У меня просто не получается вывести список HID устройств, вот код:
procedure TMainForm.HidCtlDeviceChange(Sender: TObject); begin DeviceList.Clear; HidCtl.Enumerate; end; function TMainForm.HidCtlEnumerate(HidDev: TJvHidDevice; const Idx: Integer): Boolean; begin DeviceList.Items.Add( Format('%.4x/%.4x', [HidDev.Attributes.VendorID, HidDev.Attributes.ProductID])); Result := True; end; В системе 6 HID устройств и при запуске программы я получаю 6 раз: Project .exe raised exception class EControllerError with message "device cannot be opened", т.е. я вообще нимогу от устройств никакой инфы получить. Что я делаю не так? Прошу помощи! ЗЫ Заметил, что готовые кзешники из демо работают и отображают HID устройства, а после компиляции исходников device cannot be opened. Может у меня rad studio поломался??? Это сообщение отредактировал(а) Maks55 - 16.11.2011, 10:44 |
|||
|
||||
| jekatj1 |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 1 Регистрация: 27.12.2011 Репутация: нет Всего: нет |
В модуле SetupApi.pas строка 62
ANYSIZE_ARRAY = 1; замени на: ANYSIZE_ARRAY = 1024; В модуле JvHidControllerClass.pas срока 1751 FunctionClassDeviceData^.cbSize := SizeOf(TSPDeviceInterfaceDetailDataA); заменить на: FunctionClassDeviceData^.cbSize := 5; строка 149 constructor Create(APnPHandle: HDEVINFO; ADevData: TSPDevInfoData; ADevicePath: PChar); на: constructor Create(APnPHandle: HDEVINFO; ADevData: TSPDevInfoData; ADevicePath: AnsiString); строка 1756 PnPInfo := TJvHidPnPInfo.Create(PnPHandle, DevData, PChar(@FunctionClassDeviceData.DevicePath)); на: PnPInfo := TJvHidPnPInfo.Create(PnPHandle, DevData, FunctionClassDeviceData.DevicePath); Это сообщение отредактировал(а) jekatj1 - 21.3.2012, 09:45 |
|||
|
||||
| inpotseluev |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 1 Регистрация: 30.7.2012 Репутация: нет Всего: нет |
Уважаемые господа программеры!
Помогите, кто сможет. На 7 Delphi написан кусок программы с использованием HID. При первом включении все нормально. Когда USB перевтыкаешь, то HID.Enumerate возвращает ноль, так как в JvHidDeviceControllerClass.pas возвращает в TJvHidDevice(FList[I]).IsPluggedIn false. То есть он не увидел включения и события Arrival не произошло со всеми вытекающими. Пробовал объект уничтожать и создавать, вообще фигня происходит. Может надо как-то обрабатывать HIDDeviceUnplug. Заранее спасибо! |
|||
|
||||
|
|
| Правила форума "Микроконтроллеры (MCU) и микропроцессоры (MPU)" | |
|
|
На данный раздел помимо Правил форума распространяются текже следующие правила:
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, PILOT, ManiaK, UniBomb, Mazzi. |
у соответствующего сообщения.| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Микроконтроллеры (MCU) и микропроцессоры (MPU) | Следующая тема » |
[ Время генерации скрипта: 0.0597 ] [ Использовано запросов: 21 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |