pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

jvcllaz: Move some components to new "Jvcl Non-Visual" component palette.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6947 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2019-05-25 19:04:19 +00:00
parent bf30233549
commit 12a03ba23c
4 changed files with 9 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/jvcllaz/design/JvCmp/jvcmpreg.pas
View File

@ -21,7 +21,7 @@ uses
procedure Register; procedure Register;
begin begin
RegisterComponents(RsPaletteJvcl, [ RegisterComponents(RsPaletteJvclNonVisual, [
TJvStrHolder, TJvMultiStringHolder, TJvStrHolder, TJvMultiStringHolder,
TJvProfiler, TJvProfiler,
TJvSpellChecker TJvSpellChecker

4
components/jvcllaz/design/JvCore/JvDsgnConsts.pas
View File

@ -63,6 +63,8 @@ resourcestring
resourcestring resourcestring
RsPaletteJvcl = 'Jvcl'; RsPaletteJvcl = 'Jvcl';
RsPaletteJvclDB = 'Jvcl DB'; RsPaletteJvclDB = 'Jvcl DB';
RsPaletteJvclNonVisual = 'Jvcl Non-Visual';
RsPaletteSystem = 'Jv System'; RsPaletteSystem = 'Jv System';
RsPaletteDialog = 'Jv Dialogs'; RsPaletteDialog = 'Jv Dialogs';
RsPaletteButton = 'Jv Buttons'; RsPaletteButton = 'Jv Buttons';
@ -75,7 +77,7 @@ resourcestring
RsPaletteSliderSplitter = 'Jv Trackers, Sliders, Splitters'; RsPaletteSliderSplitter = 'Jv Trackers, Sliders, Splitters';
RsPaletteImageAnimator = 'Jv Images, Animators'; RsPaletteImageAnimator = 'Jv Images, Animators';
RsPaletteVisual = 'Jv Visual'; RsPaletteVisual = 'Jv Visual';
RsPaletteNonVisual = 'Jv Non-Visual'; // RsPaletteNonVisual = 'Jv Non-Visual';
RsPaletteThreading = 'Jv Threading'; RsPaletteThreading = 'Jv Threading';
RsPalettePersistence = 'Jv Persistence'; RsPalettePersistence = 'Jv Persistence';
RsPaletteAppForm = 'Jv Application, Forms'; RsPaletteAppForm = 'Jv Application, Forms';

5
components/jvcllaz/design/JvMM/jvmmreg.pas
View File

@ -25,7 +25,6 @@ uses
procedure Register; procedure Register;
begin begin
RegisterComponents(RsPaletteJvcl, [ RegisterComponents(RsPaletteJvcl, [
TJvId3v1, TJvId3v2,
TJvAnimatedImage, TJvAnimatedImage,
TJvBmpAnimator, TJvBmpAnimator,
TjvPicClip, TjvPicClip,
@ -36,6 +35,10 @@ begin
TJvFullColorDialog, TJvFullColorCircleDialog TJvFullColorDialog, TJvFullColorCircleDialog
]); ]);
RegisterComponents(RsPaletteJvclNonVisual, [
TJvId3v1, TJvId3v2
]);
RegisterComponentEditor(TJvID3Controller, TJvID3ControllerEditor); RegisterComponentEditor(TJvID3Controller, TJvID3ControllerEditor);
RegisterPropertyEditor(TypeInfo(TJvID3FileInfo), nil, '', TJvID3FileInfoEditor); RegisterPropertyEditor(TypeInfo(TJvID3FileInfo), nil, '', TJvID3FileInfoEditor);

2
components/jvcllaz/design/JvValidators/jvvalidatorreg.pp
View File

@ -19,7 +19,7 @@ uses
procedure Register; procedure Register;
begin begin
RegisterComponents(RsPaletteJvcl, [ RegisterComponents(RsPaletteJvclNonVisual, [
TJvValidators, TJvValidationSummary, TJvErrorIndicator TJvValidators, TJvValidationSummary, TJvErrorIndicator
]); ]);
// RegisterComponents(RsPaletteValidators, [TJvValidators, TJvValidationSummary, TJvErrorIndicator]); // RegisterComponents(RsPaletteValidators, [TJvValidators, TJvValidationSummary, TJvErrorIndicator]);