看了段程序 提取拼音不明白 char(32) char(128) 表示什么??
function TForm1.GetPYIndexChar(hzchar: string): char;
begin
case WORD(hzchar[1]) shl 8 + WORD(hzchar[2]) of
$B0A1..$B0C4 : result := 'A';
....略
else
result := char(32);
end;
end;
function TForm1.GetPYIndexChar(hzchar: string): char;
begin
case WORD(hzchar[1]) shl 8 + WORD(hzchar[2]) of
$B0A1..$B0C4 : result := 'A';
....略
else
result := char(32);
end;
end;
char(10) = 折行(Unix下的回车)
一般windows系统中,char(13)+char(10) = 文本中的回车
char(32) = 空格
char(255) = null,表示一个不存在的字符。你可以在Command方式下试试,按住alt,然后数字键盘输入ascii码,就可以在屏幕上得到响应了。
譬如 alt + 7 = beep //别被吓一跳啊。