LazReport, fix inverted functionality for shadow width and curve in roundrect object, issue #14130

git-svn-id: trunk@20820 -
This commit is contained in:
jesus 2009-07-10 19:49:49 +00:00
parent ccae9c4c1c
commit 01f1a46a2a
4 changed files with 136 additions and 99 deletions

View File

@ -27,7 +27,7 @@ Lazarus Port: Olivier Guilbaud, Jesus Reyes A.
See license.txt and license-lazreport.txt for details.
"/>
<Version Minor="9" Release="5"/>
<Files Count="55">
<Files Count="58">
<Item1>
<Filename Value="lr_class.pas"/>
<UnitName Value="LR_Class"/>
@ -249,6 +249,18 @@ See license.txt and license-lazreport.txt for details.
<Filename Value="sysutilsadds.pas"/>
<UnitName Value="SysUtilsAdds"/>
</Item55>
<Item56>
<Filename Value="lr_rrect.lfm"/>
<Type Value="LFM"/>
</Item56>
<Item57>
<Filename Value="lr_rrect.lrs"/>
<Type Value="LRS"/>
</Item57>
<Item58>
<Filename Value="lr_rrect.pas"/>
<UnitName Value="LR_RRect"/>
</Item58>
</Files>
<i18n>
<EnableI18N Value="True"/>

View File

@ -7,10 +7,10 @@ unit lazreport;
interface
uses
LR_Class, LR_Desgn, LR_Register, LR_Flds, LR_DBSet, LR_BarC, LR_BndEd,
LR_Class, LR_Desgn, LR_Register, LR_Flds, LR_DBSet, LR_BarC, LR_BndEd,
LR_PGrid, LR_View, lr_expres, lr_funct_editor_unit, lr_funct_editor_unit1,
LR_Prntr, LR_Edit, LR_Pars, LR_fmted, LR_Const, LR_pgopt, LR_Dopt, LR_GEdit,
LR_Utils, LR_GrpEd, lr_propedit, LR_progr, LR_IFlds, SysUtilsAdds,
LR_Utils, LR_GrpEd, lr_propedit, LR_progr, LR_IFlds, SysUtilsAdds, LR_RRect,
LazarusPackageIntf;
implementation

View File

