VampyreImagingPackageExtRegister.pas 488 B

123456789101112131415161718192021
  1. unit VampyreImagingPackageExtRegister;
  2. {$warn 5023 off : no warning about unused units}
  3. interface
  4. uses
  5. ImagingComponents;
  6. procedure Register;
  7. implementation
  8. procedure Register;
  9. begin
  10. // Register file formats for TGraphic again (once done when registering base package) to
  11. // have the additional file formats. RegisterTypes can handle being called
  12. // more than once and registers only the new formats to LCL.
  13. ImagingComponents.RegisterTypes;
  14. end;
  15. end.