Edit1->text valore numericos

[WolfBlack]

Estoy tratando de validar el edit text para que solo me acepte valores numericos, mas la verdad no he podido quice hacerlo de maneta manual y no pude con una funcion

Se que en la seccion de events, de edit se puede valida, mas no se como. espero que me puedan ayudar.




bool is_number(char c) {
static const string v = "1234567890";
string::const_iterator i = find(v.begin(), v.end(), c);
return i != v.end();
}