Delphi的实时模板，使用getter / setter生成一个Property并创建私有字段？

Question

在这里和互联网上搜索并没有让我得到一个Delphi实时模板的例子，它使用getter / setter生成一个属性，并生成私有字段并执行复杂化。 （SHIFT + CTRL + C）

这可能吗？

Answer 1

可以修改已经提到的Delphi Live Templates页面上标题为“读/写属性”的示例，以生成getter / setter方法而不是私有字段：

<?xml version="1.0" encoding="utf-8" ?>
<codetemplate   xmlns="http://schemas.borland.com/Delphi/2005/codetemplates"
                version="1.0.0">
    <template name="prop" invoke="manual">
        <description>
            read write property for field
        </description>
        <author>
            twm
        </author>
        <point name="ident">
            <text>Name</text>
            <hint>the name for the property</hint>
        </point>
        <point name="type">
            <text>Integer</text>
            <hint>the type for the property</hint>
        </point>
        <script language="Delphi" onenter="false" onleave="true">
            InvokeClassCompletion;
        </script>
        <code language="Delphi" delimiter="|">
        <![CDATA[property |ident|: |type| read Get|ident| write Set|ident|;
|end|]]>
        </code>
    </template>
</codetemplate>

但是，这不会生成私有字段。