计算字符串中空格个数 在delphi编程中,输入一个字符,分别统计出其中的英文字母,空格,数字字符的个数?

在delphi编程中,输入一个字符,分别统计出其中的英文字母,空格,数字字符的个数?for i := 0 to length(str_input) -1 do case str_input[i] of

在delphi编程中,输入一个字符,分别统计出其中的英文字母,空格,数字字符的个数?

for i := 0 to length(str_input) -1 do case str_input[i] of 32 : inc(space_counter) //空格 48..57 : inc(digit_counter) //数字 65..90 : inc(char_counter) //大写字母 97..122 : inc(char_counter)//小写字母 end