Текущий архив: 2003.05.19;
Скачать: CL | DM;
ВнизПрямой доступ Найти похожие ветки
← →
Tols78 (2003-05-06 07:11) [0]Господа подскажите пожалуйсто. В Pascale писал так:
port [40$],0
И также извлекал из порта.
Как в Делфи организовать доступ к портам (прием, передача данных)
Подскажите пожалуйсто
← →
MBo (2003-05-06 07:29) [1]в win9X можно ассемблерной вставкой (in, out)
← →
Tols78 (2003-05-06 12:03) [2]MBo © (06.05.03 07:29)
в win9X можно ассемблерной вставкой (in, out)
Можно по подробней.
← →
Digitman (2003-05-06 12:21) [3]procedure Port(PortNo: Word; Value: Byte);
asm
mov dx, ax
mov al, cl
out dx, al
end;
usage:
Port($40, 0);
← →
Tols78 (2003-05-06 18:11) [4]Digitman © (06.05.03 12:21)
Спасибо
← →
k-man (2003-05-06 18:55) [5]Удалено модератором
Примечание: Задай вопрос в СВЛЕЙ ветке
← →
vuk (2003-05-06 19:06) [6]Если коротко, то потому, что нефиг. :o)
А если серьёзно, то нормальная операционная система должна обеспечивать защиту от сбоев, а если разрешить пользовательским процессам шарить напрямую по портам, то такую защиту обеспечить невозможно. Поэтому доступ и закрыт.
← →
Cranium (2003-05-06 20:57) [7]Удалено модератором
Примечание: Задай вопрос в СВОЕЙ ветке
← →
vuk (2003-05-06 20:59) [8]>А ели чере API
Через API = через драйвер, что не есть напрямую. Да и не к любому порту.
← →
Cranium (2003-05-06 21:04) [9]
> Как в Делфи организовать доступ к портам (прием, передача
> данных)
> Через API = через драйвер, что не есть напрямую. Да и не
> к любому порту.
Ну если не придираться к словам то читай тут
http://delphi.vitpc.com/treasury/weights.htm
← →
Anatoly Podgoretsky (2003-05-06 21:11) [10]Tols78 (06.05.03 18:11)
Исправленная процедура
procedure Port(PortNo: Word; Value: Byte);
asm
xchg dx, ax
out dx, al
end;
← →
Anatoly Podgoretsky (2003-05-06 21:12) [11]И учти, не до всех портов пустят, и ты возможжно даже об этом не узнаешь.
Страницы: 1 вся ветка
Текущий архив: 2003.05.19;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.006 c