freepascal - 使用 lazarus 将 UTF8 转换为 ASCII

Question

我正在从文本文件中读取一些字符串，问题是这些字符串是 UTF8 并且包含我希望删除的字符，例如：Ă

对我来说，一个不容易的解决方案是替换每次出现的非法字符，但是因为我很懒，所以我想要一个更简单的解决方案

到目前为止，我试过这个：

    line := Utf8ToAnsi(line);

其中 line 是我的 UTF8 编码字符串...我尝试将 line 声明为 UTF8String ...

在这个问题上是否有可行的解决方案？谢谢

Answer 1

对我来说，一个不容易的解决方案是替换每次出现的非法字符，但是因为我很懒，所以我想要一个更简单的解决方案

我做了一个函数，将每个变音符号替换为类似的字符，例如：Á > A、Ç > C、ã > a 等。你可以使用这个解决方案。请查看此链接：https ://github.com/silvioprog/rutils/blob/master/src/rutils.pas#L1589 。

高温高压