TAChart: Update "multi" demo to show box-and-whispers legend

git-svn-id: trunk@39933 -
This commit is contained in:
ask 2013-01-22 12:07:28 +00:00
parent 9480b0ac80
commit 5f4ad40cae

View File

@ -1,7 +1,7 @@
object Form1: TForm1 object Form1: TForm1
Left = 387 Left = 464
Height = 459 Height = 459
Top = 241 Top = 321
Width = 529 Width = 529
Caption = 'Form1' Caption = 'Form1'
ClientHeight = 459 ClientHeight = 459
@ -20,11 +20,11 @@ object Form1: TForm1
TabOrder = 0 TabOrder = 0
object tsBubble: TTabSheet object tsBubble: TTabSheet
Caption = 'Bubble' Caption = 'Bubble'
ClientHeight = 431 ClientHeight = 433
ClientWidth = 521 ClientWidth = 521
object chBubble: TChart object chBubble: TChart
Left = 0 Left = 0
Height = 431 Height = 433
Top = 0 Top = 0
Width = 521 Width = 521
AxisList = < AxisList = <
@ -243,6 +243,8 @@ object Form1: TForm1
end> end>
Foot.Brush.Color = clBtnFace Foot.Brush.Color = clBtnFace
Foot.Font.Color = clBlue Foot.Font.Color = clBlue
Legend.SymbolWidth = 40
Legend.Visible = True
Title.Brush.Color = clBtnFace Title.Brush.Color = clBtnFace
Title.Font.Color = clBlue Title.Font.Color = clBlue
Title.Text.Strings = ( Title.Text.Strings = (
@ -251,7 +253,9 @@ object Form1: TForm1
Align = alClient Align = alClient
ParentColor = False ParentColor = False
object chWhiskersBoxAndWhiskerSeries1: TBoxAndWhiskerSeries object chWhiskersBoxAndWhiskerSeries1: TBoxAndWhiskerSeries
Title = 't1'
BoxBrush.Color = clGreen BoxBrush.Color = clGreen
BoxPen.Color = clMaroon
MedianPen.Color = clLime MedianPen.Color = clLime
MedianPen.Width = 2 MedianPen.Width = 2
WhiskersPen.Color = clBlue WhiskersPen.Color = clBlue