Вверх ↑
Этот топик читают: Гость
Ответов: 58
Рейтинг: 0
#1: 2018-09-29 14:38:36 ЛС | профиль | цитата
Это будет обычный прогресс бар, но там будет 2 дополнительные точки:
1. Тема: Пауза (жёлтый цвет)
2. Тема: Ошибка (красный цвет)
3. Стандартная тема: Прогресс (зелёный цвет)

Редактировалось 2 раз(а), последний 2018-09-29 14:39:57
карма: 0

0
Ответов: 1926
Рейтинг: 172
#2: 2018-09-29 17:00:21 ЛС | профиль | цитата
А чем этот красавец не устраивает?
Add(MainForm,6692318,336,224)
{
Width=517
Height=132
Caption="ProgressBarRush"
}
Add(ProgressBarRush,16646612,588,217)
{
Left=10
Top=30
Width=485
Color=15266030
ColorFrom=-16777203
BorderColor=8421504
ColorFromDis=16514043
ColorToDis=16514043
ColorTextDis=11645361
ColorShadowDis=16777215
BorderWidthDis=0
RoundWidth=3
RoundHeight=3
Point(doEnabled)
Point(doSetTheme)
}
Add(Counter,11762556,532,217)
{
link(onNext,16646612:doPosition,[])
}
Add(Timer,14683543,483,217)
{
Interval=200
link(onTimer,11762556:doNext,[])
}
Add(Button,14909329,336,280)
{
Left=140
Top=70
Width=75
TabOrder=-1
Caption="SkyBlue"
Data=Integer(0)
link(onClick,48317:doWork2,[])
}
Add(Button,9395957,336,315)
{
Left=220
Top=70
Width=80
TabOrder=-1
Caption="Office 2007"
Data=Integer(1)
link(onClick,12079563:doWork2,[])
}
Add(StrList,1670882,420,210)
{
Strings=#48:-1;12937777;15780518;0;8421504;-1;-1;-1;-1;-1;-1|48:-1;1818236;12516580;0;12632256;-1;-1;-1;-1;-1;-1|47:-1;8388863;16744703;0;8421504;-1;-1;-1;-1;-1;-1|53:16777215;16514043;16514043;11645361;10789024;16777215|
}
Add(ArrayRW,14752043,434,280)
{
link(onRead,11637421:doMTString,[])
link(Array,1670882:Array,[])
}
Add(HubEx,48317,399,280)
{
link(onEvent,14752043:doRead,[])
}
Add(MT_String,11637421,483,266)
{
link(onResult,16646612:doSetTheme,[(574,272)(574,237)])
}
Add(Button,16619983,336,350)
{
Left=305
Top=70
Width=80
TabOrder=-1
Caption="Rose"
Data=Integer(2)
link(onClick,12079563:doWork3,[(403,356)])
}
Add(HubEx,12079563,399,315)
{
Angle=3
link(onEvent,48317:doWork3,[])
}

ps. Из справки пример!

Редактировалось 1 раз(а), последний 2018-09-29 17:00:43
карма: 9
0
Ответов: 58
Рейтинг: 0
#3: 2018-09-29 18:46:41 ЛС | профиль | цитата
3042 писал(а):
А чем этот красавец не устраивает?


