Скачать: CL | DM;

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]

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

---

← →
DiamondShark ©   (2005-07-27 21:33) [6]

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

---

← →
tesseract ©   (2005-07-29 09:58) [7]

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

---

← →
Чапаев ©   (2005-07-29 10:52) [8]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c