CGx.Register.pas 737 B

123456789101112131415161718192021222324252627282930313233343536373839
  1. //
  2. // The graphics platform GLArena https://github.com/glscene
  3. //
  4. unit CGx.Register;
  5. (* Registration unit for CGx shader package *)
  6. interface
  7. {$I Scena.inc}
  8. uses
  9. System.Classes,
  10. // DesignIntf,
  11. // DesignEditors,
  12. // FMXEditors,
  13. GLX.Material,
  14. CGx.Import,
  15. CGx.GL,
  16. GLX.SceneRegister, // TgxLibMaterialNameProperty
  17. CGx.Shader,
  18. CGx.BombShader;
  19. procedure Register;
  20. //-----------------------------------------------------
  21. implementation
  22. //-----------------------------------------------------
  23. procedure Register;
  24. begin
  25. RegisterComponents('GLArena Shaders', [TCGxShader, TCGxBombShader]);
  26. RegisterPropertyEditor(TypeInfo(TgxLibMaterialName), TCGxBombShader, '',
  27. TgxLibMaterialNameProperty);
  28. end;
  29. end.