LPT-порт. Чтение/запись.

← →
Чапаев © (2005-07-26 13:05) [0]

h:=CreateFile("LPT1",...) -- проходит нормально.

Сразу после этого пытаюсь записать байт WriteFile(h,...) -- программа подвисает.

Что я делаю не так? ;-)

← →
Kolan © (2005-07-26 14:28) [1]

Что я делаю не так? ;-)Та не даёщь нам код...

PS Или это дядя шутит?

← →
Чапаев © (2005-07-26 15:05) [2]

> Та не даёщь нам код...
Да всё просто...
var H:HFILE; B:Byte; Act:Cardinal; begin H:=CreateFile("LPT1",GENERIC_READ or GENERIC_WRITE,0,nil,OPEN_EXISTING,0,0); WriteFile(H,B,1,Act,nil); end;

← →
Anatoly Podgoretsky © (2005-07-26 15:12) [3]

Чапаев © (26.07.05 15:05) [2]
Не видать оснований для "проходит нормально"

← →
Чапаев © (2005-07-26 15:27) [4]

> Не видать оснований для "проходит нормально"
Основание -- H<>INVALID_HANDLE_VALUE.

← →
tesseract © (2005-07-27 20:52) [5]

Заввиснание - это пртому что ты не используешь асинхронную запись. Програма пытается во что-бы то ни стало записать данные приостанавливая весь процесс записи.

А на порту кто-то живёт? Кому пишем-то?

пример здесь : http://delphimaster.net/view/4-1122551436/

> А на порту кто-то живёт? Кому пишем-то?
Всё, разобрался уж... Тот, кто живёт на порту, программируется "немножко совсем не так", как мне думалось, и его программирование, как оказалось, в мои задачи не входит.

LPT-порт. Чтение/запись. Найти похожие ветки