@ -1,10 +1,9 @@
inherited frRoundRectForm: TfrRoundRectForm
object frRoundRectForm: TfrRoundRectForm
Left = 262
Height = 284
Top = 162
Width = 562
HorzScrollBar.Page = 561
VertScrollBar.Page = 283
ActiveControl = panGrad
BorderStyle = bsDialog
Caption = 'Editeur de propri t s'
ClientHeight = 284
@ -17,11 +16,12 @@ inherited frRoundRectForm: TfrRoundRectForm
OnKeyDown = FormKeyDown
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '0.9.27'
object lblSample: TLabel
Left = 360
Height = 14
Height = 15
Top = 8
Width = 35
Width = 36
Caption = 'Sample'
ParentColor = False
end
@ -61,6 +61,7 @@ inherited frRoundRectForm: TfrRoundRectForm
'M1'
)
OnKeyDown = M1KeyDown
ParentFont = False
TabOrder = 0
WordWrap = False
end
@ -103,9 +104,9 @@ inherited frRoundRectForm: TfrRoundRectForm
end
object cbGradian: TCheckBox
Left = 360
Height = 19
Height = 21
Top = 136
Width = 66
Width = 64
Caption = 'Gradian '
OnChange = cbGradianChange
OnClick = cbGradianClick
@ -124,15 +125,15 @@ inherited frRoundRectForm: TfrRoundRectForm
TabOrder = 6
object lblSWidth: TLabel
Left = 9
Height = 14
Height = 15
Top = 41
Width = 93
Width = 94
Caption = 'Largeur de l''ombre '
ParentColor = False
end
object lblSColor: TLabel
Left = 8
Height = 14
Height = 15
Top = 67
Width = 41
Caption = 'Couleur '
@ -147,9 +148,9 @@ inherited frRoundRectForm: TfrRoundRectForm
end
object cmShadow: TCheckBox
Left = 8
Height = 19
Height = 21
Top = 15
Width = 54
Width = 52
Caption = 'Curve'
Checked = True
OnClick = cmShadowClick
@ -158,8 +159,8 @@ inherited frRoundRectForm: TfrRoundRectForm
end
object sCurve: TEdit
Left = 136
Height = 21
Top = 37
Height = 22
Top = 12
Width = 49
OnChange = ShWidthChange
TabOrder = 1
@ -167,8 +168,8 @@ inherited frRoundRectForm: TfrRoundRectForm
end
object ShWidth: TEdit
Left = 136
Height = 21
Top = 12
Height = 22
Top = 37
Width = 49
OnChange = ShWidthChange
TabOrder = 2
@ -176,9 +177,9 @@ inherited frRoundRectForm: TfrRoundRectForm
end
object cbCadre: TCheckBox
Left = 8
Height = 19
Height = 21
Top = 90
Width = 96
Width = 94
Caption = 'Zone encadr e'
Checked = True
OnClick = cbCadreClick
@ -199,9 +200,9 @@ inherited frRoundRectForm: TfrRoundRectForm
TabOrder = 7
object Label1: TLabel
Left = 8
Height = 13
Height = 15
Top = 77
Width = 97
Width = 46
Caption = 'End color'
ParentColor = False
end
@ -214,9 +215,9 @@ inherited frRoundRectForm: TfrRoundRectForm
end
object Label2: TLabel
Left = 8
Height = 13
Height = 15
Top = 49
Width = 121
Width = 51
Caption = 'Start color'
ParentColor = False
end
@ -230,19 +231,18 @@ inherited frRoundRectForm: TfrRoundRectForm
end
object Label3: TLabel
Left = 8
Height = 13
Height = 15
Top = 16
Width = 48
Width = 25
Caption = 'Style'
ParentColor = False
end
object cbStyle: TComboBox
Left = 64
Height = 21
Height = 27
Top = 12
Width = 121
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
ItemHeight = 13
ItemHeight = 0
Items.Strings = (
'Vertical'
'Horizontal'
@ -251,7 +251,6 @@ inherited frRoundRectForm: TfrRoundRectForm
'Horiz. Centr '
'Vert. Centr '
)
MaxLength = 0
OnChange = ShWidthChange
Style = csDropDownList
TabOrder = 0
@ -259,6 +258,28 @@ inherited frRoundRectForm: TfrRoundRectForm
end
object colorDlg: TColorDialog
Color = clBtnFace
CustomColors.Strings = (
'ColorA=000000'
'ColorB=000080'
'ColorC=008000'
'ColorD=008080'
'ColorE=800000'
'ColorF=800080'
'ColorG=808000'
'ColorH=808080'
'ColorI=C0C0C0'
'ColorJ=0000FF'
'ColorK=00FF00'
'ColorL=00FFFF'
'ColorM=FF0000'
'ColorN=FF00FF'
'ColorO=FFFF00'
'ColorP=FFFFFF'
'ColorQ=C0DCC0'
'ColorR=F0CAA6'
'ColorS=F0FBFF'
'ColorT=A4A0A0'
)
left = 184
top = 192
end

View File

