Что в Delphi эквивалентно «+=» для добавления элементов в набор?

. В других языках, таких как C++, есть операторы для выполнения операций типа «плюс -равно» или «или -равно» для добавления дополнительных стилей/флагов. Есть ли аналог в Delphi?

Прямо сейчас у меня есть такой код, как:

label1.Font.Style := label1.Font.Style + [fsBold];
label2.Font.Style := label2.Font.Style + [fsBold];

Но я хотел бы, если это возможно, немного упростить это до чего-то более лаконичного, не дублируя имя метки с обеих сторон оператора присваивания, что-то вроде:label1.Font.Style += [fsBold];илиlabel1.Font.Style := self + [fsBold];

Можно ли это сделать? Или не так много?

9
задан Rob Kennedy 23 July 2012 в 02:59
поделиться