With FChart do
    begin
      with Chart1.Title do
      begin
        Text.Clear;
        Font:=Font;
        Font.Size:=16;
        Font.Style:=[fsBold];
        Text.Add(pChart.sTitle);
        Text.Add('');
        Text.Add('');
      end;
      //设置页脚的标题以及字体
      with Chart1.Foot do
      begin
        Text.Clear;
        Font:=Font;
        Font.Size:=12;
        Text.Add(pChart.sXLabel);
      end;
      //设置左边的标题以及标题的字体
      Chart1.LeftAxis.Title.Font:=Font;
      Chart1.LeftAxis.Title.Caption:=pChart.sYLabel;
      //设置方块条底部的字体
      Chart1.BottomAxis.LabelsFont:=Font;
      Chart1.BottomAxis.LabelsFont.Size:=8;
      //添加值
      Chart1.AddSeries(TBarSeries.Create(Chart1));
        Chart1.Series[0].Add(100,'成绩',clRed);    end;