Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Работа с портами LPT [D5, D6, D7, Win95/98, WinME]


Cat ©   (2004-08-25 15:40:00) 

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


ssk   (2004-08-25 16:48:00) [1]

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


Cat   (2004-08-25 16:08:00) [2]

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

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


Ega23   (2004-08-25 16:06:00) [3]

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


oldman   (2004-08-25 16:02:00) [4]

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


Cat   (2004-08-25 15:58:00) [5]

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


Cat   (2004-08-25 15:56:00) [6]

Да, я уже пробовал, выводит ошибку
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;


oldman   (2004-08-25 15:53:00) [7]

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

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


Sergey Kaminski   (2004-08-25 15:48:00) [8]

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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо