Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Проверка на float

Автор: conio 16.11.2007, 13:37

День добрый ...
не подскажите функцию которая проверяет строку на float

желательно булевую...

если нет то подскажите как перехватить сообщение об ошибке(в случае если строка не может конвертнуться в float) функции StrToFloat();

Автор: Moid 16.11.2007, 13:41

В таких случаях используется
TRY ...
Примеры смотри в хелпе

Автор: Rennigth 16.11.2007, 13:56

Цитата(conio @ 16.11.2007, 13:37

)

День добрый ...
не подскажите функцию которая проверяет строку на float

желательно булевую...

Код


TryStrToFloat/StrToFloatDef

Автор: conio 16.11.2007, 13:58

Код


float p;
try
  p := StrToFloat(s);
 finally
  ShowMessage('Ошибка');
end

Выполняя try сгенериться ошибка!

А мне нужно чтобы выдавалось только мое сообщение о ошибке без ошибки которое сгенериться в try

Автор: Rennigth 16.11.2007, 14:04

Цитата(conio @ 16.11.2007, 13:58

)

А мне нужно чтобы выдавалось только мое сообщение о ошибке без ошибки которое сгенериться в try

Код


  try
    p := StrToFloat(s);
  except
    on E: EConvertError do
      raise EConvertError.Create('Ошибка конвертации');
  end;

но лучше :

Код


  if not TryStrToFloat(s, p)  then
    raise EConvertError.Create('Ошибка конвертации'); //или еще что

Автор: conio 16.11.2007, 14:21

Спасибо огромное за помощь!