ThemeManagerReg.pas 2.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051
  1. unit ThemeManagerReg;
  2. // Comment out the following if using Standard versions of Delphi or C++ Builder
  3. // that do not come with the database components, or if you do not want to
  4. // link to the database VCL units.
  5. {define THEMEDATABASE}
  6. //----------------------------------------------------------------------------------------------------------------------
  7. // Windows XP Theme Manager is freeware. You may freely use it in any software, including commercial software, provided
  8. // you accept the following conditions:
  9. //
  10. // 1) The software may not be included into component collections and similar compilations which are sold. If you want
  11. // to distribute this software for money then contact me first and ask for my permission.
  12. // 2) My copyright notices in the source code may not be removed or modified.
  13. // 3) If you modify and/or distribute the code to any third party then you must not veil the original author. It must
  14. // always be clearly identifiable that I, Mike Lischke, am the original author.
  15. // Although it is not required it would be a nice move to recognize my work by adding a citation to the application's
  16. // about box or a similar place.
  17. //
  18. // The original code is ThemeMgr.pas, released 01. January 2002.
  19. //
  20. // The initial developer of the original code is:
  21. // Mike Lischke ([email protected], www.soft-gems.net).
  22. //
  23. // Portions created by Mike Lischke are
  24. // (C) 2001-2005 Mike Lischke. All Rights Reserved.
  25. //----------------------------------------------------------------------------------------------------------------------
  26. interface
  27. uses
  28. Windows, Messages, Classes, ThemeMgr {$ifdef THEMEDATABASE}, ThemeMgrDB {$endif};
  29. procedure Register;
  30. //----------------------------------------------------------------------------------------------------------------------
  31. implementation
  32. //-------------------------------------------------------------------------------------------------------------------
  33. procedure Register;
  34. begin
  35. RegisterComponents('XP', [TThemeManager {$ifdef THEMEDATABASE}, TThemeManagerDB {$endif}]);
  36. end;
  37. //-------------------------------------------------------------------------------------------------------------------
  38. end.