Uses StatControlCharts, MtxExp, Math387, MtxVecTee, StatSeries;
procedure Example(Series1: TQCSeries);
var CL, UCL, LCL : double;
  Data: Matrix;
  DrawVec: Vector;
begin
  Data.LoadFromFile('data.mtx');
  QCPChart(Data,10, DrawVec,CL,UCL,LCL,0.05);
  // setup limit lines
  Series1.UCL := UCL;
  Series1.LCL := LCL;
  Series1.CL := CL;
  // now draw actual data
  DrawValues(DrawVec,Series1);
end;

#include "StatSeries.hpp"
#include "MtxVecTee.hpp"
#include "MtxExpr.hpp"
#include "StatControlCharts.hpp"
#include "Math387.hpp"
void __fastcall Example(TQCSeries* Series1)
{
  sVector DrawVec;
    sVector Data;
  double cl,lcl,ucl;

  QCPChart(Data,10, DrawVec,cl,ucl,lcl,0.05);
  // Setup series properties
  Series1->UCL = ucl;
  Series1->LCL = lcl;
  Series1->CL = cl;
  DrawValues(DrawVec,Series1,0,1,false);
}