necesitas tener un arreglo de dos dimensiones, donde guardes el número y las veces que se ha repetido. Algo así:
[0, 2] que significa que el número cero se ha encontrado dos veces.
[1, 0] el uno no se ha encontrado
[2, 3] el dos está tres veces
y así hasta el nueve.
Y para saber los números necesitas extraer de la cadena del edit, de uno por uno, así que tienes que utilizar un FOR para recorrer la cadena. Luego necesitas el número donde puedes usar un COPY y por último necesitas comparar ese número, ese proceso lo puedes hacer utilizan on CASE.
Código:
Desde i = 1 hasta el final de la cadena
Case Cadena[i]
Cuando sea 0 entonces Arreglo[0] = Arreglo[0] + 1
Cuando sea 1 entonces Arreglo[1] = Arreglo[1] + 1
.... hasta el nueve.
algo así mas o menos, a menos que alguien tenga una mejor idea...