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
相关文档：
例如以下代码：
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs;
type
TForm1 = class(TForm)
procedure one();
function two(x,y:integer):integer;
private
......
一些基础的问题我不再赘述了，查阅帮助文档（Object Pascal SDL Doc.chm）显然比在这看我胡扯合适得多。那些画像素，获取像素信息，显示BMP文件多数时候只要把那些代码复制过来基本就能工作。下面说的是怎样显示中文。
其实SDL加上ttf支持时（需要将对应的dll文件添加到工程目录里）是完全可以显示中文的，简体和繁体都没� ......
指针用法的例子：
1 var
2 X, Y: Integer; // X and Y 整数类型
3 &n ......
需要用到的一个函数：
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 ......
