RadStudio12.3在调试Create函数时怎么才能进入源码处(二)

lrj2025kernel

一、上个帖子的原因终于找到了，可以结帖了，链接如下：https://www.52pojie.cn/thread-2124551-1-1.html
二、Delphi编译链接相关的几个重要文件，如图

三、解决方法：将平台设置位x64，直接调试64位程序即可
原因分析：直接使用的是编译好的RTL的dcu文件，x32与x64有不同的实现策略，所以项目中无法设置，除非修改RTL中define的定义，重新编译RTL
四、x64位追踪记录
1、源代码

2、constructor TObject.Create;

3、function _ClassCreate(InstanceOrVMT: Pointer; Alloc: ShortInt): Pointer;

4、class function TObject.NewInstance: TObject;

5、function _GetMem(Size: NativeInt): Pointer;

6、function SysGetMem(Size: NativeInt): Pointer;此函数汇编实现(最后一张图)



7、层层返回到class function TObject.InitInstance(Instance: Pointer): TObject;

8、调用 FillChar(Instance^, InstanceSize, 0);跟踪至此
五、x32位简要追踪记录
1、function _ClassCreate(InstanceOrVMT: Pointer; Alloc: ShortInt): Pointer;

2、function _GetMem(Size: NativeInt): Pointer;

3、CALL    MemoryManager.GetMem

4、CALL    _FillChar