Подскажите с RadioGroup

[KARUSHEV]

круто! а я просто добавил кнопки на две группы, теперь все понятно, еще если не трудно глянь:
по твоему коду все работает, только если пользователь при ошибочном вводе в Edit1 захочет стереть число, вылетает ошибка

плюсик тебе поставил

[XuTpbIu]

Она и должна вылететь. Ведь мы же не можем перевести пустую строку в какое-то число как это требуется. можно конечно сделать,, что если у нас в Edite получилась пустая строка то ставить туда 0. Для этого в событие OnKeyDown у едита(2 раза кликни по OnKeyDown в Object Inspector в закладке Events, когда у тебя выделен Edit1):

If Edit1.Text = '' then
  Edit1.Text := '0';

[KARUSHEV]

Большое спасибо!

[KARUSHEV]

Сообщение от XuTpbIu

Она и должна вылететь. Ведь мы же не можем перевести пустую строку в какое-то число как это требуется. можно конечно сделать,, что если у нас в Edite получилась пустая строка то ставить туда 0. Для этого в событие OnKeyDown у едита(2 раза кликни по OnKeyDown в Object Inspector в закладке Events, когда у тебя выделен Edit1):

If Edit1.Text = '' then
  Edit1.Text := '0';

Вот это к сожалению не работает!