Files
lazarus-ccr/components/jvcllaz/design/JvXPCtrls/jvxpctrlsreg.pas

46 lines
858 B
ObjectPascal

unit JvXPCtrlsReg;
{$mode objfpc}{$H+}
interface
uses
Classes, LResources, SysUtils;
procedure Register;
implementation
uses
ComponentEditors, PropEdits, GraphPropEdits, ImgList,
JvDsgnConsts, JvXPCore, JvXPPropertyEditors,
JvXPBar, JvXPContainer, JvXPButtons, JvXPCheckCtrls;
procedure Register;
begin
RegisterComponents(RsPaletteJvclVisual, [ //RsPaletteXPControls, [
TJvXPBar,
TJvXPContainer,
TJvXPButton,
TJvXPToolButton,
TJvXPCheckbox,
TJvXPStyleManager
]);
{
RegisterPropertyEditor(TypeInfo(TImageIndex), TJvXPBarItem, 'ImageIndex',
TJvXPItemImageIndexProperty);
}
RegisterPropertyEditor(TypeInfo(TImageIndex), TJvXPBarItem, 'ImageIndex',
TImageIndexPropertyEditor);
RegisterComponentEditor(TJvXPBar, TJvXPBarItemEditor);
end;
initialization
{$I ../resource/jvxpctrlslaz.lrs}
end.