global-system /DelphiEventBusPascal4110Implementation of event bus pattern for Delphi XEdelphi-xepascaldelphieventbus