如何使用TCharHelper?

How to use TCharHelper?

下一个代码:

function get_symbol (var s: String): String;
var c: Char;
    p: Int32;
begin
// ... some more code ...
   c := upcase (s [p]);
   if IsDigit (c) then

导致以下错误消息:

[dcc32 Warning] fmx_utilities_string.pas(188): W1000 Symbol 'IsDigit' is deprecated: 'Use TCharHelper'

我不理解这条消息,因为包含 System.Character,c 被声明为 Char,TCharhelper 被声明为 Char 的字符助手。我究竟做错了什么?

您没有使用 TCharHelper; you're using the old System.Character IsDigit 函数。 TCharHelper.IsDigit的使用方法是:

if c.IsDigit then
  ...