int id = 0;

void Thread( void *a)
{
Get(IntToStr(1000+id).c_str());
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
int i;
for(i=0;i<=1;i++)
_beginthread(Thread, 0, NULL);
}
//---------------------------------------------------------------------------