USB в Delphi

← →
Nick_Omsk (2003-12-27 21:28) [0]

В нете нашёл пример:
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;
Не работает? Почему?

← →
Anatoly Podgoretsky © (2003-12-27 21:35) [1]

Какая ошибка

← →
Nick_Omsk (2003-12-27 21:55) [2]

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

← →
Anatoly Podgoretsky © (2003-12-27 22:23) [3]

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

← →
Nick_Omsk (2003-12-27 22:37) [4]

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

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

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

USB в Delphi Найти похожие ветки