суббота, 11 мая 2013 г.

Как я оформляю методы доступа к свойствам объекта

Я пишу не так:

TA = class
 protected
  function GetValue: Integer; virtual;
  procedure SetValue(aValue: Integer); virtual;
 protected
  property Value: Integer
   read GetValue
   write SetValue;
end;


А вот так:

TA = class
 protected
  function pm_GetValue: Integer; virtual;
  procedure pm_SetValue(aValue: Integer); virtual;
 protected
  property Value: Integer
   read pm_GetValue
   write pm_SetValue;
end;


-- почему? Да потому, чтобы исключить прямой вызов методов доступа к свойству. GetValue - он не "режет глаз", а pm_GetValue - РЕЖЕТ. Есть что-то неестественное в этой записи. И эта неестественность - коррелирует с неестественностью НЕПОСРЕДСТВЕННОГО вызова метода доступа к свойству.

Ну или использую - private, если виртуальность не нужна. Но всё равно стараюсь писать pm_GetX/pm_SetX.

Попробуйте. Может быть вам понравится.

Комментариев нет:

Отправить комментарий