Проблема состоит в том что оператор try-catch перехватывает ошибку (вместо цифр ввод буквы) только со второго раза (после второго клика по кнопке "Расчитать"). В чем может быть проблема?
1. void __fastcall TForm1::Button1Click(TObject *Sender)
2. {
3. float fDlinnaKruga, fPloshadKruga, fRadiusInput;
4. char* tupo;
5. tupo = "Stupid!!!";
6. try
7. {
8. fRadiusInput=StrToFloat(RadiusInput->Text);
9. }
10. catch(...)
11. {
12. DlinnaKruga->Caption = tupo;
13. PloshadKruga->Caption = tupo;
14. }
15. fPloshadKruga = 3.14*fRadiusInput*fRadiusInput;
16. fDlinnaKruga = 3.14*2*fRadiusInput;
17. if (fDlinnaKruga > 0)
18. {
19. PloshadKruga->Caption = FloatToStr(fPloshadKruga);
20. DlinnaKruga->Caption = FloatToStr(fDlinnaKruga);
21. }
22. else
23. {
24. DlinnaKruga->Caption = tupo;
25. PloshadKruga->Caption = tupo;
26. }
27. }
Примечание:
ето из-за смены имен?
Примечание:
неужели из за вывода на панель а не на ТLabel
Примечание:
все, я во всем разобрался тема закрыта
RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.
Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.
Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.