Вверх ↑
Этот топик читают: Гость
Ответов: 181
Рейтинг: 14
#1: 2018-08-29 00:25:51 ЛС | профиль | цитата
Подскажите как правильней сделать.

Add(MainForm,2953706,14,63)
{
Width=120
Height=142
Position=1
}
Add(Label,3979818,147,35)
{
Left=15
Top=15
Height=20
Color=10987519
Font=[Calibri,11,1,0,204]
Ctl3D=0
WinStyle=2
Name="нз 13"
Caption="0.17"
AutoSize=1
Alignment=2
}
Add(Label,1955835,210,35)
{
Left=16
Top=60
Height=20
Color=16764057
Font=[Calibri,11,1,0,204]
Ctl3D=0
WinStyle=2
Name="нз 13"
Caption="0.14"
AutoSize=1
Alignment=2
}
Add(Label,245292,280,112)
{
Left=34
Top=38
Height=19
Color=12644534
Font=[Calibri,10,1,0,204]
Ctl3D=0
WinStyle=2
Name="нз 13"
Caption="0.17"
AutoSize=1
Alignment=1
}
Add(UpDown,11514661,112,112)
{
Left=14
Top=35
Height=25
Max=100
Position=50
Step=2
link(onPosition,13284789:doCalc,[])
}
Add(MathParse,13284789,168,112)
{
DataCount=3
MathStr="((%2 - %3)/100)*%1+%3"
link(onResult,16726245:doOperation,[])
link(X2,3979818:Caption,[(181,79)(153,79)])
link(X3,1955835:Caption,[(188,79)(216,79)])
}
Add(Math,16726245,224,112)
{
OpType=35
Op2=0.001
link(onResult,245292:doText,[])
}

карма: 0

0
vip
#1.1контекстная реклама от партнеров
Ответов: 9906
Рейтинг: 351
#2: 2018-08-29 04:46:25 ЛС | профиль | цитата

Add(MainForm,13452769,245,77)
{
Width=120
Height=142
Position=1
}
Add(Label,3979818,308,77)
{
Left=15
Top=15
Height=20
Color=10987519
Font=[Calibri,11,1,0,204]
Ctl3D=0
WinStyle=2
Name="нз 13"
Caption="0.17"
AutoSize=1
Alignment=2
}
Add(Label,1955835,364,77)
{
Left=16
Top=60
Height=20
Color=16764057
Font=[Calibri,11,1,0,204]
Ctl3D=0
WinStyle=2
Name="нз 13"
Caption="0.14"
AutoSize=1
Alignment=2
}
Add(Label,245292,364,154)
{
Left=34
Top=38
Height=19
Color=12644534
Font=[Calibri,10,1,0,204]
Ctl3D=0
WinStyle=2
Name="нз 13"
Caption="0.17"
AutoSize=1
Alignment=1
}
Add(UpDown,11514661,245,154)
{
Left=14
Top=35
Height=25
Max=100
Position=50
Step=2
link(onPosition,13284789:doCalc,[])
}
Add(MathParse,13284789,301,154)
{
DataCount=3
MathStr="round(((%2 - %3)/100)*%1+%3,0.001)"
link(onResult,245292:doText,[])
link(X2,3979818:Caption,[])
link(X3,1955835:Caption,[(321,121)(370,121)])
}
карма: 9

0
Ответов: 181
Рейтинг: 14
#3: 2018-08-29 08:11:01 ЛС | профиль | цитата
Galkov Спасибо.
Еще бы не моргала при перемотке

--- Добавлено в 2018-08-29 08:26:09

Пардон, прикрутил к основной проге работает не моргает.

--- Добавлено в 2018-08-29 08:51:00

Блин опять моргает

Редактировалось 2 раз(а), последний 2018-08-29 08:51:00
карма: 0

0
Ответов: 8888
Рейтинг: 823
#4: 2018-08-29 10:45:04 ЛС | профиль | цитата
Stalevar, моргает -- меняется количество цифр после запятой?
Возьмите компонент от Tadhttp://forum.hiasm.com/getfile/38464

Редактировалось 1 раз(а), последний 2018-08-29 10:46:01
карма: 19

