IdSuperCoreRegister.pas 1.9 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485
  1. { $HDR$}
  2. {**********************************************************************}
  3. { Unit archived using Team Coherence }
  4. { Team Coherence is Copyright 2002 by Quality Software Components }
  5. { }
  6. { For further information / comments, visit our WEB site at }
  7. { http://www.TeamCoherence.com }
  8. {**********************************************************************}
  9. {}
  10. { $Log: 56082: IdSuperCoreRegister.pas
  11. {
  12. Rev 1.1 9/15/2004 5:04:20 PM DSiders
  13. Added localization comments.
  14. }
  15. {
  16. { Rev 1.0 2004.02.03 12:39:04 AM czhower
  17. { Move
  18. }
  19. {
  20. { Rev 1.5 2003.10.19 4:38:36 PM czhower
  21. { Updates
  22. }
  23. {
  24. { Rev 1.4 2003.10.19 2:50:40 PM czhower
  25. { Fiber cleanup
  26. }
  27. {
  28. { Rev 1.3 2003.10.19 1:04:28 PM czhower
  29. { Updates
  30. }
  31. {
  32. { Rev 1.2 2003.08.20 1:45:14 PM czhower
  33. { Fixes.
  34. }
  35. {
  36. { Rev 1.1 8/19/2003 12:16:32 PM JPMugaas
  37. { Should now compile in new packages.
  38. }
  39. {
  40. { Rev 1.0 8/16/2003 11:03:52 AM JPMugaas
  41. { Moved from Core as part of a package reorganization
  42. }
  43. unit IdSuperCoreRegister;
  44. interface
  45. uses Classes;
  46. {
  47. Note: We separate this from IdCoreRegister because in Delphi 7,
  48. these will be in a separate package. This is particularly important as
  49. some of this is in a different stage of development than most of Indy 10.
  50. }
  51. procedure Register;
  52. implementation
  53. uses
  54. IdDsnCoreResourceStrings,
  55. IdFiberWeaverInline,
  56. IdIOHandlerChain,
  57. IdServerIOHandlerChain,
  58. IdFiberWeaverThreaded,
  59. IdSchedulerOfFiber;
  60. {$I ..\Core\IdCompilerDefines.inc}
  61. {$IFDEF Borland}
  62. {$R IdSuperCoreRegister.dcr}
  63. {$ELSE}
  64. {$R IdSuperCoreRegisterCool.dcr}
  65. {$ENDIF}
  66. procedure Register;
  67. begin
  68. RegisterComponents('Indy Super Core', {do not localize}
  69. [ TIdServerIOHandlerChain,
  70. TIdChainEngine,
  71. TIdSchedulerOfFiber,
  72. TIdFiberWeaverInline,
  73. TIdFiberWeaverThreaded
  74. ]);
  75. end;
  76. end.