[[Chris]]

Normalmente siempre es más oportuno utilizar la función TryStrToFloat en lugar de StrToFloat. TryStrToFloat devuelve TRUE si la cadena dada en el primer parámetro solo tenía números, de lo contrario, devolverá FALSE.

Código Delphi [-]
var
    prueba: Double;
begin
    if not TryStrToFloat(Valor.Text, Prueba) then
    begin
        ShowMessage ('Lo que introdujo no es un número');
        Exit;
    end;
end;