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

Вниз

аналог функции portw[] из паскаля?   Найти похожие ветки 

 
aspen ©   (2002-12-06 11:40) [0]

Функция на Паскале

function MDGet: integer
begin
while (Portw[CSR] and $1)=0 do;
MDGet:=Portw[DR];
end;


как сделать аналог для Дельфи?


 
Ihor Osov'yak ©   (2002-12-07 11:04) [1]

function ReadPortW(aAddr:word):word; assembler;
asm
push edx;
mov dx,aAddr
in ax,dx
pop edx;
end;


Только оно тебе надо? Работать будет только под Win9X


 
Anatoly Podgoretsky ©   (2002-12-07 11:19) [2]

Лучше так


function ReadPortW(aAddr: word): word;
asm
mov dx,ax // aAddr тоже подойдет
in ax,dx
end;


 
Anatoly Podgoretsky ©   (2002-12-07 11:21) [3]

Да и еще к вопросу о Win9X, даже в этом случает может не подойти, порты и здесь виртуальные, не все доступны.



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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
14-29052
sosv
2003-01-23 18:32
2003.02.10
Кто-нибудь знает для чего на клавиатуре клавиша


1-28755
race1
2003-02-01 11:28
2003.02.10
vcl50


1-28753
Saracin
2003-01-31 17:46
2003.02.10
Линейка как MS Word


1-28912
cta
2003-01-31 08:49
2003.02.10
Fatal error


14-29029
Chubais
2003-01-23 18:31
2003.02.10
Поиск ошибок