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

Вниз

Подскажите как применить функцию для работы с сом-портом   Найти похожие ветки 

 
ol   (2002-04-17 10:24) [0]

Нашел сабж

Базовые адреса двух COM портов, для справки:
COM1 - 3F8h
COM2 - 2F8h
Пример:
Простейший вид процедур посылки и получения данных.
............
{процедура посылки данных в порт}
procedure PortOut(Port: Word; Data: Byte); assembler;
asm
MOV DX,Port;
MOV AL,Data
OUT DX,AL
end;
............
{функция получения данных из порта}
function PortIn(Port: Word): Byte; assembler;
asm
MOV DX,Port;
IN AL,DX
end;
Требуется прочитать данные из сом1
прописал функцию
потом потом на кнопку повесил что переменной s присвоить:
s:=PortIn(3F8h), --> ругается, кавычки если то конфликт Word - String
Подскажите че не так, первый раз делаю, почитать не нпшел где

да может кто все таки подскажет книжку толковую, или адресок где толком расписана работа с сом-портами


 
MBo ©   (2002-04-17 13:03) [1]

в паскале шестнадцатиричные пишутся так

$3F8


 
Anatoly Podgoretsky ©   (2002-04-17 15:11) [2]

И подумай будет ли это работать

MOV DX,Port;
MOV AL,Data

Это положено делать так

xchg dx,ax


 
KPY ©   (2002-04-18 05:49) [3]

http://www.delphikingdom.com/mastering/ports1.htm
есть немного но не супер



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

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

Наверх




Память: 0.47 MB
Время: 0.035 c
4-47908
DDG
2002-05-16 03:30
2002.07.15
Точки останова на функции WIN API


3-47235
RIPer
2002-06-20 16:33
2002.07.15
Алиас


1-47597
sector
2002-06-28 19:29
2002.07.15
Обработка ошибок(исключительных ситуаций)


1-47362
ctapik-net
2002-07-01 15:55
2002.07.15
Убить поток


1-47541
sector
2002-06-27 22:23
2002.07.15
помогите ответом