Как быстро создать автоматическое свойство в Delphi IDE?

Мне нужно создать и управлять многими простыми опубликованными свойствами. Я называю их авто-свойствами, если они выглядят так:

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

Обычно я создаю их следующим образом:

  • Добавление имени и типа свойства:

    property Title: string

  • Выбор и копирование имени свойства Title в буфер обмена.

  • Добавление строки с помощью read F Ctrl+V write F Ctrl+V ;

  • Нажатие Ctrl+Shift+C, и это приведет к созданию частного поля

Можно ли исключить шаги 2 и 3, чтобы быстрее добавлять свойства? Может быть, для этого можно создать макрос?

Ответ 1

С Delphi 2006 вы можете использовать LiveTemplates.

В Delphi XE, например:

  • введите propf и нажмите Ctrl + J нажатие клавиши
  • напишите имя свойства и нажмите клавишу TAB
  • напишите имя типа свойства, нажмите клавишу TAB или ENTER, и вы закончите

Вы можете найти дополнительную информацию о том, как написать свои собственные шаблоны Live здесь:

Ответ 2

Я использую макросы для этой цели.

Например, у меня есть модель с полями

private
  FTitle: string;
  FName: string
  FAge: Integer

затем скопируйте поля в опубликованный раздел и создайте макрос

  • Откройте первое поле и нажмите Home
  • Нажмите Ctrl + Shift + R, чтобы начать запись макроса
  • Используйте клавиши Crtl + ->, Crtl + <- и End для навигации и преобразуйте первое поле в свойство типа . Название: строка Чтение заголовка FTitle Write FTitle;
  • После этого нажмите Home и перейдите к следующей строке
  • Завершить макрос, нажав Ctrl + Shift + R
  • Для всех остальных полей просто нажмите Crtl + Shift + P

Сначала это кажется трудным, но навыки будут окупаться.

Ответ 3

В версии XE7 prom и нажмите enter. Это кажется более быстрым.