| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
LPT-порт. Чтение/запись. [D7, WinXP]
Чапаев © (2005-07-26 13:05:00)h:=CreateFile('LPT1',...) -- проходит нормально.
Сразу после этого пытаюсь записать байт WriteFile(h,...) -- программа подвисает.
Что я делаю не так? ;-)
Чапаев (2005-07-29 10:52:00) [1]> А на порту кто-то живёт? Кому пишем-то?
Всё, разобрался уж... Тот, кто живёт на порту, программируется "немножко совсем не так", как мне думалось, и его программирование, как оказалось, в мои задачи не входит.
tesseract (2005-07-29 09:58:00) [2]пример здесь : http://www.delphimaster.ru/cgi-bin/forum.pl?id=1122551436&n=5
DiamondShark (2005-07-27 21:33:00) [3]А на порту кто-то живёт? Кому пишем-то?
tesseract (2005-07-27 20:52:00) [4]Заввиснание - это пртому что ты не используешь асинхронную запись. Програма пытается во что-бы то ни стало записать данные приостанавливая весь процесс записи.
Чапаев (2005-07-26 15:27:00) [5]> Не видать оснований для "проходит нормально"
Основание -- H<>INVALID_HANDLE_VALUE.
Anatoly Podgoretsky (2005-07-26 15:12:00) [6]Чапаев © (26.07.05 15:05) [2]
Не видать оснований для "проходит нормально"
Чапаев (2005-07-26 15:05:00) [7]> Та не даёщь нам код...
Да всё просто...
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;
Kolan (2005-07-26 14:28:00) [8]Что я делаю не так? ;-)Та не даёщь нам код...
PS Или это дядя шутит?
| |
