主要代码是：(BCB中）
TMyThread *MyThreadA;
....
.....
在主线程中，按下一个按钮，执行
{
HANDLE hThread;
//主线程句柄
hThread=DuplicateHandle(GetCurrentProcess(),GetCurrentThread(),GetCurrentProcess(),&hThread,0,FALSE,DUPLICATE_SAME__ACCESS);
MyThreadA=new TMyThread(true);
//创建线程A后使它先挂起
MyThreadA->hMainthread=hThread;
//hMainthread是TMyThread的成员变量
MyThreadA->Resume();
//启动线程A
}
在线程A中的Execute()中：
{
TForm2 *Form2;
Form2=new TForm2(Application);
//动态创建一个Form
SuspendThread(hMainthread);
//挂起主线程
Form2->ShowModal();
//显示Form2;
ResumeThread(hMainThread);
//唤醒主线程
}
我跟踪程序，在Form2->ShowModal()后程序就“死”了，Form2没有显示出来
???????
