如何统计变量的个数

Question

如题：
a1:='白'
a2:='夜'
a3:='夜'
a4:='白'
a5:='休'
......a20:='夜'在得到变量的值后，我怎么统计变量值是白是几个，夜的几个，休的几个？

Answer 1

1.使用内存表后，用SQL语句统计
2.写代码统计一个一个的统计了

Answer 2

用tstringlist来实现，或者用动态数组。
lsr := TStringList.Create;  lst.add('白');
  …… ……
最后记得释放lst.free

Answer 3

写的FOR的循环，可能麻烦些，但是解决了；