MtxAnova1.Data.SetIt(6,2,false,[1,2,
                              2,3,
                              5,7,
                              12,1,
                              5,8,
                              3,8]);
MtxAnova1.IsAnova1 := false; // do two-way ANOVA
MtxAnova1.Replications := 3; // three rows per "group"
MtxAnova1.ResultDest := StringGrid1;
MtxAnova1.Recalc;

MtxAnova1->Data->SetIt(6,2,false,OPENARRAY(double,(1,2,
                              2,3,
                              5,7,
                              12,1,
                              5,8,
                              3,8)));
MtxAnova1->IsAnova1 = false; // do two-way ANOVA
MtxAnova1->Replications = 3; // three rows per "group"
MtxAnova1->ResultDest = StringGrid1;
MtxAnova1->Recalc();