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

Работа с портами LPT   Найти похожие ветки 

← →
Cat   (2004-08-25 15:40) [0]

Здравствуйте...
В Паскале есть фун-ия: Port[порт]. А есть ли что либо подобное
в Дельфи? Т.е нужно прочитать и считать биты LPT порта
В идеале мне бы кусочек подобного кода на Дельфи царапните,
var
 x : integer;
begin
 Port[378h] :=222;
 Port[379h] :=x;
end.
                                    Заранее спасибо
                                            The Cat

---

← →
Sergey Kaminski ©   (2004-08-25 15:48) [1]

В Делфи нет такого псевдо-массива, как был в Паскале.
Но зато никто не отменил ассемблер in,out.

НО: Windows линейки NT тебе не позволит напрямую обратиться к порту, только из драйвера.

---

← →
oldman ©   (2004-08-25 15:53) [2]

"нужно прочитать и считать биты LPT порта"

А это что, разные операции? :)))

---

← →
Cat   (2004-08-25 15:56) [3]

Да, я уже пробовал, выводит ошибку
begin
 asm
   mov ax, 2 или mov ah, 2
   out 379h, ah или ax
 end;
end.
Как будто только out до 99h, а дальше ошибки, типа, не знаю такие
порты

Есть альтернатива (по памяти пишу) инициализация принтера
и через регистры в переменные вгонять?
asm
 mov ah, 3
 mov dx, 7
 int 17h   // вообщем инициализирует порт

end;

---

← →
Cat   (2004-08-25 15:58) [4]

Так это ж долго на ассемблере писать
А, хотя не в тему конференции вопрос, но может чирканете
API функции работы с портами LPT?

---

← →
oldman ©   (2004-08-25 16:02) [5]

Ну ты захотел - прерывание инициализации порта...
Ты еще int 13h обработай! Под ХР!!! :)))

---

← →
Ega23 ©   (2004-08-25 16:06) [6]

А CreateFile разве не поможет?

---

← →
Cat   (2004-08-25 16:08) [7]

Да, если на вывод, то помогает через PrinterDialog выводить
бесспорно

А мне надо еще и считать управляющие биты

---

← →
ssk ©   (2004-08-25 16:48) [8]

тебе сюда http://www.specosoft.com

---

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

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



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