Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

USB в Delphi [D5, D6, D7, Win95/98, WinME, Win2k, WinXP]


Nick_Omsk ©   (2003-12-27 21:28:00) 

В нете нашёл пример:
Function USBOpenDriver:boolean;
begin
 // Gerätetreiber mit passenden Dateinamen öffnen
 hgDriver:= CreateFile('\\.\CompuLABusb_0',GENERIC_WRITE or GENERIC_READ,
FILE_SHARE_WRITE or FILE_SHARE_READ, NIL, OPEN_EXISTING, 0, 0);
 USBOpenDriver:= hgDriver INVALID_HANDLE_VALUE
end;
Не работает? Почему?


Ihor Osov'yak   (2003-12-28 01:33:00) [1]

Драйверок, создающий устройство  с именем CompuLABusb_0 установлен?


Anatoly Podgoretsky   (2003-12-27 23:02:00) [2]

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


Nick_Omsk   (2003-12-27 22:37:00) [3]

Если ты про GetLastError, то код ошибки 2


Anatoly Podgoretsky   (2003-12-27 22:23:00) [4]

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


Nick_Omsk   (2003-12-27 21:55:00) [5]

Эта функция возвращает Ложь, hgDriver=INVALID_HANDLE_VALUE


Anatoly Podgoretsky   (2003-12-27 21:35:00) [6]

Какая ошибка


Наверх

Титульная страница Поиск, карта сайта Написать письмо