传递记录与传递类到过程时如何进行

作者: 甲基蓝
发布时间: 2024-08-18 07:54:15 (9天前)
转自：

2 条回复

0#
回复此人
trpnest | 2019-08-31 10-32

<div class =“post-text”itemprop =“text”> <P> 类类型的对象已经是一个指针，所以实际上不需要像你那样取消引用它。相当于 </p> <pre> <code> TProgramSettings = class flags: UInt32; ... end; </code> </pre> <P> ... </p> <pre> <code> var MyProgramSettings: TProgramSettings; begin MyProgramSettings := TProgramSettings.Create; MyProgramSettings.Flags := 0; ApplySettings(MyProgramSettings); </code> </pre> <P> ... </p> <pre> <code> procedure ApplySettings(ProgramSettings: TProgramSettings); var MyObject : TCustomObject; begin MyObject := TCustomObject.Create; MyObject.Settings.Flags := ProgramSettings.Flags; ... end; </code> </pre> <P> 关于记录和类对象之间的区别，好吧，想到它的一种方法是当你将记录定义为var时，该定义创建记录（不需要调用'Create'）而对于一个类你只是创建一个指向对象的点，你仍然需要创建对象本身。除此之外还有很多东西，但是开始思考它还有很多东西。 </p> </DIV>

编辑

登录后才能参与评论