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

Вниз

Почему выводится неправильное число (указатели)?   Найти похожие ветки 

 
Некто   (2015-01-24 12:58) [0]


procedure TForm1.Button4Click(Sender: TObject);
var
 PMyUint: PByte;
 dwValue: DWORD;
begin
 dwValue := 123456789;
 GetMem(PMyUint, 123);
 CopyMemory(PMyUint, @dwValue, SizeOf(dwValue));
 ShowMessage(IntToStr(DWORD(PMyUint^)));        // тут выводит 21
 ShowMessage(IntToStr(PDWORD(PMyUint)^));       // а тут 123456789    
 FreeMem(PMyUint);
end;

В первом случае я использую разименование указателя, т.е он вроде бы должен указывать на число, а
приведение к типу DWORD берет первые 4 байта этих данных.
Почему выводится неправильное число в первом случае?


 
Inovet ©   (2015-01-24 13:26) [1]

Потому что
123456789(10) = 075BCD15(16)
а
15(16) = 21(10)


 
junglecat ©   (2015-01-24 13:28) [2]

в 1-м случае число обрезается до размера Byte, приведение к DWORD особой роли не играет
проверь
ShowMessage(IntToStr(Byte(123456789)));


 
Некто   (2015-01-24 14:28) [3]

Ясно. Спасибо.



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

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

Наверх




Память: 0.47 MB
Время: 0.022 c
2-1422590261
Drowsy
2015-01-30 06:57
2017.01.15
Message методы


15-1454062961
MonoLife
2016-01-29 13:22
2017.01.15
Бэкапер какой-нить


15-1450733404
Юрий
2015-12-22 00:30
2017.01.15
С днем рождения ! 22 декабря 2015 вторник


2-1430280290
kudatsky
2015-04-29 07:04
2017.01.15
Где находится профайлер AQTime в ХЕ6 ?


1-1341941337
4ainik
2012-07-10 21:28
2017.01.15
При удалении TabSheet-ов стринггрид теряет фокус