You've already forked lazarus-ccr
jvcllaz: Add JvRollOut (expandable panel)
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6660 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -20,3 +20,4 @@ tjvruler.png
|
||||
tjvruler_150.png
|
||||
tjvruler_200.png
|
||||
tjvgroupheader.bmp
|
||||
tjvrollout.bmp
|
||||
|
BIN
components/jvcllaz/design/JvCtrls/images/tjvrollout.bmp
Normal file
BIN
components/jvcllaz/design/JvCtrls/images/tjvrollout.bmp
Normal file
Binary file not shown.
After Width: | Height: | Size: 1.6 KiB |
@ -14,24 +14,19 @@ implementation
|
||||
{$R ../../resource/jvctrlsreg.res}
|
||||
|
||||
uses
|
||||
Classes, JvDsgnConsts,
|
||||
JvMovableBevel, JvRuler, JvGroupHeader,
|
||||
Classes, ActnList, JvDsgnConsts,
|
||||
JvMovableBevel, JvRuler, JvGroupHeader, JvRollOut,
|
||||
JvHtControls, {JvDBHTLabel,} JvHint, JvHTHintForm,
|
||||
PropEdits, Controls;
|
||||
|
||||
procedure Register;
|
||||
begin
|
||||
RegisterComponents(RsPaletteJvcl, [
|
||||
TJvMovableBevel, TJvMovablePanel, TJvRuler, TJvGroupHeader,
|
||||
TJvMovableBevel, TJvMovablePanel, TJvRuler, TJvGroupHeader, TJvRollOut,
|
||||
TJvHint, TJvHTLabel, TJvHTListbox, TJvHTCombobox
|
||||
]);
|
||||
{
|
||||
RegisterComponents(RsPaletteBarPanel, [TJvMovableBevel]);
|
||||
RegisterComponents(RsPaletteLabel, [TJvHTLabel]);
|
||||
RegisterComponents(RsPaletteListComboTree, [TJvHTListBox, TJvHTComboBox]);
|
||||
RegisterComponents(RsPaletteNonVisual, [TJvHint]);
|
||||
}
|
||||
RegisterPropertyEditor(TypeInfo(TCaption), TJvHTLabel, 'Caption', TJvHintProperty);
|
||||
RegisterActions(RsJVCLActionsCategory, [TJvRollOutAction], nil);
|
||||
end;
|
||||
|
||||
end.
|
||||
|
Reference in New Issue
Block a user