BCB中使用多线程

//创建一个多线程处理函数
DWORD CALLBACK ThreadFunc(void *p)
{
//这里写处理代码
return 0;
}

//开启多线程,在按钮单击事件或OnCreate事件中执行，如
void __fastcall TForm1::Button1Click(TObject *Sender)
{
DWORD ThreadID;
HANDLE hthread=CreateThread(0,0,ThreadFunc,0,0,&ThreadID);
}