用Delphi编程时 如何利用线程
============================================================================
Windows95是Microsoft公司的第一个真正的多任务操作系统。在每一时刻可以有多个进程同时工作，而每一个进程又包含有多个线程。但只有一个处理器的计算机不可能真正地“同时”执行多个线程，而是操作系统把时间分成若干个时间片，然后把一个个时间片分配给每一个线程。
============================================================================
一个执行了的程序就是一个进程，一个进程则至少有一个主线程。一位高级程序员，绝不会让自己的程序里面只有一个主线程存在（除非只有很少的几十行代码），而是尽量让自己的程序在同一时刻里干更多的事，在比较大一点的应用中尤其如此，象数据库应用程序，在统计的时候我还想做其他事呢！因此，如何有效地利用线程则是每一个程序员都应了解的。本文就此简单地谈一下在Delphi中如何利用线程。
----(一)当使用线程时，我们主要有两个任务：
----（1）创建一个线程。
----（2）创建一个能作为线程入口的函数。
----WindowsAPI调用CreateThread函数来创建一个线程。函数如下：
HANDLE CreateThread(LPSECURITY_
ATTRIBUTESlpThreadAttributes,
//线程安全属性地址
DWORDdwStackSize,
//初始化线程堆栈尺寸
LPTHREAD_START_ROUTINElpStartAddress,
//线程函数所指向的地址
LPVOIDlpParameter,
//给线程函数传递的参数
DWORDdwCreationFlags,
//有关线程的标志
LPDWORDlpThreadId
//系统分配给线程的ID
);
----第一个参数是安全属性，一般设为nil，使用缺省的安全属性。当我们想此线程有另外的子进程时，可改变它的属性。
----第二个参数是线程堆栈尺寸，一般设为0，表示与此应用的堆栈尺寸相同，即主线程与创建的线程一样长度的堆栈。并且其长度会根据需要自动变长。
----第三个参数，也是最重要的一个，是一个指向函数名的指针，但传递时很简单，只需在线程函数名前加上@就可以了。
----第四个参数是你需要向线程函数传递的参数，一般是一个指向结构的指针。不需传递参数时，则这个参数设为nil。
----第五个参数，传入与线程有关的一些标志，如果是CREATE_SUSPENDED,则创建一个挂起的线程，即这个线程本身已创建，它的堆栈也已创建。但这个线程不会被分配给CPU时间，只有当ResumeThread函数被调用后才能执行；当然，也可以调用SuspendThread函数再次挂起线程。要是标志为0，那么一旦建
相关文档：
用Delphi 实现串口通讯，常用的几种方法为：使用控件如MSCOMM和SPCOMM，使用API函数或者在Delphi 中调用其它串口通讯程序。利用API编写串口通信程序较为复杂，需要掌握大量通信知识，其优点是可实现的功能更强大，应用面更广泛，更适合于编写较为复杂 的低层次通信程序。相比较而言，利用SPComm控件则相对较简单，该控件具� ......
TThread是一个抽象类,用于在delphi中创建线程。
创建一个TThread的子类对象即相当于创建一个线程。
当一个应用程序运行时，应用程序就被载入内存准备执行。此时，它成为包含一个或多个线程的进程。线程执行应用程序的部分内容，并由操作系统分配CPU时间。同一进程的所有线程共享同一地址空间，可以访问进程的全局变量 ......
需要用到的一个函数：
LONG SetWindowLong(
HWND hWnd,
int nIndex,
LONG dwNewLong
);
其中nIndex GWL_EXSTYLE Retrieves the extended window styles.
dwNewLong WS_EX_TOOLWINDOW Creates a tool window; that is, a window intended to ......
互斥量是系统内核对象，谁拥有就谁执行。它与临界区工作很类似。不同处在于：1、互斥量可以跨进程边界同步线程。2、可以给互斥量取个名字，通过引用互斥量的名字来使用一个已知的互斥量对象。
使用互斥量之类的对象需要反复调用系统内核，期间需要进行进程上下文转换和控制级别转换，大概需要耗� ......
Event事件用法与Mutex差不多，但它可以使用：SetEvent（启动运行）ResetEvent（暂停运行）、PulseEvent（执行一次后立即暂停）。
先看一下创建函数：CreateEvent(
......
