Delphi 调试日子 - 莫名其妙的堆溢出

这个是个很有意思的事情,这一个成熟的模板上更改,同样的属性,同样的方法,新的组件在载入过程中就是报错。

“Stack overflow”

因为有初始化过程,担心是不是那个地方有问题,由于是在属性赋值过程中出现的,开始认为是写操作溢出,逐个逐个排,两个半小时就这么过去了……

发现原来是那个属性读被自引用了!

function TPlayConsoleFrame.GetKeyDatetime: TDateTime;

begin

//Result := KeyDatetime;

//改成

Result := FKeyDatetime;

end;

程序长了,一个不小心就出大麻烦!要过细啊!