@ -1,72 +1,76 @@
{ Ceci est un fichier ressource généré automatiquement par Lazarus }
LazarusResources.Add('TfrRoundRectForm','FORMDATA',[
'TPF0'#241#16'TfrRoundRectForm'#15'frRoundRectForm'#4'Left'#3#6#1#6'Height'#3
+#28#1#3'Top'#3#162#0#5'Width'#3'2'#2#18'HorzScrollBar.Page'#3'1'#2#18'VertSc'
+'rollBar.Page'#3#27#1#11'BorderStyle'#7#8'bsDialog'#7'Caption'#6#21'Editeur '
+'de propri t s'#12'ClientHeight'#3#28#1#11'ClientWidth'#3'2'#2#10'Font.Color'
+#7#7'clBlack'#11'Font.Height'#2#245#9'Font.Name'#6#13'MS Sans Serif'#10'KeyP'
+'review'#9#8'OnCreate'#7#10'FormCreate'#9'OnKeyDown'#7#11'FormKeyDown'#6'OnS'
+'how'#7#8'FormShow'#8'Position'#7#14'poScreenCenter'#0#6'TLabel'#9'lblSample'
+#4'Left'#3'h'#1#6'Height'#2#14#3'Top'#2#8#5'Width'#2'#'#7'Caption'#6#6'Sampl'
+'e'#11'ParentColor'#8#0#0#6'TImage'#6'Image1'#4'Left'#3'X'#1#6'Height'#2#16#3
+'Top'#3#180#0#5'Width'#2#16#8'AutoSize'#9#12'Picture.Data'#10#2#1#0#0#7'TBit'
+'map'#246#0#0#0'BM'#246#0#0#0#0#0#0#0'v'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0
+#4#0#0#0#0#0#128#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#0#0
+#128#0#0#0#128#128#0#128#0#0#0#128#0#128#0#128#128#0#0#192#192#192#0#128#128
+#128#0#0#0#255#0#0#255#0#0#0#255#255#0#255#0#0#0#255#0#255#0#255#255#0#0#255
+#255#255#0'wwwwwwwwwwwwwwwwwx'#136#136#136#136#136#136'p'#0#0#0#0#0#0#8#136
+#136#136#136#136#136#136#8#143#255#255#255#255#255#248#8#143'DDDDD'#248#8#143
+#255#255#255#255#255#248#8#143'DDDDD'#248#8#143#255#255#255#255#255#248#8#143
+'DDDD'#255#248#8#143#255#255#255#255#255#248#7#136#136#136#136#136#136#136'w'
+'wwwwwwwwwwwwwwwwwwwwwwww'#7'Visible'#8#0#0#6'TImage'#9'imgSample'#4'Left'#3
+'h'#1#6'Height'#2'i'#3'Top'#2#24#5'Width'#3#193#0#0#0#5'TMemo'#2'M1'#4'Left'
+#2#4#6'Height'#3#237#0#3'Top'#2#8#5'Width'#3'M'#1#11'Font.Height'#2#245#9'Fo'
+'nt.Name'#6#13'MS Sans Serif'#13'Lines.Strings'#1#6#2'M1'#0#9'OnKeyDown'#7#9
+'M1KeyDown'#8'TabOrder'#2#0#8'WordWrap'#8#0#0#7'TButton'#7'Button5'#4'Left'#2
+'['#6'Height'#2#25#3'Top'#3#252#0#5'Width'#2'U'#7'Caption'#6#13'Variables ..'
+'.'#7'OnClick'#7#12'Button5Click'#8'TabOrder'#2#1#0#0#7'TButton'#7'Button6'#4
+'Left'#2#4#6'Height'#2#25#3'Top'#3#252#0#5'Width'#2'Q'#7'Caption'#6#10'Donn '
+'es ..'#7'OnClick'#7#12'Button6Click'#8'TabOrder'#2#2#0#0#7'TButton'#3'bOk'#4
+'Left'#3#184#0#6'Height'#2#25#3'Top'#3#252#0#5'Width'#2'K'#7'Caption'#6#2'OK'
+#7'Default'#9#11'ModalResult'#2#1#8'TabOrder'#2#3#0#0#7'TButton'#7'bCancel'#4
+'Left'#3#8#1#6'Height'#2#25#3'Top'#3#252#0#5'Width'#2'K'#7'Caption'#6#7'Annu'
+'ler'#11'ModalResult'#2#2#8'TabOrder'#2#4#0#0#9'TCheckBox'#9'cbGradian'#4'Le'
+'ft'#3'h'#1#6'Height'#2#19#3'Top'#3#136#0#5'Width'#2'B'#7'Caption'#6#8'Gradi'
+'an '#8'OnChange'#7#15'cbGradianChange'#7'OnClick'#7#14'cbGradianClick'#8'Ta'
+'bOrder'#2#5#0#0#6'TPanel'#8'panCurve'#4'Left'#3'h'#1#6'Height'#2'u'#3'Top'#3
+#160#0#5'Width'#3#197#0#10'BevelInner'#7#8'bvRaised'#10'BevelOuter'#7#9'bvLo'
+'wered'#12'ClientHeight'#2'u'#11'ClientWidth'#3#197#0#11'FullRepaint'#8#8'Ta'
+'bOrder'#2#6#0#6'TLabel'#9'lblSWidth'#4'Left'#2#9#6'Height'#2#14#3'Top'#2')'
+#5'Width'#2']'#7'Caption'#6#19'Largeur de l''ombre '#11'ParentColor'#8#0#0#6
+'TLabel'#9'lblSColor'#4'Left'#2#8#6'Height'#2#14#3'Top'#2'C'#5'Width'#2')'#7
+'Caption'#6#8'Couleur '#11'ParentColor'#8#0#0#6'TImage'#6'bcolor'#4'Left'#3
+#128#0#6'Height'#2#25#3'Top'#2'@'#5'Width'#2'9'#7'OnClick'#7#11'bColorClick'
+#0#0#9'TCheckBox'#8'cmShadow'#4'Left'#2#8#6'Height'#2#19#3'Top'#2#15#5'Width'
+#2'6'#7'Caption'#6#5'Curve'#7'Checked'#9#7'OnClick'#7#13'cmShadowClick'#5'St'
+'ate'#7#9'cbChecked'#8'TabOrder'#2#0#0#0#5'TEdit'#6'sCurve'#4'Left'#3#136#0#6
+'Height'#2#21#3'Top'#2'%'#5'Width'#2'1'#8'OnChange'#7#13'ShWidthChange'#8'Ta'
+'bOrder'#2#1#4'Text'#6#2'10'#0#0#5'TEdit'#7'ShWidth'#4'Left'#3#136#0#6'Heigh'
+'t'#2#21#3'Top'#2#12#5'Width'#2'1'#8'OnChange'#7#13'ShWidthChange'#8'TabOrde'
+'r'#2#2#4'Text'#6#2'10'#0#0#9'TCheckBox'#7'cbCadre'#4'Left'#2#8#6'Height'#2
+#19#3'Top'#2'Z'#5'Width'#2'`'#7'Caption'#6#13'Zone encadr e'#7'Checked'#9#7
+'OnClick'#7#12'cbCadreClick'#5'State'#7#9'cbChecked'#8'TabOrder'#2#3#0#0#0#6
+'TPanel'#7'panGrad'#4'Left'#2'x'#6'Height'#2'u'#3'Top'#2'0'#5'Width'#3#197#0
+#10'BevelInner'#7#8'bvRaised'#10'BevelOuter'#7#9'bvLowered'#12'ClientHeight'
+#2'u'#11'ClientWidth'#3#197#0#11'FullRepaint'#8#8'TabOrder'#2#7#0#6'TLabel'#6
+'Label1'#4'Left'#2#8#6'Height'#2#13#3'Top'#2'M'#5'Width'#2'a'#7'Caption'#6#9
+'End color'#11'ParentColor'#8#0#0#6'TImage'#7'bcolor3'#4'Left'#3#128#0#6'Hei'
+'ght'#2#25#3'Top'#2'J'#5'Width'#2'9'#7'OnClick'#7#11'bColorClick'#0#0#6'TLab'
+'el'#6'Label2'#4'Left'#2#8#6'Height'#2#13#3'Top'#2'1'#5'Width'#2'y'#7'Captio'
+'n'#6#11'Start color'#11'ParentColor'#8#0#0#6'TImage'#7'bColor2'#3'Tag'#2#1#4
+'Left'#3#128#0#6'Height'#2#25#3'Top'#2'*'#5'Width'#2'9'#7'OnClick'#7#11'bCol'
+'orClick'#0#0#6'TLabel'#6'Label3'#4'Left'#2#8#6'Height'#2#13#3'Top'#2#16#5'W'
+'idth'#2'0'#7'Caption'#6#5'Style'#11'ParentColor'#8#0#0#9'TComboBox'#7'cbSty'
+'le'#4'Left'#2'@'#6'Height'#2#21#3'Top'#2#12#5'Width'#2'y'#16'AutoCompleteTe'
+'xt'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0#10'ItemHeight'
+#2#13#13'Items.Strings'#1#6#8'Vertical'#6#10'Horizontal'#6#10'Elliptique'#6#9
,'Rectangle'#6#13'Horiz. Centr '#6#12'Vert. Centr '#0#9'MaxLength'#2#0#8'OnCh'
+'ange'#7#13'ShWidthChange'#5'Style'#7#14'csDropDownList'#8'TabOrder'#2#0#0#0
+#0#12'TColorDialog'#8'colorDlg'#5'Color'#7#9'clBtnFace'#4'left'#3#184#0#3'to'
+'p'#3#192#0#0#0#0
'TPF0'#16'TfrRoundRectForm'#15'frRoundRectForm'#4'Left'#3#6#1#6'Height'#3#28#1
+#3'Top'#3#162#0#5'Width'#3'2'#2#13'ActiveControl'#7#7'panGrad'#11'BorderStyl'
+'e'#7#8'bsDialog'#7'Caption'#6#21'Editeur de propri t s'#12'ClientHeight'#3
+#28#1#11'ClientWidth'#3'2'#2#10'Font.Color'#7#7'clBlack'#11'Font.Height'#2
+#245#9'Font.Name'#6#13'MS Sans Serif'#10'KeyPreview'#9#8'OnCreate'#7#10'Form'
+'Create'#9'OnKeyDown'#7#11'FormKeyDown'#6'OnShow'#7#8'FormShow'#8'Position'#7
+#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.27'#0#6'TLabel'#9'lblSample'#4'Le'
+'ft'#3'h'#1#6'Height'#2#15#3'Top'#2#8#5'Width'#2'$'#7'Caption'#6#6'Sample'#11
+'ParentColor'#8#0#0#6'TImage'#6'Image1'#4'Left'#3'X'#1#6'Height'#2#16#3'Top'
+#3#180#0#5'Width'#2#16#8'AutoSize'#9#12'Picture.Data'#10#2#1#0#0#7'TBitmap'
+#246#0#0#0'BM'#246#0#0#0#0#0#0#0'v'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0#4#0
+#0#0#0#0#128#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#0#0#128#0
+#0#0#128#128#0#128#0#0#0#128#0#128#0#128#128#0#0#192#192#192#0#128#128#128#0
+#0#0#255#0#0#255#0#0#0#255#255#0#255#0#0#0#255#0#255#0#255#255#0#0#255#255
+#255#0'wwwwwwwwwwwwwwwwwx'#136#136#136#136#136#136'p'#0#0#0#0#0#0#8#136#136
+#136#136#136#136#136#8#143#255#255#255#255#255#248#8#143'DDDDD'#248#8#143#255
+#255#255#255#255#248#8#143'DDDDD'#248#8#143#255#255#255#255#255#248#8#143'DD'
+'DD'#255#248#8#143#255#255#255#255#255#248#7#136#136#136#136#136#136#136'www'
+'wwwwwwwwwwwwwwwwwwwwww'#7'Visible'#8#0#0#6'TImage'#9'imgSample'#4'Left'#3'h'
+#1#6'Height'#2'i'#3'Top'#2#24#5'Width'#3#193#0#0#0#5'TMemo'#2'M1'#4'Left'#2#4
+#6'Height'#3#237#0#3'Top'#2#8#5'Width'#3'M'#1#11'Font.Height'#2#245#9'Font.N'
+'ame'#6#13'MS Sans Serif'#13'Lines.Strings'#1#6#2'M1'#0#9'OnKeyDown'#7#9'M1K'
+'eyDown'#10'ParentFont'#8#8'TabOrder'#2#0#8'WordWrap'#8#0#0#7'TButton'#7'But'
+'ton5'#4'Left'#2'['#6'Height'#2#25#3'Top'#3#252#0#5'Width'#2'U'#7'Caption'#6
+#13'Variables ...'#7'OnClick'#7#12'Button5Click'#8'TabOrder'#2#1#0#0#7'TButt'
+'on'#7'Button6'#4'Left'#2#4#6'Height'#2#25#3'Top'#3#252#0#5'Width'#2'Q'#7'Ca'
+'ption'#6#10'Donn es ..'#7'OnClick'#7#12'Button6Click'#8'TabOrder'#2#2#0#0#7
+'TButton'#3'bOk'#4'Left'#3#184#0#6'Height'#2#25#3'Top'#3#252#0#5'Width'#2'K'
+#7'Caption'#6#2'OK'#7'Default'#9#11'ModalResult'#2#1#8'TabOrder'#2#3#0#0#7'T'
+'Button'#7'bCancel'#4'Left'#3#8#1#6'Height'#2#25#3'Top'#3#252#0#5'Width'#2'K'
+#7'Caption'#6#7'Annuler'#11'ModalResult'#2#2#8'TabOrder'#2#4#0#0#9'TCheckBox'
+#9'cbGradian'#4'Left'#3'h'#1#6'Height'#2#21#3'Top'#3#136#0#5'Width'#2'@'#7'C'
+'aption'#6#8'Gradian '#8'OnChange'#7#15'cbGradianChange'#7'OnClick'#7#14'cbG'
+'radianClick'#8'TabOrder'#2#5#0#0#6'TPanel'#8'panCurve'#4'Left'#3'h'#1#6'Hei'
+'ght'#2'u'#3'Top'#3#160#0#5'Width'#3#197#0#10'BevelInner'#7#8'bvRaised'#10'B'
+'evelOuter'#7#9'bvLowered'#12'ClientHeight'#2'u'#11'ClientWidth'#3#197#0#11
+'FullRepaint'#8#8'TabOrder'#2#6#0#6'TLabel'#9'lblSWidth'#4'Left'#2#9#6'Heigh'
+'t'#2#15#3'Top'#2')'#5'Width'#2'^'#7'Caption'#6#19'Largeur de l''ombre '#11
+'ParentColor'#8#0#0#6'TLabel'#9'lblSColor'#4'Left'#2#8#6'Height'#2#15#3'Top'
+#2'C'#5'Width'#2')'#7'Caption'#6#8'Couleur '#11'ParentColor'#8#0#0#6'TImage'
+#6'bcolor'#4'Left'#3#128#0#6'Height'#2#25#3'Top'#2'@'#5'Width'#2'9'#7'OnClic'
+'k'#7#11'bColorClick'#0#0#9'TCheckBox'#8'cmShadow'#4'Left'#2#8#6'Height'#2#21
+#3'Top'#2#15#5'Width'#2'4'#7'Caption'#6#5'Curve'#7'Checked'#9#7'OnClick'#7#13
+'cmShadowClick'#5'State'#7#9'cbChecked'#8'TabOrder'#2#0#0#0#5'TEdit'#6'sCurv'
+'e'#4'Left'#3#136#0#6'Height'#2#22#3'Top'#2#12#5'Width'#2'1'#8'OnChange'#7#13
+'ShWidthChange'#8'TabOrder'#2#1#4'Text'#6#2'10'#0#0#5'TEdit'#7'ShWidth'#4'Le'
+'ft'#3#136#0#6'Height'#2#22#3'Top'#2'%'#5'Width'#2'1'#8'OnChange'#7#13'ShWid'
+'thChange'#8'TabOrder'#2#2#4'Text'#6#2'10'#0#0#9'TCheckBox'#7'cbCadre'#4'Lef'
+'t'#2#8#6'Height'#2#21#3'Top'#2'Z'#5'Width'#2'^'#7'Caption'#6#13'Zone encadr'
+' e'#7'Checked'#9#7'OnClick'#7#12'cbCadreClick'#5'State'#7#9'cbChecked'#8'Ta'
+'bOrder'#2#3#0#0#0#6'TPanel'#7'panGrad'#4'Left'#2'x'#6'Height'#2'u'#3'Top'#2
+'0'#5'Width'#3#197#0#10'BevelInner'#7#8'bvRaised'#10'BevelOuter'#7#9'bvLower'
+'ed'#12'ClientHeight'#2'u'#11'ClientWidth'#3#197#0#11'FullRepaint'#8#8'TabOr'
+'der'#2#7#0#6'TLabel'#6'Label1'#4'Left'#2#8#6'Height'#2#15#3'Top'#2'M'#5'Wid'
+'th'#2'.'#7'Caption'#6#9'End color'#11'ParentColor'#8#0#0#6'TImage'#7'bcolor'
+'3'#4'Left'#3#128#0#6'Height'#2#25#3'Top'#2'J'#5'Width'#2'9'#7'OnClick'#7#11
+'bColorClick'#0#0#6'TLabel'#6'Label2'#4'Left'#2#8#6'Height'#2#15#3'Top'#2'1'
+#5'Width'#2'3'#7'Caption'#6#11'Start color'#11'ParentColor'#8#0#0#6'TImage'#7
+'bColor2'#3'Tag'#2#1#4'Left'#3#128#0#6'Height'#2#25#3'Top'#2'*'#5'Width'#2'9'
+#7'OnClick'#7#11'bColorClick'#0#0#6'TLabel'#6'Label3'#4'Left'#2#8#6'Height'#2
+#15#3'Top'#2#16#5'Width'#2#25#7'Caption'#6#5'Style'#11'ParentColor'#8#0#0#9
+'TComboBox'#7'cbStyle'#4'Left'#2'@'#6'Height'#2#27#3'Top'#2#12#5'Width'#2'y'
+#10'ItemHeight'#2#0#13'Items.Strings'#1#6#8'Vertical'#6#10'Horizontal'#6#10
+'Elliptique'#6#9'Rectangle'#6#13'Horiz. Centr '#6#12'Vert. Centr '#0#8'OnCha'
,'nge'#7#13'ShWidthChange'#5'Style'#7#14'csDropDownList'#8'TabOrder'#2#0#0#0#0
+#12'TColorDialog'#8'colorDlg'#5'Color'#7#9'clBtnFace'#20'CustomColors.String'
+'s'#1#6#13'ColorA=000000'#6#13'ColorB=000080'#6#13'ColorC=008000'#6#13'Color'
+'D=008080'#6#13'ColorE=800000'#6#13'ColorF=800080'#6#13'ColorG=808000'#6#13
+'ColorH=808080'#6#13'ColorI=C0C0C0'#6#13'ColorJ=0000FF'#6#13'ColorK=00FF00'#6
+#13'ColorL=00FFFF'#6#13'ColorM=FF0000'#6#13'ColorN=FF00FF'#6#13'ColorO=FFFF0'
+'0'#6#13'ColorP=FFFFFF'#6#13'ColorQ=C0DCC0'#6#13'ColorR=F0CAA6'#6#13'ColorS='
+'F0FBFF'#6#13'ColorT=A4A0A0'#0#4'left'#3#184#0#3'top'#3#192#0#0#0#0
]);