Паттерн Наблюдатель

[Ufomaster]

Приведите хороший пример данного паттерна. 

[kami]

https://github.com/jimmckeeth/DelphiPatterns

[Ufomaster]

3 минуты назад, kami сказал:

https://github.com/jimmckeeth/DelphiPatterns

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

[kami]

Так куда уж подробнее

Всё, что может меняться - должно иметь интерфейс подписки. Все заинтересованные объекты должны подписываться и отписываться. А уж реализация и передаваемая информация - это детали.

У меня, например, в качестве события об уведомлении используется вот такое:

type
  TNotificationAction = (naAdd, naChange, naDelete);

  TNotificationEvent<T> = procedure(Sender: TObject; Action: TNotificationAction; const Param: T) of object;

Можете глянуть в исходники FMX, фраза для поиска - FreeNotification

Изменено 21 октября, 2016 пользователем kami