1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
|
//---------------------------------------------------------------------------
__fastcall TMonThread::TMonThread(bool CreateSuspended)
: TThread(CreateSuspended)
{
}
//---------------------------------------------------------------------------
void __fastcall TMonThread::Execute()
{
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->Lines->Add(MonTexte);
} |
Partager