[[Ohcan]]

Hola alfredosg19
¿Lo que quieres es que el contenido del edit sea numérico (integer o float)?
Si es así, puedes definirte una función de este estilo:

Código Delphi [-]
function ComprobarNumerico(Texto: String; Key:Char): Char;
begin
  if Key <> Char(VK_BACK) then
    begin
      try
        if Key in[',','.'] then Key := DecimalSeparator;
        StrToFloat(Texto + Key + '0');
      except
        Result:=#0;
        Exit;
      end;
    end;
  Result := Key;
end;

Estoy escribiendo de memoria...
A esta funcion la llamas desde el evento onKeyPress del Edit de esta forma:

Código Delphi [-]
Key := ComprobarNumerico(MiEdit.Text; Key:Char);

Espero que te sirva...