内码转换--存放在.dfm中的到底是什么？？？

大虾们救命：
程序使用CVCODE的big5togb函数
在设计期将label1的
  caption: '當前'，
  font charset :Default_CharSet
  font name:Ms Sans Serif
程序 windows xp繁体+delphi 6 开发，windows2000简体运行
[code]
  label1.caption:=big5togb(label1.caption);   //此时caption 为  '當 '
  label1.caption:=big5togb('當前');           //此时caption 为  '当前'
[/code]