0
файлы: 1Digit2Str.rar [2KB] [416]
Ответов: 181
Рейтинг: 14
#5: 2018-08-29 10:58:42 ЛС | профиль | цитата
Компонент от Tada прикрутил Спасибо.
Моргает вся цифра независимо от количества знаков после запятой.
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#6: 2018-08-29 12:14:01 ЛС | профиль | цитата
Леонид писал(а):
Возьмите компонент от Tad-а
Зачем ? Есть уже в штатном.
Add(MainForm,10210783,329,175)
{
Width=120
Height=142
Position=1
}
Add(Label,3979818,364,140)
{
Left=15
Top=15
Height=20
Color=10987519
Font=[Calibri,11,1,0,204]
Ctl3D=0
WinStyle=2
Name="нз 13"
Caption="0.17"
AutoSize=1
Alignment=2
}
Add(Label,1955835,427,140)
{
Left=16
Top=60
Height=20
Color=16764057
Font=[Calibri,11,1,0,204]
Ctl3D=0
WinStyle=2
Name="нз 13"
Caption="0.14"
AutoSize=1
Alignment=2
}
Add(Label,245292,497,217)
{
Left=34
Top=38
Height=19
Color=12644534
Font=[Calibri,10,1,0,204]
Ctl3D=0
WinStyle=2
Name="нз 13"
Caption="0.17"
AutoSize=1
Alignment=1
}
Add(UpDown,11514661,329,217)
{
Left=14
Top=35
Height=25
Max=100
Position=50
Step=2
link(onPosition,13284789:doCalc,[])
}
Add(MathParse,13284789,385,217)
{
DataCount=3
MathStr="((%2 - %3)/100)*%1+%3"
link(onResult,1471635:doConvert,[])
link(X2,3979818:Caption,[(398,184)(370,184)])
link(X3,1955835:Caption,[(405,184)(433,184)])
}
Add(ConvertorEx,1471635,441,217)
{
Mode=15
Width=5
Decimals=3
link(onResult,245292:doText,[])
}


Редактировалось 1 раз(а), последний 2018-08-29 12:26:32
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 181
Рейтинг: 14
#7: 2018-08-29 12:17:26 ЛС | профиль | цитата
Tad, а у вас тоже моргают цифры?
карма: 0

0
Ответов: 9906
Рейтинг: 351
#8: 2018-08-29 20:11:22 ЛС | профиль | цитата
Add(MainForm,13452769,343,28)
{
Width=280
Height=133
Caption="А так моргает ???"
Position=1
}
Add(Label,3979818,406,28)
{
Left=15
Top=15
Height=20
Color=10987519
Font=[Calibri,11,1,0,204]
Ctl3D=0
WinStyle=2
Name="нз 13"
Caption="0.17"
AutoSize=1
Alignment=2
}
Add(Label,1955835,462,28)
{
Left=16
Top=70
Height=20
Color=16764057
Font=[Calibri,11,1,0,204]
Ctl3D=0
WinStyle=2
Name="нз 13"
Caption="0.14"
AutoSize=1
Alignment=2
}
Add(UpDown,11514661,343,105)
{
Left=14
Top=35
Height=35
Max=100
Position=50
Step=2
link(onPosition,14571241:doCalc,[])
}
Add(Label,3454046,525,28)
{
Left=34
Top=38
Height=29
Color=12644534
Font=[Calibri,10,1,0,204]
Ctl3D=0
WinStyle=1
Name="нз 13"
Caption=""
AutoSize=1
Alignment=2
}
Add(Label,12365648,525,105)
{
Left=34
Top=43
Height=20
Color=12644534
Font=[Calibri,10,1,0,204]
Ctl3D=0
WinStyle=1
Name="нз 13"
Transparent=0
Caption="20"
AutoSize=1
Alignment=2
}
Add(MathParse,14571241,399,105)
{
DataCount=3
MathStr="((%2 - %3)/100)*%1+%3"
link(onResult,1471635:doConvert,[])
link(X2,3979818:Caption,[])
link(X3,1955835:Caption,[(419,68)(468,68)])
}
Add(ConvertorEx,1471635,462,105)
{
Mode=15
Width=7
Decimals=4
link(onResult,12365648:doText,[])
}

Редактировалось 2 раз(а), последний 2018-08-30 05:06:28
карма: 9

0
Ответов: 181
Рейтинг: 14
#9: 2018-08-29 20:40:15 ЛС | профиль | цитата
с прозрачностью не пойдет, глючный он.
Всем спасибо, думаю потом разберусь.
карма: 0

0
Ответов: 9906
Рейтинг: 351
#10: 2018-08-30 04:59:27 ЛС | профиль | цитата
Stalevar писал(а):
глючный он

Опять, блин, за рыбу деньги...
Ты мог пользоваться нормальной сборкой, и там выбрать к использованию нормальный Kol.
Что все белые люди и делают.

Но ты выбрал "глючный" вариант.
Внимание, это был ТВОЙ выбор -- зачем тогда у нас совета спрашиваешь.
Темы создаешь... Про мигающий лэйбл, если на него сыпать данные непрерывно.

А на вопрос "оно ли это" - так и не ответил.

Редактировалось 3 раз(а), последний 2018-08-30 05:09:00
карма: 9

0
Ответов: 181
Рейтинг: 14
#11: 2018-08-30 19:20:41 ЛС | профиль | цитата
Спасибо, установил, работает

--- Добавлено в 2018-08-30 19:20:59

Не моргает

Редактировалось 1 раз(а), последний 2018-08-30 19:20:59
карма: 0

0
11
Сообщение
...
Прикрепленные файлы
(файлы не залиты)