代码生成 - Delphi 2010 - 属性向导或类似的东西，以避免手动编码getter/setter

Question

是否有任何内置或外部工具（向导）可以轻松添加带有getter/setter的类成员（已发布字段）？

添加每个字段需要我编写大量代码。假设我需要添加Foo: Bar;属性。

我需要写

FFoo: TBar;
procedure SetFoo(const AValue: TBar);
function GetFoo: TBar;
...
property Foo: TBar read GetFoo write SetFoo

有什么工具可以快速轻松地使用它吗？

Answer 1

类型：

property Foo: TBar read GetFoo write SetFoo;

或：

property Foo: TBar read FFoo write SetFoo;

然后按 CTRL-SHIFT-C

编辑：后者（二传手和字段组合）可以通过仅编写以下内容来完成，然后是CTRL-SHIFT-C：

property Foo: TBar;

如果您在类中编写方法并希望创建匹配的实现，则此快捷方式也有效。

Answer 2

只需编写属性声明：

property Foo: TBar read GetFoo write SetFoo;

然后将光标放在属性上（或类声明中的任何位置），按 Ctrl-Shft-C，IDE 将自动为您完成声明，包括实现 stubbs。

请注意，您可能需要确保选中"完成不完整的属性"选项。您可以在"工具"|"选项 |环境选项 |资源管理器。

Answer 3

您应该查看ModelMaker Code Explorer。它将使您的编码速度显着加快。