[Ierai]

Такой вопрос, если в денежный тип данных написать слово, то программа выдает ошибку и не может обработать запрос и в целом это правильно, но как сделать так, чтобы ошибку не выдавало и программа не вылетала и ,например, выдавался Messagebox или просто ничего не происходило

[NumLock]

Блок try/except

[Ierai]

Это мне уже сказали, спасибо, но я не знаю, как им пользоваться, и что прописывать

[NumLock]

В файле справки написано и даже пример есть!

[lmikle]

Ну, типа так:

Код:

var
  C  : Currency;
begin
  Try
    C := StrToCurr(Edit1.Text);
  Except
    On E : Exception Do
      Begin
        ShowMesage('Произошла ошибка при чтении данных: '+E.Message);
        C := 0;
      End;
  End;

  // ... продолжаем работу