Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.25;
Скачать: CL | DM;

Вниз

Как организовать опрос портов LPT1 и Com?   Найти похожие ветки 

 
Дмитрий К.   (2002-05-03 16:58) [0]

Каким образом можно опросить порт(LPT1) и при появлении на нём сигнала от какого либо внешнего устройства, запустиь MediaPleyer ?


 
mifi   (2002-05-03 22:44) [1]

если не под "XP"то можно открыть порт как файл или используй асемблер который встроен в DELPHI


 
Leks   (2002-05-04 14:39) [2]

А в чем проблемы под XP?


 
mifi   (2002-05-04 21:08) [3]

с LPT не знаю не пробовал а COMM обычно уже открыт модемом


 
Sender ©   (2002-05-05 17:00) [4]

Вывод на порт:
mov dx , PortA
mov al , ByteA
out dx , al
mov dx , PortA

Ввод с порта:
mov dx , PortA
in al , dx
mov Rval , AL

А лучше - запихни в библиотеку. Да, не сказал, PortA - номер порта(Com1=$3F8,Com2=$2F8).


 
Sender ©   (2002-05-05 17:02) [5]

А вот в библиотеке:

void _stdcall OutPortAsm(unsigned short PortA,unsigned char ByteA)
{

_asm
{
mov dx , PortA
mov al , ByteA
out dx , al
mov dx , PortA
}
}
unsigned char _stdcall InPortAsm(unsigned short PortA)
{
unsigned char Rval;
Rval=0;
_asm
{
mov dx , PortA
in al , dx
mov Rval , AL
}
return Rval;
}

Только вот под NT и выше не пашет...


 
KSergey ©   (2002-05-07 11:46) [6]

Leks (04.05.02 14:39)
А в чем проблемы под XP?

NT и все, что построено на ее ядре более защищенные системы, они не позволяют просто тк вот корячить что-либо в порт любой программе. Только из драйвера устройства.
А вообще тема поднималась множество раз, почитайте архивы. (хотя в данном случае был приведен фрагмент плезного кода)


 
jonik pegas ©   (2002-05-07 14:15) [7]

Под NT поставь драйвер Giveio.sys и обр. к портам(см Sender) найти драйвер вместе с примерами не трудно



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

Текущий архив: 2002.07.25;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.014 c
1-81233
Sergey_G
2002-07-14 14:17
2002.07.25
Доброго дня мастера! Кто разбирается в RichEdit?


3-81133
DKalinin
2002-07-02 11:49
2002.07.25
как грамотно передать дату на сервер(независимо от настроек)


7-81492
Sender
2002-05-06 15:34
2002.07.25
Работа с портами (Lpt,Com)


14-81475
Dimka Maslov
2002-06-26 17:50
2002.07.25
Uniform Base of Procedures and Function for Delphi


1-81283
Prog_mail
2002-07-11 14:46
2002.07.25
Как в DBGrid сохранить цвет колонок