we are using TeeChart Pro v7.02 for Delphi 6
We have a chart with 3 BarSeries, with different values.
Our goal is to show each value of each series, even on X axis, and every value of each series with the same color.
We (quite) successfully created the chart as follows:
Code: Select all
object Chart8: TChart
Left = 8
Top = 4
Width = 669
Height = 441
Title.Text.Strings = (
'TChart')
BottomAxis.LabelStyle = talText
View3D = False
TabOrder = 0
object BarSerie1: TBarSeries
Depth = 0
Marks.Callout.Brush.Color = clBlack
Marks.Visible = True
BarWidthPercent = 100
Gradient.Direction = gdTopBottom
MultiBar = mbSideAll
SideMargins = False
XValues.Name = 'X'
XValues.Order = loAscending
YValues.Name = 'Barre'
YValues.Order = loNone
Data = {
04030000000000000000005E4003414646000000000000444002413100000000
00005440024132}
end
object BarSerie2: TBarSeries
Marks.Callout.Brush.Color = clBlack
Marks.Visible = True
BarWidthPercent = 100
Gradient.Direction = gdTopBottom
MultiBar = mbSideAll
SideMargins = False
XValues.Name = 'X'
XValues.Order = loAscending
YValues.Name = 'Barre'
YValues.Order = loNone
Data = {040200000000000000008050400349444D0000000000004C4003494443}
end
object BarSerie3: TBarSeries
Depth = 0
Marks.Callout.Brush.Color = clBlack
Marks.Visible = True
BarWidthPercent = 100
Gradient.Direction = gdTopBottom
MultiBar = mbSideAll
SideMargins = False
XValues.Name = 'X'
XValues.Order = loAscending
YValues.Name = 'Barre'
YValues.Order = loNone
Data = {04020000000000000000C05740034D4F540000000000C05240034D4F43}
end
end
As you can see, there are 2 things to fix:
1) Only the first series values are shown on X axis
2) Last value of each series has a smaller size
You can notice also that each series value is correctly shown if we use marks. But we would use marks to show bar values, instead of bar labels.
Any way to workaround this?
Thank you