Unit1.pas.32: i := Integer(b);
00452286 8B45F8 mov eax,[ebp-$08]
//[ebp-$08]这里存放b的指针,指向的内容为'abcd'
00452289 8945FC mov [ebp-$04],eax
//[ebp-$04]这里存放i的内容,mov后, i =@b
//////////////////////////////////////////////
//例子如下
var
i: integer;
b: String;
P: PChar;
begin
i := 1;
b := 'abcd';
i := Integer(b);
P := Pointer(i);
ShowMessage(IntToStr(i));
ShowMessage(IntToStr(Integer(p)));//结果同上
ShowMessage(String(i));
ShowMessage(P);//结果同上
end;