如何在Delphi中标记过程为deprecated或obsolete？

Delphi完全支持将过程、函数、类、属性等元素标记为deprecated（废弃），该特性从Delphi 2009版本正式引入，编译时会对调用废弃元素的代码触发警告，提示开发者谨慎使用或迁移到替代方案。

具体实现方式如下：

• 基础废弃标记
  在目标过程/函数的声明末尾添加deprecated关键字即可：

  procedure LegacyProcedure; deprecated;
  

  当代码调用这个过程时，编译器会生成类似"Symbol 'LegacyProcedure' is deprecated"的警告。

• 添加自定义提示信息
  可以在deprecated后附加字符串常量，说明废弃原因或指定替代方案，让警告信息更具指导性：

  procedure LegacyProcedure; deprecated '请使用NewProcedure替代，该过程将在v10.5版本后移除';
  

  编译时的警告会包含这段自定义文本，帮助开发者快速明确迁移方向。

• 扩展到其他元素
  除了过程和函数，类、属性、常量等其他标识符也支持deprecated标记：

  type
    TLegacyClass = class(TComponent) deprecated '推荐使用TModernClass';
  end;
  
  property LegacyProp: string read FLegacyProp write FLegacyProp deprecated '改用ModernProp属性';
  

• 临时屏蔽警告（可选）
  如果需要临时忽略某个废弃元素的警告，可以使用编译器指令控制：

  {$WARN DEPRECATED OFF}
  LegacyProcedure; // 此处不会触发警告
  {$WARN DEPRECATED ON}
  

  注意：仅建议在过渡阶段临时使用，长期来看应优先迁移到替代实现。

内容的提问来源于stack exchange，提问作者Martin Kakhuis