我想编一个DEKPHI小程序能按区位码逐一把windows字库中的汉字显示出来.请问怎样才能实现?

共有94区，每区94位，这个函数返回某区的所有字符：
function GetQu(qu:Integer):String;
var
i : Integer;
begin
if (qu<1) or (qu>94) then
begin result:=''; exit; end;
setlength(result,94*2);
for i:=1 to 94 do
begin
result[i*2-1] := char($a0 + qu);
result[i*2] := char($a0 + i);
end;
end;

谢谢了

那么如何区分unicode超大字符呢？

假设有一个汉字编码的文件，如何把一个文件中的汉字的单字、词及英文字母分开呢？

希望把全部程序都写出来!谢谢!