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

编辑:后者(setter和字段组合)只需写下以下内容即可更快完成,然后是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.它将使您的编码速度明显加快.