Подскажите чайнику

Тема в разделе "Delphi - FAQ", создана пользователем WhiteWereWolf, 9 май 2008.

Статус темы:
Закрыта.
  1. WhiteWereWolf

    WhiteWereWolf Гость

    Написала в Delphi простенькую програмку для кое-каких вычислений.
    При нажатии на кнопку выполняются заданные мной операции над числами и выводятся в Labele.
    Всё бы ничего, но у програмки глюк: если не введёшь в Editы числа, программа выдаёт ошибку и завершается.
    Подскажите, каким образом мне доработать программу :) .
     
  2. gozer

    gozer Гость

    само сабой ошибка будет, т.к. пустое значение Edit - будет рассматриваться как текст а не цифры
    и strtoint и т.п. выдаст ошибку, для этого просто надо использовать проверку на не пустые значения
    а почему вылетает сложно сказать - если кините код процедуры, то поможем
     
  3. WhiteWereWolf

    WhiteWereWolf Гость

    gozer, спасибо за совет.

    sax_ol, спасибо за подавления порыва к изучению программирования.
     
  4. Yason

    Yason Гость

    WhiteWereWolf
    Код (Text):
    procedure TForm2.Button1Click(Sender: TObject);
    var
    value1, value2: integer;
    begin
    try
    value1 := StrToInt(Edit1.Text);
    value2 := StrToInt(Edit2.Text);
    label1.Caption := IntToStr(value1+value2);
    except on EConvertError do
    label1.Caption := 'Enter integer numbers only';
    end;
    end;
    При запуске из IDE исключения всё равно будут выскакивать, их можно убрать в настройках - дебаггер - Language Exceptions - Exception types to ignore: нужно добавить EConvertError
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей