Accéléré mon programe

Bonjour tout le monde voilà mon problème
Je veux écrire la somme suivant tel qu’elle est sur un TMemo la somme est :
X11+X12+X13…….+Xij
J’ai fait le code suivant mais il est très couteux en temps d’exécution
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int i, j, n, m;
String MonTexte = "";

n = StrToInt(Edit1->Text);
m = StrToInt(Edit2->Text);
for(i=1; i<=n; i++)
{
for(j=1; j<=m; j++)
{
MonTexte += "x" + IntToStr(i) + IntToStr(j) + "+";
}
}
Memo1->Text = MonTexte;
}