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

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

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

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

Adding property name and type:

property Title: string

Selecting and copying property name Title to clipboard.

Appending the line with read F Ctrl+V write F Ctrl+V ;

Pressing Ctrl+Shift+C and this will generate the private field

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

 Andrew30 мая 2012 г., 14:24
Вау! Никогда не пробовал это. Но без процедур было бы лучше. Не хочу заливать определение класса.
 user74338230 мая 2012 г., 14:18
Er ... Обычно вы можете пропустить шаги 2 и 3, пропустив шаги 2 и 3. Он создает процедуру для установки поля, но эта процедура не делает ничего больше, чем установка поля. Это по какой-то причине нежелательно для вас?
 Andrew30 мая 2012 г., 14:29
@ TLama Любая секретная опция IDE для отключения создания сеттеров с помощью Ctrl + Shift + C?
 Stefan Glienke30 мая 2012 г., 15:04
Используя LiveTemplates (представленные в Delphi 2006 iirc), вы можете набрать propf и нажать Ctrl +
 TLama30 мая 2012 г., 14:28
Просто пишиproperty Something: Boolean; и нажмитеCTRL + SHIFT + C и CodeCompletion создадут скелет поля свойств. И вообще те Процедуры называются сеттерами.

Ответы на вопрос(3)

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

private
  FTitle: string;
  FName: string
  FAge: Integer

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

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

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

 dummzeuch16 апр. 2015 г., 09:39
А если вы используете GExperts, вы можете добавить этот макрос в библиотеку макросов для дальнейшего использования.
Решение Вопроса

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

типpropf и ударилCtrl + J нажатие клавиши напишите имя свойства и нажмите TAB ключ напишите имя типа свойства, нажмите TAB илиВОЙТ ключ, и все готово

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

Delphi Live Templates - http://delphi.wikia.comCreating Live Templates - http://docwiki.embarcadero.com

войт. Кажется, быстрее.

Ваш ответ на вопрос