[hilaryon]

есть еще вариант все проверять сперва на val

Код:

        val(memo1.Lines[14],v,err);
        if err=0 then
        begin
          form1.sEdit7.Text:= memo1.Lines[14];
          limvod:=strtofloat( memo1.Lines[14]);
        end else limvod:=1499;

но это честно говоря ппц ( в программе таких преобразований просто море, есть способы как-то упростить задачу? в одной программе видел такое что на любую ошибку пишет "ошибка, ну и хрен с ней" и программа не зависает ниразу.