validar que las cajas de texto solo acepten valores enteros y decimales

[dimer18]

hola q tal soy nuevo en el club delphi, bueno toy haciendo una aplicacion para realizar el metodo de gauss seidel en delphi, y bueno yo kiero ingresar valores a una matriz cuando doy clik en un button que se guarde en mi matriz lo que este en la caja de texto , pero kiero validar por medio de un codigo al dar click en el button que solo acepten valores enteros y decimales...... les agradezco por la ayuda que me puedan brindar...