delphi的汉字字库显示代码

如何使用汉字库的代码，delphi6switch(PixelSize){case12:HZKSize=24;//汉字库字模大小24字节(12*16/8)ASCSize=12;//ASC字库字模大小12字节AreaOffset=0;//16区以前不独立成字库File1Name=GetAppPath()+"font\\HZK12";iFileHandle1=fopen(File1Name.c_str(),"rb");File2Name=GetAppP