You've already forked lazarus-ccr
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7201 8e941d3f-bd1b-0410-a28a-d453659cc2b4
58 lines
1.8 KiB
ObjectPascal
58 lines
1.8 KiB
ObjectPascal
unit JvMMReg;
|
|
|
|
{$mode objfpc}{$H+}
|
|
|
|
interface
|
|
|
|
uses
|
|
SysUtils;
|
|
|
|
procedure Register;
|
|
|
|
implementation
|
|
|
|
{$R ../../resource/jvmmreg.res}
|
|
|
|
uses
|
|
Classes, Controls, PropEdits, ComponentEditors,
|
|
JvDsgnConsts,
|
|
JvId3v1, JvId3v2Base, JvId3v2, JvGradient, JvId3v2EditorForm,
|
|
JvGradientHeaderPanel, JvSpecialProgress,
|
|
JvFullColorSpaces, JvFullColorCtrls, JvFullColorEditors, JvFullColorSpacesEditors,
|
|
JvFullColorDialogs,
|
|
JvAnimatedImage, JvBmpAnimator, JvPicClip, JvSpecialImage, JvImageTransform;
|
|
|
|
procedure Register;
|
|
begin
|
|
RegisterComponents(RsPaletteJvclVisual, [
|
|
TJvAnimatedImage, TJvBmpAnimator, TJvPicClip,
|
|
TJvSpecialImage, TJvImageTransform,
|
|
TJvGradient, TJvGradientHeaderPanel,
|
|
TJvSpecialProgress,
|
|
TJvFullColorPanel, TJvFullColorTrackBar, TJvFullColorGroup, TJvFullColorLabel,
|
|
TJvFullColorSpaceCombo, TJvFullColorAxisCombo, TJvFullColorCircle,
|
|
TJvFullColorDialog, TJvFullColorCircleDialog
|
|
]);
|
|
|
|
RegisterComponents(RsPaletteJvclNonVisual, [
|
|
TJvId3v1, TJvId3v2
|
|
]);
|
|
|
|
RegisterComponentEditor(TJvID3Controller, TJvID3ControllerEditor);
|
|
RegisterPropertyEditor(TypeInfo(TJvID3FileInfo), nil, '', TJvID3FileInfoEditor);
|
|
|
|
RegisterPropertyEditor(TypeInfo(TJvFullColorSpaceID), nil, '', TJvColorIDEditor);
|
|
RegisterPropertyEditor(TypeInfo(TJvFullColor), nil, '', TJvFullColorProperty);
|
|
RegisterPropertyEditor(TypeInfo(TJvFullColorList), nil, '', TJvFullColorListEditor);
|
|
{
|
|
RegisterSelectionEditor(TJvFullColorPanel, TJvFullColorSelection);
|
|
RegisterSelectionEditor(TJvFullColorCircle, TJvFullColorSelection);
|
|
RegisterSelectionEditor(TJvFullColorLabel, TJvFullColorSelection);
|
|
RegisterSelectionEditor(TJvFullColorSpaceCombo, TJvFullColorSelection);
|
|
RegisterSelectionEditor(TJvFullColorAxisCombo, TJvFullColorSelection);
|
|
}
|
|
end;
|
|
|
|
end.
|
|
|