SDL & Object Pascal (Delphi) [2] 显示中文字符
一些基础的问题我不再赘述了，查阅帮助文档（Object Pascal SDL Doc.chm）显然比在这看我胡扯合适得多。那些画像素，获取像素信息，显示BMP文件多数时候只要把那些代码复制过来基本就能工作。下面说的是怎样显示中文。
其实SDL加上ttf支持时（需要将对应的dll文件添加到工程目录里）是完全可以显示中文的，简体和繁体都没问题（Object Pascal版本也不缺功能），但是只能用Unicode编码。这就是说，你必须选择一个Unicode编码完整的字体文件（或者说至少你需要的那些字符是完整的）。Windows下面这样的字体有很多，我推荐的有：
简体中文：宋体大字符集，微软雅黑；
繁体中文：细明体，微软正黑，标楷体。
这些基本是中文地区最重要的几种字体。一个缺憾就是用于显示简体中文的楷体（和其他字体）优秀的并不多。
输出中文时，可以先写这样的一个子程作为基础：
procedure DrawText(word: PUint16; x_pos, y_pos: integer; color: Uint32);
var
text: PSDL_Surface;
dest: TSDL_Rect;
begin
text := TTF_RenderUNICODE_blended(font, word, TSDL_Color(Color));
dest.x := x_pos;
dest.y := y_pos;
SDL_BlitSurface(text,nil, screen, @dest);
SDL_FreeSurface(text);
end;
screen就是已经定义好的那个主屏幕的标记。font是一个指向字体文件的指针，可以这样定义和初始化：
全局变量：
font: PTTF_Font;
在初始化状态的子程中：
TTF_Init;
font:=TTF_OpenFont('kaiu.ttf', 20);
当然font的定义和初始化写在DrawText里面也一样，只是写在全局变量里面就可以只初始化一次，可能会效率高一些。同样把DrawText里面用的那个text写成全局变量也是一个选择。在程序结束时，还要释放这些资源。
kaiu就是标楷体的文件名字，20是字号，需要把字体文件也放在工程目录里面。
TTF_RenderUNICODE_blended这个函数是以blended效果输出文字，以TTF_RenderUNICODE开头的函数有3个，对应的是不同的效果。
SDL_BlitSurface大致可以理解为在“表面”上再贴一层。
调用DrawText的方法如下：
str: WideString;
......
str:=' 这是一个显示中文的测试';
DrawText(@str[1], 100, 100, $FFFFFF);
Sdl_UpdateRect(screen, 0, 0, screen.w, screen.h);
注意一定要用WideString（或PWideChar）类型！
str前面我添加了一个空格。这是因为我发现有些字体中�
相关文档：
Chr 将一个有序数据转换为一个ANSI字符
Ord 将一个有序类型值转换为它的序号
Round 转换一个实型值为四舍五入后的整型值
Trunc 转换一个实型值为小数截断后的整型值
Int 返回浮点数的整数部分
IntToStr 将数值转换为字符� ......
Delphi键盘按键伪码
用法：if key = chr(VK_RETURN) then...
常数名称 十六进制值 十进制值 对应按键
VK_LBUTTON 01 1 鼠标的左键
VK_RBUTTON 02 2 鼠标的右键
VK-CANCEL 03 3 Contol-break 执行
VK_MBUTTON 04 4 鼠标的中键（三按键鼠标)
VK_BACK 08 8 Backspace键
VK_TAB 09 9 Tab键
VK_CLEAR 0C 12 Clear键
VK ......
有些时候,要写一些程序,在 JAVA 里面好难实现, 但如果使用其它编程语言却又比较容易时,我们不妨通过 JNI 来让不同语言的程序共同完成.
JNI 的教程, 网上 C 的比较多,Java 也提供了 javah.exe 为 C 语言的 JNI 程序生成头文件, 如果你是一个 Delphi 编程员, 能否让 JAVA 与 Delphi 程序交互呢? 答案是肯定的,今天我们就来 ......
注册码：6amd-pdj686-apme9d-9cdr
密匙：yvx-27c
Delphi部分函数、命令、属性中文说明
Abort 函数 引起放弃的意外处理
Abs 函数 绝对值函数
AddExitProc 函数 将一过程添加到运行时库的结束过程表中
Addr 函数 返回指定对象的地址
AdjustLineBreaks 函数 将给定字符串的行分隔符调整为CR/LF序列
Align 属性 使控件� ......
实际上这个名字叫[SDL & Delphi]也不成问题， 因为除了Delphi似乎也没有哪个流行的开发工具用的是Pascal语言。
SDL其实我也只学了不到两星期而已。刚开始我想试图用VC，因为这样资料最全，也很好找，但太久没用VC现在看C的代码有点困难（->这个算符是干吗的来着……）。其实作为一个专业不是计算机的人 ......
