2007-12-01 12:38:53 +00:00
|
|
|
unit uEjerciciosViewRegister;
|
|
|
|
|
|
|
|
|
|
interface
|
|
|
|
|
|
|
|
|
|
procedure RegisterViews;
|
|
|
|
|
procedure UnregisterViews;
|
|
|
|
|
|
|
|
|
|
implementation
|
|
|
|
|
|
|
|
|
|
uses
|
2009-02-03 19:11:42 +00:00
|
|
|
uEditorRegistryUtils, uEditorEjercicio, uEditorEjercicios, uEditorElegirEjercicios;
|
2007-12-01 12:38:53 +00:00
|
|
|
|
|
|
|
|
procedure RegisterViews;
|
|
|
|
|
begin
|
|
|
|
|
EditorRegistry.RegisterClass(TfEditorEjercicios, 'EditorEjercicios');
|
|
|
|
|
EditorRegistry.RegisterClass(TfEditorEjercicio, 'EditorEjercicio');
|
2009-02-03 19:11:42 +00:00
|
|
|
EditorRegistry.RegisterClass(TfEditorElegirEjercicios, 'EditorElegirEjercicios');
|
2007-12-01 12:38:53 +00:00
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
procedure UnregisterViews;
|
|
|
|
|
begin
|
|
|
|
|
EditorRegistry.UnRegisterClass(TfEditorEjercicios);
|
|
|
|
|
EditorRegistry.UnRegisterClass(TfEditorEjercicio);
|
2009-02-03 19:11:42 +00:00
|
|
|
EditorRegistry.UnRegisterClass(TfEditorElegirEjercicios);
|
2007-12-01 12:38:53 +00:00
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
end.
|