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

Вниз

Как считать значение ячейки памяти?   Найти похожие ветки 

 
pirate   (2005-07-10 21:01) [0]

Как считать значение ячейки памяти, адрес кот. уже известен.

ИЛИ

Как узнать сколько в системе установлено LPT
и адреса этих портов?
Вот что я пробовал:

procedure TForm1.Button1Click(Sender: TObject);
var p:pinteger;
x:integer;
begin
new(p);
p:=ptr($00000411); < адрес ячейки где в двух последних битах записано кол-во LPT.
x:=p^; < Выводит какую то ошибку "чтения по адресу 00000411"
x:=(x and(128+64))shr 6; < манипуляции по извлечению битов
edit1.Text:=inttostr(x);
freemem(p);
end;


 
Eraser ©   (2005-07-10 23:27) [1]

http://delphimaster.net/view/1-1121022378/



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

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

Наверх




Память: 0.46 MB
Время: 0.044 c
1-1123505192
B-boy-Dimo-N
2005-08-08 16:46
2005.08.28
QReport и Excel


14-1122970954
asafr
2005-08-02 12:22
2005.08.28
Москвичи, сколько у Вас в городе в среднем...


14-1122980764
NewWonder
2005-08-02 15:06
2005.08.28
Делюсь очень-оччень большой радостью!


8-1113978635
SilenBlock
2005-04-20 10:30
2005.08.28
Помогите исправить ошибку в тексте!


14-1123159211
oldman
2005-08-04 16:40
2005.08.28
Хотел в ветку про Динамо написать, но создам новую...