contar elementos de un edit

[ixMike]

Pues en el evento OnKeyPress

Código Delphi [-]
If not (Key in ['0'..'9', #8, #13]) then key:=#0;

Para asegurarte que hay 9 carácteres, utiliza la función Length(Edit1.text);

De todas formas, de esto ya se ha hablado en los foros. Haz una búsqueda para más información.


Saludos.