Гистограмма

Форумы ПрочееГистограмма ← Ctrl1Ctrl →

Этот топик читают: Гость

Ответов: 203

Рейтинг: 2

#1: 2016-09-20 20:43:51 ЛС | профиль | цитата

Доброе время суток!
Что то я совсем запутался с этим элементом, прошу помощи!
Не могу вывести на гистограмме по оси Х числа от 100 и далее или вообще убрать подписи. Как вывести по оси Y значения ? В чем моя ошибка ?

Как выводить значение каждого столбика ? Например по нажатию мышкой на столбик ?

Add(MainForm,2953706,49,98)
{
 Width=830
 Height=292
 Caption="Восход"
 Point(onClose)
 Point(doVisible)
}
Add(StyleXP,16532878,91,98)
{
}
Add(ButtonRush,10711192,49,203)
{
 Left=15
 Top=15
 Caption="Поехали!"
 Glyphs=[]
 link(onClick,14934460:doEvent1,[])
}
Add(Memory,6692788,301,161)
{
 Default=String(0;0;0;0;0;0;0;0;0;0;0;0;0;0;0.06;0.22;0.34;0.32;0.32;0.34;0.32;0.32;0.32;0.12;0.12;9.98;8.06;7.86;7.7;5.02;2.76;1.68;1.66;1.68;1.66;1.66;1.66;1.66;1.66;1.66;7.44;8.24;7.94;4.86;1.68;1.68;0.94;0)
}
Add(Hub,14934460,147,203)
{
 OutCount=3
 link(onEvent1,10574215:doClear,[(172,209)(172,167)])
 link(onEvent2,7254345:doEnum,[(207,216)(207,293)])
}
Add(Str_Enum,7254345,301,287)
{
 From=0
 link(onEnum,1365469:doEvent1,[])
 link(String,6692788:Value,[])
}
Add(Plotter,10574215,238,161)
{
 Left=15
 Top=60
 Width=784
 Height=142
 Name="Plotter"
 GridColor=16777215
 GridX=12
 GridY=12
}
Add(PlotHistogram,7049018,483,378)
{
 Grapher="Plotter"
 Color=8421504
 Step=1
 BgColor=255
 Offset=2
 Axis="X1"
 link(ValueY,10635890:Value,[(489,369)(447,369)])
 link(ValueX,9218413:Count,[(496,334)(545,334)])
}
Add(Hub,1365469,364,287)
{
 OutCount=4
 link(onEvent2,9218413:doNext,[])
 link(onEvent3,10635890:doValue,[])
 link(onEvent4,7049018:doAdd,[(424,314)(424,384)])
}
Add(CounterEx,9218413,539,294)
{
 Min=100
 Max=200
 Default=100
}
Add(Memory,10635890,441,301)
{
}

Редактировалось 1 раз(а), последний 2016-09-20 21:46:51

карма: 0

Ответов: 8930

Рейтинг: 823

#2: 2016-09-20 23:21:44 ЛС | профиль | цитата

kaban4ik, надо выбирать соответствие высоты графика и количество делений, чтобы цифры поместились. В графике есть свойство Margin -- пиксели отступа, в т. ч. и для цифр, можно их спрятать. Подсказку можно сделать как в примере или использовать менеджер (Слава nesco!

)


Add(MainForm,11175340,287,105)
{
 Width=830
 Height=517
 Caption="Восход"
 Point(onClose)
 Point(doVisible)
}
Add(ButtonRush,10711192,287,161)
{
 Left=15
 Top=15
 Caption="Поехали!"
 Glyphs=[]
 link(onClick,14934460:doEvent1,[])
}
Add(Hub,14934460,336,161)
{
 OutCount=3
 link(onEvent1,10574215:doClear,[(361,167)(361,111)])
 link(onEvent2,11012269:doFor,[])
}
Add(Plotter,10574215,427,105)
{
 Left=15
 Top=60
 Width=784
 Height=377
 Name="Plotter"
 GridColor=16777215
 GridY=11
 MinH=0.000001
 MaxH=110
 Point(Handle)
}
Add(PlotHistogram,7049018,483,168)
{
 Grapher="Plotter"
 Color=8421504
 MaxValues=101
 BgColor=255
 link(ValueX,11012269:Position,[(496,159)(475,159)(475,208)(377,208)])
}
Add(For,11012269,371,168)
{
 End=100
 link(onEvent,1430169:doRandom,[])
}
Add(Random,1430169,427,168)
{
 link(onRandom,7049018:doAdd,[])
}
Add(PlotMouseValues,8542618,399,252)
{
 Grapher="Plotter"
 link(onMouseDown,3045267:doStr,[])
 link(onMouseUp,9220983:doDestroy,[(459,265)(459,295)(634,295)(634,265)])
 link(onMouseMove,8143955:doStr,[(452,272)(452,307)])
}
Add(MT_String,3045267,469,252)
{
 link(onResult,6055230:doReplace,[])
}
Add(Replace,6055230,511,252)
{
 SubStr=";"
 DestStr="  Y="
 link(onReplace,13207713:doStrCat,[])
}
Add(StrCat,13207713,553,252)
{
 Str1="X="
 link(onStrCat,1500653:doEvent1,[])
}
Add(BaloonToolTips,9220983,651,252)
{
 link(Handle,10574215:Handle,[(657,152)(433,152)])
 link(Point,14342192:Point,[(671,243)(642,243)(642,383)(517,383)])
}
Add(MT_String,8143955,469,301)
{
 link(onResult,1266332:doSplit,[])
}
Add(PointXY,14342192,511,343)
{
 link(X,1266332:Part1,[])
 link(Y,1266332:Part2,[])
}
Add(MultiStrPart,1266332,511,301)
{
}
Add(Hub,1500653,595,252)
{
 link(onEvent1,9220983:doCreate,[])
 link(onEvent2,9220983:doShow,[(627,265)(627,272)])
}

карма: 19

Голосовали: kaban4ik

Ответов: 203

Рейтинг: 2

#3: 2016-09-23 11:05:24 ЛС | профиль | цитата

Леонид, Спасибо

Редактировалось 1 раз(а), последний 2016-09-23 11:05:32

карма: 0

Форумы ПрочееГистограмма ← Ctrl1Ctrl →


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