Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Проблемка с LPT и CreateFile

chernoruk © (2002-08-18 14:20:00)
Создаю handle:=CreateFile("lpt1",...)
Далее с помощью FileWrite(handle, buffer, 1, nil)
-в общем символ один туда посылаю, а светодиоды не мигают...

Serg Gurin (2002-08-26 00:05:00) [1]
Не совскм так просто как писал France. Там надо переключать регистр при чтении или записи. А что касается NT 2K XP - есть драйвер который позволяет это делать. К сожалению отчень медленный. Мне приносили прогу, утверждая что при ее запуске в этих версиях windows можно и на асме писать - будет работать, но проверить - руки не дошли.

Green_mkp (2002-08-19 18:46:00) [2]
Ну ну , тока для NT 2K XP будет вам на asm-е
розовая птица обломинго :-)
тут дровина нужна

France (2002-08-19 09:47:00) [3]
Ага, вот нашел!!!

Выводим в порт

procedure ToLPT;
begin
asm
mov al, <Данные>
mov dx, <Порт ($378, $37A)>
out dx, al
end
end;

Принимаем из порта

function InLPT:byte;
begin
asm
mov dx, <Порт ($279, $379)>
in al,dx
mov Result,al
end;
end;

Вот и все!

France (2002-08-19 09:32:00) [4]
Ах, да...забыл
serpantin@list.ru

France (2002-08-19 09:30:00) [5]
Там надо через ассемблерную вставку колбасить. Напиши, отвечу.
Здесь надо долго писать.

DC-AC (2002-08-19 07:28:00) [6]
И для порта получается. Для принтера получится, а для светодиодиков - нет ;-)

chernoruk (2002-08-18 21:34:00) [7]
Вроде для файла получается, а для порта-нет

Наверх

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