A
awfigsk
Unregistered / Unconfirmed
GUEST, unregistred user!
type
TByteRec=record
Lo,Hi:Byte;
end;
TWordRec=record
Low,High:Word;
end;
PByte=^Byte;
var
B:Byte;
W:Word;
L:Longint;
Pointer;
begin
W:=$1234;
B:=TByteRec(W).Lo
//这个值是多少?0?
TByteRec(W).Hi:=0;
L:=$01234567;
w:=TWordRec(L).Low
//这个值呢?
B:=TByteRec(TWordRec(L).Low).Hi
//这个值呢?
B:=PByte(L)^
//这个值呢?
请问各位高手中的高手,在注释中的问题的答案是什么?
TByteRec=record
Lo,Hi:Byte;
end;
TWordRec=record
Low,High:Word;
end;
PByte=^Byte;
var
B:Byte;
W:Word;
L:Longint;
Pointer;
begin
W:=$1234;
B:=TByteRec(W).Lo
//这个值是多少?0?
TByteRec(W).Hi:=0;
L:=$01234567;
w:=TWordRec(L).Low
//这个值呢?
B:=TByteRec(TWordRec(L).Low).Hi
//这个值呢?
B:=PByte(L)^
//这个值呢?
请问各位高手中的高手,在注释中的问题的答案是什么?