Скачать: 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 вся ветка

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



Память: 0.47 MB
Время: 0.01 c