奇怪的问题 ( 积分: 100 )

var
ffff,kkk:Tbitmap;
begin
ffff:=Tbitmap.Create;
memo1.Lines.Append(inttostr(integer(@ffff)));
kkk:=Tbitmap.Create;
kkk.LoadFromFile('D:/ClosedButton.bmp');
memo1.Lines.Append(inttostr(integer(@kkk)));
ffff:=kkk;
ffff.SaveToFile('D:/OpenedButtoniiii123.bmp');
kkk.LoadFromFile('D:/OpenedButton.bmp');
ffff.SaveToFile('D:/OpenedButtoniiii.bmp');
memo1.Lines.Append(inttostr(integer(@ffff)));
上面的代码运行结果是
kkk和ffff的指针的值不一样.
但是 输出的图片OpenedButton.bmp 和OpenedButtoniiii.bmp 是一样的
ClosedButton.bmp 和 OpenedButton.bmp 是两张不同的图片
OpenedButtoniiii123.bmp 和 OpenedButtoniiii.bmp 是两张不同的图片
这是为什么呀?
好 迷茫
救救我吧

原因是取地址的方法不对,ffff,kkk本身就是指针,试试这个
memo1.Lines.Append(intToStr(integer(ffff)));
memo1.Lines.Append(intToStr(integer(kkk)));

接受答案了.