スレッドについて

スレッドの練習なんですが、例としてForm1にLabel1とButton1を置いて
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{

int i;

TestThread *theThread;
theThread = new TestThread(true);
theThread->FreeOnTerminate = true;
theThread->Resume();

Label1->Caption = IntToStr(i);

}
//---------------------------------------------------------------------------
とし、
スレッドには
//---------------------------------------------------------------------------
void __fastcall TestThread::Execute()
{
// TODO : スレッドとして実行したいコードを以下に記述 */
i++;
}
//---------------------------------------------------------------------------
として、ボタンを押すごとにiをインクリメントしてLabel1に表示したいのですが
どうなおせばいいですか