__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
int i,j;
for(i=0;i<=9;i++)
{
if(i==0){
strngrd1->Cells[0][0] = "乘法口诀";
}
else
{
strngrd1->Cells[i][0]=IntToStr(i);
strngrd1->Cells[0][i]=IntToStr(i);
}
}
for(i=1;i<=9;i++)
for(j=1;j<=9;j++)
{
strngrd1->Cells[i][j]= IntToStr(i*j);
}
}