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

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

Проблема при работе с портами [D6, Win95/98]


Ionv ©   (2002-09-09 08:52:00) 

Есть исходник программы для работы с АЦП написанный на Delphi5. В этом исходнике сплошь и рядом применяются порты как в паскале: Port[$378]:=$01; a:=port[$379];
Компилятор выдал сообщение что он незнает подобных выражений. Заменил на функцию и процедуру:
procedureoutportb(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;

Программа не реботает. Помогите кто может.
Заранее большое спасибо!!!


WinStub   (2002-09-09 10:14:00) [1]

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


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

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

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


gek   (2002-09-09 09:10:00) [3]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо