Char in CharSet の書き換え

Delphi 2009 では string が UnicodeString になった関係で Ch in ['0' .. '9', '.'] みたいに書くと下記のような警告が出る.

[DCC 警告] main.pas(391): W1050 set 式で WideChar がバイト char に縮小されました。'CharInSet' 関数を 'SysUtils' ユニットで使用することを検討してください。

ので、警告に従って書き換える.

CharInSet(Ch, ['0'..'9', '.'])