GXS.CgRegister.pas 704 B

123456789101112131415161718192021222324252627282930313233343536
  1. //
  2. // The graphics GaLaXy Engine. The unit of GXScene
  3. //
  4. unit GXS.CgRegister;
  5. (* Registration unit for Cg Shader package *)
  6. interface
  7. uses
  8. System.Classes,
  9. // ToDo
  10. /// DesignIntf, not implemented
  11. /// DesignEditors,
  12. /// FMXEditors,
  13. GXS.Material,
  14. Cg.Import,
  15. Cg.GL,
  16. GXS.SceneRegister, // for TgxLibMaterialNameProperty
  17. GXS.CgShader,
  18. GXS.CgBombShader;
  19. procedure Register;
  20. implementation //-------------------------------------------------------------
  21. procedure Register;
  22. begin
  23. RegisterComponents('GXScene Shaders', [TCGxShader, TCGxBombShader]);
  24. RegisterPropertyEditor(TypeInfo(TgxLibMaterialName), TCGxBombShader, '',
  25. TgxLibMaterialNameProperty);
  26. end;
  27. end.