delphimvcframework/samples/services_injection/Services.RegistrationU.pas
2024-04-17 09:57:22 +02:00

22 lines
461 B
ObjectPascal

unit Services.RegistrationU;
interface
uses
MVCFramework.Container;
procedure RegisterServices(Container: IMVCServiceContainer);
implementation
uses
Services.PeopleU, Services.InterfacesU, Services.ConnectionU;
procedure RegisterServices(Container: IMVCServiceContainer);
begin
Container.RegisterType(TPeopleService, IPeopleService);
Container.RegisterType(TConnectionService, IConnectionService, TRegistrationType.SingletonPerRequest)
end;
end.