Delphi中取得汉字的首字母
摘要：
function Tdm.GetHzPy(const AHzStr: string): string;const ChinaCode: array[0..25, 0..1] of Integer = ((1601, 1636), (1637, 1832), (1833, 2077), (2078, 2273), (2274, 2301), (2302, 2432), (2433, 2593),... 阅读全文
posted @ 2006-09-07 16:57 龙少爷 阅读(636) 评论(0) 推荐(0) 编辑
