Como criar uma propriedade automática mais rápida no IDE do Delphi?

Eu preciso criar e gerenciar muitas propriedades publicadas simples. Eu os chamo de propriedades automáticas se elas se parecem com isso:

private
  FTitle: string;
published
  property Title: string read FTitle write FTitle;

Geralmente eu os crio da seguinte maneira:

Adicionando nome e tipo de propriedade:

property Title: string

Selecionando e copiando o nome da propriedadeTitle para a área de transferência.

Anexando a linha comread F Ctrl + V write F Ctrl + V ;

PressionandoCtrl + Shift + C e isso irá gerar o campo privado

Existe alguma maneira de excluir as etapas 2 e 3 para adicionar propriedades mais rapidamente? Talvez seja possível criar alguma macro para isso?

questionAnswers(3)

yourAnswerToTheQuestion