Проблема при работе с портами

← →
Ionv © (2002-09-09 08:52) [0]

Есть исходник программы для работы с АЦП написанный на Delphi5. В этом исходнике сплошь и рядом применяются порты как в паскале: Port[$378]:=$01; a:=port[$379];
Компилятор выдал сообщение что он незнает подобных выражений. Заменил на функцию и процедуру:
procedure outportb(base: word; num: byte);
begin
asm
mov dx, base
mov al, num
out dx, al
end;
end;
function inportb(base: word): byte;
begin
asm
mov dx, base
in al, dx
mov @Result, al
end;
end;
Программа не реботает. Помогите кто может.
Заранее большое спасибо!!!

← →
gek © (2002-09-09 09:10) [1]

Специально попробовал.
Никаких возражений у компилятора

← →
Кулюкин Олег © (2002-09-09 09:13) [2]

2 Ionv © (09.09.02 08:52)
Ваш код будет работать только под Win 9х.
Чтобы работало под NT/2000 используйте АПИ CreateFile и т.д.

В кладовке есть компонент TComPort, посмотрите его.

← →
WinStub (2002-09-09 10:14) [3]

На progrex.narod.ru есть пример работы с портами под Win NT/2k

Проблема при работе с портами Найти похожие ветки