Помогите решить две проблемы

  • Автор темы Автор темы blackphoenix
  • Дата начала Дата начала
B

blackphoenix

Здравствуйте. Подскажите пожалуйста как в выражении FP+=StrToInt(LabeledEdit1->Text); игнорировать ошибку, которая возникает если в LabeledEdit1 ничего не введено, или там не цифровая информация.
И второй вопрос :
Для сворачивания программы в системный трей, я использую следующие две процедуры:
Код:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Tray->Visible=true;
Form1->Hide();
}
void __fastcall TForm1::N11Click(TObject *Sender)
{
Form1->Show();
Tray->Visible=false;
}
После первого нажатия баттон1, программа нормально сворачивается. После процедуры TForm1::N11Click второе сворачивание программы, не убирает ее из панели задач. Подскажите пожалуйста в чем причина.
З.Ы. Не бейте сильно, я начинающий.
 
После первого нажатия баттон1, программа нормально сворачивается в трее и исчезает из панели задач.
Процедура TForm1::N11Click вызывается из PopupMenu, которое всплывает от двойного клика по значку программы в трее. Эта процедура также выполняется нормально. А вот все последующие сворачивания, не убирают программы из панели задач, пока по ней не кликнуть мышкой.
Подскажите пожалуйста в чем может быть причина.
 
Тогда можно использовать try{} и catch{}
 
Спасибо за советы. Я решил эту проблему следующим образом. По событию KeyPress, вызываю подпрограмму, и в ней анализирую нажатую клавишу. Если это цифра, или разделительный знак, то оставляю, если иной символ, то игнорирую.
 
Работать не будет.
Работает:
Код:
 void __fastcall TForm1::LabeledEdit1KeyPress(TObject *Sender, char &Key)
{
if (((Key<'0')||(Key>'9'))&&(Key!=','))
Key=0;
В этом случае, вводятся только цифры и разделительный знака.
 
blackphoenix Скопируйте (ctrl+c) вот этот текст - '123_4ffDD,5' и всавте (ctrl+v) в свой LabeledEdit1.
Работает?
PS: еще варианты есть ...
Работает. В данном случае не работает (ctrl+v). :)
 
Мы в соцсетях:

Взломай свой первый сервер и прокачай скилл — Начни игру на HackerLab

🚀 Первый раз на Codeby?
Гайд для новичков: что делать в первые 15 минут, ключевые разделы, правила
Начать здесь →
🔴 Свежие CVE, 0-day и инциденты
То, о чём ChatGPT ещё не знает — обсуждаем в реальном времени
Threat Intel →
💼 Вакансии и заказы в ИБ
Pentest, SOC, DevSecOps, bug bounty — работа и проекты от проверенных компаний
Карьера в ИБ →

HackerLab