Delphi 多线程，弹出框中断问题
如题：
我的程序 Create 的时候 创建了N 个线程；这N个线程不停的在 监听N个COM口的数据；当分析数据时，有些时候要弹出application.messagebox 对话框判断 是否继续 执行线程，还是挂起线程。当多个线程同时弹出application.messagebox 对话框 时，程序就会死掉，没有反应了；当某个线程弹出的时候，是正常的；弹出框一多，程序就容易死；
有没有什么好方法可以避免死掉。
目前是 线程直接弹出 application.messagebox 对话框
如果直接通过 发送 消息 通知主界面 来弹出application.messagebox 对话框 的话，如果消息滞后了怎么办；线程不会立即停下来的
一个线程要弹出，把其他N-1线程都挂起，肯定是不合理的！别的还要工作的
关键是有异常的地方，要让管理员 知道，而且要主观进行判断
{{--
相关问答：
我在模块里自定义了一个函数:stradd()
可是在adoquery1.sql.add('select stradd(author) from book');
时提示stradd未定义...
这个问题有什么办法可以解决的吗? 非常感激!
(在A ......
有什么构想讨论一下。
这类东西主要是人气和界面花哨,技术上没什么难点.
这我知道，那技术上的呢？有没有构想一下该怎么设计？主要是delphi自身能不能够完成，若同时大量客户登陆，反应速度如何等等。
引用
......
各位大虾，小弟用的是ADO连接ACCESS数据库，用DBGrid显示查询的数据，我做的是个数据采集系统，根据不同的地址把数据放在ACCESS数据库中不同的表里面，现在我想查询某一段时间内所有表内的数据，并且在DBGrid中显示� ......
VC 控制台程序:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
