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

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

как напрямую в порт ввода-вывода загнать байт? [D5, Win95/98]

VZV ©   (2002-03-12 15:07:00) 

как напрямую в порт ввода-вывода загнать байт?

---

Viktor Lonin   (2002-03-13 11:02:00) [1]

Скачай компонетн для работы с СОМ портом...Или сам пиши через АРI..

---

SAlex   (2002-03-13 08:04:00) [2]

>Ребята все это правильно, но одно НО. В порт вы его загоните , а вот проверить, что вы туда загнали проблемотично. Эти проблемки описаны здесь на форуме брлее подробно (тема кажется доступ к COM портам или ,что-то подобное)Ну это сути дела не меняет. А предложенная ASM вставочка хорошо работает , я сам проверял, правда только под 95/98 под 2000 так не получиться.

---

Anatoly Podgoretsky   (2002-03-12 23:54:00) [3]

пример для Excel :-)

function PortReadByte(Addr: Word): Byte;
asm
MOV DX,AX
IN AL,DX
end;

procedure PortWriteByte(Addr: Word; Value: Byte);
asm
XCHG AX,DX
OUT DX,AL
end;

---

MBo   (2002-03-12 15:17:00) [4]

пример для Word
function PortReadWord(Addr:Word) :Word; assembler; register;
asm
MOV DX,AX
IN AX,DX
end;
procedure PortWriteWord(Addr:word; Value:Word); assembler; register;
asm
XCHG AX,DX
OUT DX,AX
end;

---

Наверх