Delphi 分辨千位、百位、十位和个位数值