怎么判断是不是UTF8编码？

2010-01-02 01:38:49 499 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

CocosCreator 面试题（十五）Cocos Creator如何内置protobuf JS版本? 接着，它创建了一个 Player 对象，并使用 protobuf.js 提供的 API 对其进行序列化和反序列化操作。其中，name 和 level 是普通的字段，items 是一个 repeated 字段，表示它可以包含多个值。在 Cocos Creator 中使用 protobuf.js，我们需要先加载 .proto 文件，然后使用 protobuf.js 提供的 API 进行序列化和反序列化操作。JSON和XML是文本格式，更易于阅读和调试，而且在对人类友好的接口和数据交换上更为常见和广泛支持。阅读详情

DELPHI不知道怎么判断文件或字符串是否是UTF8编码。
我看到一个VB写的

Function OnUtf8(ByVal byts() As Byte) As Boolean
Try
Dim i As Int32, AscN As Int32
Do While i <= UBound(byts)
If byts(i) < 128 Then
i += 1 'ascii字符
AscN += 1
ElseIf (byts(i) And &HE0) = &HC0 And (byts(i + 1) And &HC0) = &H80 Then
i += 2 '2个字节的utf8
ElseIf (byts(i) And &HF0) = &HE0 And (byts(i + 1) And &HC0) = &H80 And (byts(i + 2) And &HC0) = &H80 Then
i += 3 '3个字节的utf8
Else
Return False
End If
Loop

断可以不要,当全部是ascii字符时,被划分到哪种编码
If AscN = byts.Length Then
Return False
Else
Return True
End If
Catch ex As Exception
'MsgBox(ex.Message)
End Try
End Function

...全文