feat: Adding class of to all current classes

gcarreno · Sep 24, 2023 · 08b4340 · 08b4340
1 parent 867ba84
commit 08b4340
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 0 deletions.
diff --git a/src/dispatcher/polykerma.dispatcher.pas b/src/dispatcher/polykerma.dispatcher.pas
@@ -25,6 +25,7 @@   TInterfacedDispatcher = class(TInterfacedObject, IDispatcher)
     procedure Post(const AChannel: String; const AMessage: IMessage);
   published
   end;
+  TInterfacedDispatcherClass = class of TInterfacedDispatcher;
 
 implementation
 

diff --git a/src/messages/polykerma.messages.message.pas b/src/messages/polykerma.messages.message.pas
@@ -20,6 +20,7 @@   TInterfacedMessage = class(TInterfacedObject, IMessage)
 
   published
   end;
+  TInterfacedMessageClass = class of TInterfacedMessage;
 
 implementation
 

diff --git a/src/modules/polykerma.modules.module.pas b/src/modules/polykerma.modules.module.pas
@@ -22,6 +22,7 @@   TInterfacedModule = class(TInterfacedObject, IModule)
 
   published
   end;
+  TInterfacedModuleClass = class of TInterfacedModule;
 
 implementation