Вверх ↑
Этот топик читают: Гость
Ответов: 66
Рейтинг: 1
#1: 2019-09-14 11:20:42 ЛС | профиль | цитата
Сделал программу, которая принимает на вход количество секунд и переводит их в дни или в часы, если меньше дня.
При вводе меньше 100000 работает всё корректно, например при 86400 выводит 24 часа, а при 86401 выводит 1 день.
А при вводе 100000 и больше выводит иногда в часах, а иногда в днях

Add(MainForm,2953706,21,105)
{
}
Add(LineBreakEx,13507275,343,133)
{
Caption="timeleft"
}
Add(Math,1951280,252,133)
{
OpType=3
Op2=86400
ResultType=0
link(onResult,16652430:doStrCat,[])
}
Add(StrCat,16652430,294,133)
{
Str1="Дней: "
link(onStrCat,13507275:doWork,[])
}
Add(If_else,10579533,203,133)
{
Type=2
Op2=Integer(86400)
link(onTrue,1951280:doOperation,[])
link(onFalse,12985682:doOperation,[(243,146)(243,188)])
}
Add(LineBreakEx,6431198,343,182)
{
Caption="timeleft"
}
Add(Math,12985682,252,182)
{
OpType=3
Op2=3600
ResultType=0
link(onResult,929549:doStrCat,[])
}
Add(StrCat,929549,294,182)
{
Str1="Часов: "
link(onStrCat,6431198:doWork,[])
}
Add(Edit,14027253,126,126)
{
Left=60
Top=30
Width=185
Text="Время в секундах"
link(onEnter,10579533:doCompare,[])
}
Add(Label,8827858,168,231)
{
Left=60
Top=60
Width=185
Height=20
Font=[MS Sans Serif,10,0,0,1]
Alignment=2
}
Add(LineBreakEx,12600775,105,231)
{
Caption="timeleft"
Type=1
link(OnEvent,8827858:doText,[])
}

--- Добавлено в 2019-09-14 11:31:14

Нашёл решение, перед условием поставил Math который прибавляет 0 и результат переводит в Integer

Редактировалось 2 раз(а), последний 2019-09-14 11:31:14
карма: 0

0
vip
#1.1контекстная реклама от партнеров
Ответов: 8885
Рейтинг: 823
#2: 2019-09-14 12:22:57 ЛС | профиль | цитата
Gazzi, это не If_Else странно работает, это вы не прочитали справку: If_Else сравнивает данные по типу первого операнда, а вы подаёте ТЕКСТ, вот и сравнивает как текст
Установите тип данных IntegerNumber и всё исправится.
If_Else.jpg

Редактировалось 1 раз(а), последний 2019-09-14 12:23:46
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#3: 2019-09-14 20:38:53 ЛС | профиль | цитата
А ведь Gazzi уже 4.5 года с HiAsm.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
3
Сообщение
...
Прикрепленные файлы
(файлы не залиты)