Вверх ↑
Этот топик читают: Гость
Ответов: 205
Рейтинг: 44
#31: 2011-04-06 04:20:46 ЛС | профиль | цитата
[flood]К 2012 готовимся? [/flood]
карма: 0

0
Ответов: 85
Рейтинг: 7
#32: 2011-04-06 09:32:08 ЛС | профиль | цитата
[flood]Изучаю возможности ёмобиля на геомагнитной тяге.[/flood]
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#33: 2011-04-06 21:02:18 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2017-06-14 20:31:23
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#34: 2011-04-06 21:08:31 ЛС | профиль | цитата
г. -MAV- писал(а):
ps:про форум, регестрации хватает на одно сообщение

У меня уже месяц так и двух разных провайдеров пробовал
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 85
Рейтинг: 7
#35: 2011-04-06 22:10:43 ЛС | профиль | цитата
г. -MAV- писал(а):
Jek, а сам пробовал скопировать (Версия №2), выложи пожалуйста в приемлемом виде: sha,rar,zip.


В первом посте перезалил код, и дополнительно закинул в файлообменник.
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#36: 2011-04-06 22:43:48 ЛС | профиль | цитата
Jek писал(а):
В первом посте перезалил код,
Jek, так ты и не ответил: Зачем каждых три часа читать из реестра
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 85
Рейтинг: 7
#37: 2011-04-06 22:52:35 ЛС | профиль | цитата
Tad писал(а):
Зачем каждых три часа читать из реестра

забыл подправить, можно и один раз при запуске. Исправил. Перезалил.

У меня другой вопрос: можно ли на гистограмму выводить значения разным цветом?
карма: 0

0
Ответов: 1321
Рейтинг: 37
#38: 2011-04-07 13:06:58 ЛС | профиль | цитата
Jek, писал(а):
У меня другой вопрос: можно ли на гистограмму выводить значения разным цветом?

Да
карма: 0

0
Ответов: 85
Рейтинг: 7
#39: 2011-04-07 19:12:40 ЛС | профиль | цитата
Roma писал(а):
Да

[flood]спасибо. Очень информативный ответ.[/flood]
карма: 0

0
Ответов: 1321
Рейтинг: 37
#40: 2011-04-08 08:10:34 ЛС | профиль | цитата
Извиняюсь, ошибся, в гистограмме нельзя отрисовывать различными цветами
Но могу обрадовать, вы сможете сделать это вручную, в том случае если в вашей гистограмме только несколько определённых значений
а точнее линий.
Могу показать как
------------ Дoбавленo в 08.10:
Вот маленький пример

Add(MainForm,2953706,140,147)
{
Width=291
Height=353
}
Add(PaintBox,9081886,245,175)
{
Left=10
Width=235
Height=195
Color=8421504
Ctl3D=0
}
Add(Img_Rectangle,6863498,245,287)
{
Color=32768
BgColor=65280
Style=1
Point(Point1)
Point(Point2)
link(onDraw,7777002:doDraw,[])
link(Bitmap,5463581:Var2,[])
link(Point1,15021245:Point,[(265,275)(146,275)])
link(Point2,14067477:Point,[(272,271)(188,271)])
}
Add(Img_Rectangle,7777002,294,287)
{
Color=8388608
BgColor=16711680
Style=1
Point(Point1)
Point(Point2)
link(onDraw,9081886:doRefresh,[(338,293)(338,162)(233,162)(233,181)])
link(Bitmap,5463581:Var3,[(300,215)])
link(Point1,8720254:Point,[(314,268)(363,268)])
link(Point2,12535636:Point,[(321,274)(405,274)])
}
Add(GetDataEx,5463581,245,210)
{
link(Data,9081886:Bitmap,[])
}
Add(PointXY,15021245,140,224)
{
Y=100
}
Add(PointXY,14067477,182,224)
{
X=20
Y=100
link(Y,12998467:Result,[(195,219)(188,219)])
}
Add(TrackBar,4585678,140,182)
{
Left=10
Top=245
Width=245
Max=100
TickCount=2
link(onPosition,12998467:doOperation,[])
}
Add(PointXY,8720254,357,217)
{
X=22
Y=100
}
Add(PointXY,12535636,399,217)
{
X=42
Y=100
link(Y,587998:Result,[(412,212)(405,212)])
}
Add(TrackBar,4705912,357,175)
{
Left=10
Top=210
Width=245
Max=100
TickCount=2
link(onPosition,587998:doOperation,[])
}
Add(Button,4682223,140,287)
{
Left=190
Top=280
Caption="draw"
link(onClick,12594974:doEvent1,[])
}
Add(Hub,12594974,189,287)
{
link(onEvent1,9081886:doClear,[(224,293)(224,188)])
link(onEvent2,6863498:doDraw,[(224,300)(224,293)])
}
Add(Math,587998,399,175)
{
OpType=1
Op1=100
}
Add(Math,12998467,182,182)
{
OpType=1
Op1=100
}

А на основе этого делай как ты хочешь
[flood]Может есть способ лучше,я этого не знаю
это лично мой вариант[/flood]
карма: 0

0
Ответов: 85
Рейтинг: 7
#41: 2011-04-08 09:29:22 ЛС | профиль | цитата
Roma писал(а):
Вот маленький пример

Идея понятна. Спасибо. Но вместо одного элемента, лепить полтора десятка, как-то не комильфо.
карма: 0

0
Ответов: 1321
Рейтинг: 37
#42: 2011-04-08 11:00:13 ЛС | профиль | цитата
code_23268.txt
Как это комбинировать , я незнаю ,но суть должна быть понятна,это почти то что ты искал
карма: 0

0
файлы: 1code_23268.txt [1KB] [172]
Ответов: 85
Рейтинг: 7
#43: 2011-04-09 00:32:29 ЛС | профиль | цитата
Согласен. Похоже только так.
Я думал, может просто точку на гистограмме bgColor сделать доступной по управлению.
Вот как-то так, связь между цветом и гистрограммой:
Add(MainForm,16184661,686,70)
{
Left=20
Top=105
Width=696
Height=584
Caption="Histogram"
link(onCreate,14310219:doFor,[])
}
Add(For,14310219,742,84)
{
End=8
link(onEvent,9784809:doEvent1,[])
}
Add(PlotHistogram,7049018,938,91)
{
Grapher="Plotter"
Color=65535
Step=1
BgColor=65280
Offset=32896
Axis="X1"
Point(doBgColor)
}
Add(Hub,9784809,798,84)
{
link(onEvent1,2070245:doRGB,[(840,90)(840,111)])
link(onEvent2,7049018:doAdd,[])
}
Add(RGB,2070245,868,105)
{
R=125
link(onRGB,7049018:doBgColor,[])
}
Add(Plotter,10574215,931,42)
{
Left=100
Top=360
Width=346
Height=112
Color=15780518
Name="Plotter"
GridColor=16777215
BorderColor=16711680
Grid=8
}

Только я не умею кодить ни на Дельфи. ни на Паскале.

Вопрос перенес в раздел "Пакет Windows >> Делаем компоненты".
------------ Дoбавленo в 00.32:
Мы, тут с Романом (Roma) перетерли тему с выводом цвета на гистограмму, и я выложил в первый пост вариант программы
с подкрашиванием значений в зависимости от уровня Кр.
карма: 0

0
Ответов: 85
Рейтинг: 7
#44: 2011-04-12 20:03:37 ЛС | профиль | цитата
Привязал гистограмму к текущему времени компьютера.
Ссылку на скачивание, в первом посте - обновил
карма: 0

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