汉字转化为点阵信息

Question

各位高手：     如何把汉字、数值转化为16*16的点阵信息？十分急！     请指教！谢谢！

Answer 1

首先找一个16*16的汉字库，好像Windows有，但是忘了什么文件。好像是CHS16.FON
根据汉字内码得到汉字在汉字库中的位置。然后从汉字库中取出汉字点阵信息即可。
var  oldFont:Array[0..31] of Char;
       str:='汉'
       len:=((ord(str[1])-$B0)*94+(ord(str[2])-$a1));
       len:=len*32;
       FileSeek(FileHdle,len,0);
       FileRead(FileHdle,oldfont,32);
oldfont中就是汉字点阵信息。

Answer 2

UCdos有 16*16 24*24的点阵字库，很好取的