Delphi多线程学习(8)：优先级
一个线程的优先级取决于创建线程的进程的优先级（priority class）和线程本身相对的优先级（relative priority）。
1、进程优先级：
不同操作系统 优先级数目不同。Windows2000以上的版本列表如下：
Idle：（标志：IDLE_PRIORITY_CLASS，值为$40）；
Below Normal：（标志：BELOW_NORMAL_PRIORITY_CLASS，值为$4000）；
Normal：（标志：NORMAL_PRIORITY_CLASS，值为$20）；
Above Normal：（标志：ABOVE_NORMAL_PRIORITY_CLASS，值为$8000）；
High：（标志：HIGH_PRIORITY_CLASS，值为$80）；
Realtime：（标志：REALTIME_PRIORITY_CLASS，值为$100）。
进程的缺省优先级为Normal，几乎所有场合都不应将优先级设为Realtime。
创建进程时给定优先级，只要在CreateProcess中，将优先级标志做“OR”操作，填入dwCreationFlags参数中。
取得活动进程的优先级：
function GetPriorityClass(hProcess:THandle):DWORD;stdcall;
设置活动进程的优先级：
function SetPriorityClass(hProcess:THandle;dwPriorityClass:DWORD);BOOL;
（上面两个函数的hProcess由GetCurrentProcess函数获得，这个句柄不用CloseHandle关闭）
2、线程相对优先级：
线程优先级分7类，如下：
tpIdle：（常量：THREAD_PRIORITY_IDLE，值为-15）；
tpLowest：（常量：THREAD_PRIORITY_LOWEST，值为-2）；
tpBelow Normal：（常量：THREAD_PRIORITY_BELOW_NORMAL，值为-1）；
tpNormal：（常量：THREAD_PRIORITY_NORMAL，值为0）；
tpAbove Normal：（常量：THREAD_PRIORITY_ABOVE_NORMAL，值为1）；
tpHighest：（常量：THREAD_PRIORITY_HIGEST，值为2）；
tpTimeCritical：（常量：THREAD_PRIORITY_TIME_CRITICAL，值为15）；
对于线程类TThread，改变线程优先级非常方便，只要将派生类的Priority属性相应设置就好了。如：MyThread.Priority:=tpHighest;
3、线程优先级计算：
如果线程优先级为tpIdle，无论它所处的进程优先级是多少，线程整体优先级总是1，但是，当进程优先级为Realtime时，那么与tpIdle相组合，线程整体优先级为16；
如果线程优先级为tpTimeCritical，无论它所处的进程优先级为多少，整体优先组都是15，但是，当进程优先级是Realtime时，那与tpTim
相关文档：
用Delphi 实现串口通讯，常用的几种方法为：使用控件如MSCOMM和SPCOMM，使用API函数或者在Delphi 中调用其它串口通讯程序。利用API编写串口通信程序较为复杂，需要掌握大量通信知识，其优点是可实现的功能更强大，应用面更广泛，更适合于编写较为复杂 的低层次通信程序。相比较而言，利用SPComm控件则相对较简单，该控件具� ......
Delphi提供的字符串函数里有一个Pos函数，它的定义是：
function Pos(Substr: string; S: string): Integer;
它的作用是在字符串S中查找字符串Substr，返回值是Substr在S中第一次出现的位置，如果没有找到，返回值为0。
使用pos函数来查找字符第一次出现的位置
var
str1:string;
i,j:integer;
begin
str1:='dsf465 ......
现有一系统不定时在同一目录下生成一批txt文件,内容大概如下;
20100112_164910,6,81406392,808,113,,
为方便统计,需要将这些txt文件中的数据读入数据表中.
现有两种方法:
一是直接将数据读入到数据表中的某一列中,再用sql 语句拆开成几列:
......
临界区是一段代码，一次只允许一个线程执行这段代码。当把一段代码放入一个临界区, 线程执行到临界区时就独占了, 其他线程如果要访问这段代码，一定要等前一个访问的线程结束才行。借用前面的比喻比作图书馆，临界区就像把图书馆设计成只有一个位置（现实中好像不太合理，不管了，反正这么个意思），当有一个人正在办 ......