Add(MainForm,6692318,336,224)
{
Width=517
Height=132
Caption="ProgressBarRush"
}
Add(ProgressBarRush,16646612,588,217)
{
Left=10
Top=30
Width=485
Color=15266030
ColorFrom=-16777203
BorderColor=8421504
ColorFromDis=16514043
ColorToDis=16514043
ColorTextDis=11645361
ColorShadowDis=16777215
BorderWidthDis=0
RoundWidth=3
RoundHeight=3
Point(doEnabled)
Point(doSetTheme)
}
Add(Counter,11762556,532,217)
{
link(onNext,16646612:doPosition,[])
}
Add(Timer,14683543,483,217)
{
Interval=200
link(onTimer,11762556:doNext,[])
}
Add(Button,14909329,336,280)
{
Left=140
Top=70
Width=75
TabOrder=-1
Caption="SkyBlue"
Data=Integer(0)
link(onClick,48317:doWork2,[])
}
Add(Button,9395957,336,315)
{
Left=220
Top=70
Width=80
TabOrder=-1
Caption="Office 2007"
Data=Integer(1)
link(onClick,12079563:doWork2,[])
}
Add(StrList,1670882,420,210)
{
Strings=#48:-1;12937777;15780518;0;8421504;-1;-1;-1;-1;-1;-148:-1;1818236;12516580;0;12632256;-1;-1;-1;-1;-1;-147:-1;8388863;16744703;0;8421504;-1;-1;-1;-1;-1;-1|53:16777215;16514043;16514043;11645361;10789024;16777215|
}
Add(ArrayRW,14752043,434,280)
{
link(onRead,11637421:doMTString,[])
link(Array,1670882:Array,[])
}
Add(HubEx,48317,399,280)
{
link(onEvent,14752043:doRead,[])
}
Add(MT_String,11637421,483,266)
{
link(onResult,16646612:doSetTheme,[(574,272)(574,237)])
}
Add(Button,16619983,336,350)
{
Left=305
Top=70
Width=80
TabOrder=-1
Caption="Rose"
Data=Integer(2)
link(onClick,12079563:doWork3,[(403,356)])
}
Add(HubEx,12079563,399,315)
{
Angle=3
link(onEvent,48317:doWork3,[])
}
|

ps. Из справки пример!

Редактировалось 1 раз(а), последний 2018-09-29 17:00:43

|
-1;12937777;15780518;0;8421504;-1;-1;-1;-1;-1;-1
-1;1818236;12516580;0;12632256;-1;-1;-1;-1;-1;-1
-1;8388863;16744703;0;8421504;-1;-1;-1;-1;-1;-1
16777215;16514043;16514043;11645361;10789024;16777215
Что это???
карма: 0

0
Разработчик
Ответов: 26115
Рейтинг: 2126
#4: 2018-09-29 21:47:48 ЛС | профиль | цитата
http://forum.hiasm.com/wiki/5228 -- внимательно читаем аргументы метода doSetTheme
карма: 22

0
Ответов: 537
Рейтинг: 14
#5: 2018-09-29 22:08:50 ЛС | профиль | цитата
В справке Hiasm по компоненту, все подробно и доступно написано.
карма: 4

0
Ответов: 58
Рейтинг: 0
#6: 2018-09-30 10:31:00 ЛС | профиль | цитата
Да это тоже нормальный компонент, но лучше стандартный прогресс бар где можно изменять тему.
карма: 0

0
Разработчик
Ответов: 26115
Рейтинг: 2126
#7: 2018-09-30 13:45:03 ЛС | профиль | цитата
VitiaCat писал(а):
но лучше стандартный прогресс бар где можно изменять тему

На текущей библиотеке это сделать не получится, тк используется стандартный контрол Винды и все управления темой осуществляет сама ОС. Это прекрасно видно, когда используется стиль XP. Поэтому, либо Rush, либо As Is.

Редактировалось 1 раз(а), последний 2018-09-30 13:46:26
карма: 22

0
Ответов: 58
Рейтинг: 0
#8: 2018-09-30 20:10:28 ЛС | профиль | цитата
nesco писал(а):

VitiaCat писал(а):
но лучше стандартный прогресс бар где можно изменять тему

На текущей библиотеке это сделать не получится, тк используется стандартный контрол Винды и все управления темой осуществляет сама ОС. Это прекрасно видно, когда используется стиль XP. Поэтому, либо Rush, либо As Is.

Редактировалось 1 раз(а), последний 2018-09-30 13:46:26

Ок буду использовать ProgressBarRush
карма: 0

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