(* ImageEn Build 7.0.0.06.2637 @ 7-4-17 14:58:42.679 *)
(*
File version 1000
*)

unit ieregctrl;

{$I ie.inc}


{$ifndef IENOIDEREGS}

interface


procedure Register;

implementation

uses
  {$ifdef Delphi2007orNewer}
  DesignEditors,
  {$endif}
  
  Classes,

  {$ifdef IEUSEDESIGNINTF}
  DesignIntf,
  {$endif}

  {$ifdef IEUSEFILTEDIT}
  FiltEdit,
  {$endif}

  {$ifdef IEUSEDSGNINTF}
  DsgnIntf,
  {$endif}

  ImageEn, HSVBox, ImageEnProc, ImageEnView, ImageEnIO, HistogramBox, RulerBox, IEGradientBar,
  VideoCap, IEVect, IEMView, Iemio, IEOpenSaveDlg, hvideocap, iexFolderMView, iexColorPalette;


{$ifdef Delphi2007orNewer}

type
  TIESelectionEditor = class(TSelectionEditor)
  public
    procedure RequiresUnits(Proc: TGetStrProc); override;
  end;

procedure TIESelectionEditor.RequiresUnits(Proc: TGetStrProc);
begin
  Proc( 'hyieutils' );
  Proc( 'iexBitmaps' );
  Proc( 'hyiedefs' );
  Proc( 'iesettings' );
  Proc( 'iexLayers' );
  Proc( 'iexRulers' );
end;

procedure IERegisterSelectionEditor(AClass: TClass; AEditor: TSelectionEditorClass);
begin
  RegisterSelectionEditor(AClass, AEditor);
end;

{$else}

procedure IERegisterSelectionEditor(AClass: TClass; AEditor: TClass);
begin
end;

type
  TIESelectionEditor = class
  end;

{$endif}


procedure Register;
begin
  {$IFDEF IEINCLUDETIMAGEEN}
  RegisterComponents('ImageEn (Legacy)', [TImageEn]);
  IERegisterSelectionEditor( TImageEn, TIESelectionEditor );
  {$ENDIF}
  RegisterComponents('ImageEn', [TImageEnProc]);
  IERegisterSelectionEditor( TImageEnProc, TIESelectionEditor );
  RegisterComponents('ImageEn', [TImageEnView]);
  IERegisterSelectionEditor( TImageEnView, TIESelectionEditor );
  RegisterComponents('ImageEn', [TImageEnVect]);
  IERegisterSelectionEditor( TImageEnVect, TIESelectionEditor );
  {$IFDEF IEINCLUDEVIDEOCAPTURE}
  RegisterComponents('ImageEn (Legacy)', [TImageEnVideoView]);
  RegisterComponents('ImageEn (Legacy)', [TImageEnVideoCap]);
  {$ENDIF}
  {$IFDEF IEINCLUDEMULTIVIEW}
  RegisterComponents('ImageEn', [TImageEnMIO]);
  IERegisterSelectionEditor( TImageEnMIO, TIESelectionEditor );
  RegisterComponents('ImageEn', [TImageEnMView]);
  IERegisterSelectionEditor( TImageEnMView, TIESelectionEditor );
  RegisterComponents('ImageEn', [TImageEnFolderMView]);
  IERegisterSelectionEditor( TImageEnFolderMView, TIESelectionEditor );
  {$ENDIF}
  RegisterComponents('ImageEn', [TImageEnIO]);
  IERegisterSelectionEditor( TImageEnIO, TIESelectionEditor );
  RegisterComponents('ImageEn', [TOpenImageEnDialog]);
  IERegisterSelectionEditor( TOpenImageEnDialog, TIESelectionEditor );
  RegisterComponents('ImageEn', [TSaveImageEnDialog]);
  IERegisterSelectionEditor( TSaveImageEnDialog, TIESelectionEditor );

  RegisterComponents('ImageEn', [THistogramBox]);
  RegisterComponents('ImageEn', [TIEGradientBar]);
  RegisterComponents('ImageEn', [THSVBox]);
  RegisterComponents('ImageEn', [TRulerBox]);
  RegisterComponents('ImageEn', [TIEColorPalette]);

  {$ifdef IEREGISTERPROPERTYEDITOR}
  RegisterPropertyEditor(TypeInfo(string), TOpenImageEnDialog, 'Filter', TFilterProperty);
  {$endif}
end;

{$else} // IENOIDEREGS
interface
implementation
{$endif}

end.