AnsiToNative函数怎么用？

Question

AnsiToNative函数怎么用？能给个例子吗？谢谢

Answer 1

 function AnsiToNative(Locale: TLocale; const AnsiStr: string; NativeStr: PChar; MaxLen: Integer): PChar; 
功能 把ANSI字符集转换成本地字符集
说明 type TLocale = Pointer;

Answer 2

如何让DELPHI数据库程序支持阿拉伯语？原来旧版本软件程序已经支持多国语言，但是没有阿拉伯语，现在想加阿拉伯语进去，没有原程序，只有EXE文件和一些数据库Language.DB文件和系统运行时支持的文件，我用DBGridEh1与数据库Language.DB关联，在生成的DBGrid.exe进行修改。可以输入阿拉伯语，在DBGrid.exe重新启动，也可以看到输入的阿拉伯语，这样应该是对数据库Language.DB进行修改成功了吧？但把这些数据库Language.DB，再考到原来的EXE文件的替换原来的数据库Language.DB，打开EXE看到的界面不是阿拉伯语了，而是乱码，是不是可以通过上面的字符集转换能实现我想要的增加阿拉伯语界面呢？