Вверх ↑
Этот топик читают: Гость
Ответов: 824
Рейтинг: 138
#16: 2016-03-27 12:03:25 ЛС | профиль | цитата
Ну так вставьте Charset в схему
Add(MainForm,12223067,259,161)
{
Width=734
Height=232
Caption="Traffic"
link(onCreate,13604192:doEnum,[])
}
Add(NetInterfaces,13604192,308,175)
{
link(onEnum,14226739:doGet,[])
}
Add(NetInterfaceInfo,6308936,595,231)
{
Point(PhysAddr)
Point(InOctets)
Point(OutOctets)
link(onReadInfo,10838629:doRead,[])
}
Add(MST_RowAction,15907430,763,231)
{
MSTControl="tab"
}
Add(For,29567,301,231)
{
IncludeEnd=1
link(onEvent,6308936:doReadinfo,[])
link(End,13604192:Count,[])
}
Add(MT_AddData,5054541,707,231)
{
Count=3
InputMT=0
link(onAdd,15907430:doRowAction,[])
link(Data1,6308936:PhysAddr,[(713,208)(825,208)(825,292)(601,292)])
link(Data2,6308936:InOctets,[(720,215)(816,215)(816,285)(608,285)])
link(Data3,6308936:OutOctets,[(727,222)(804,222)(804,271)(615,271)])
}
Add(MST_Clear,14963195,259,231)
{
MSTControl="tab"
link(onChange,29567:doFor,[])
}
Add(Timer,14563791,217,231)
{
Enable=1
link(onTimer,14963195:doClear,[])
}
Add(MT_MTArray,4328564,651,175)
{
}
Add(MT_MTArrayRW,10838629,651,231)
{
link(onRead,5054541:doAdd,[])
link(Array,4328564:Array,[])
link(Index,29567:Position,[(664,219)(497,219)(497,272)(307,272)])
}
Add(MT_Get,14226739,357,175)
{
link(onData,826018:doGet,[])
link(onGet,14563791:doTimer,[(401,188)(401,212)(205,212)(205,237)])
}
Add(MTStrTbl,630544,217,161)
{
Left=5
Top=5
Width=715
Height=185
Name="tab"
Columns=#15:Description=255|9:Speed=100|14:MAC-adress=135|11:InOctet=100|12:OutOctet=100|
}
Add(MT_Get,826018,413,175)
{
link(onData,13559143:doOperation,[])
link(onGet,1909617:doCharset,[(457,188)(457,132)])
}
Add(MT_Add,9850478,595,175)
{
InputMT=1
link(onAdd,10838629:doAdd,[(639,181)(639,251)])
link(Data,14465865:Value,[])
}
Add(Math,13559143,511,175)
{
OpType=3
Op2=1000000
ResultType=0
link(onResult,9725385:doStrCat,[])
}
Add(StrCat,9725385,553,175)
{
Str2=" Mbit/sec"
link(onStrCat,9850478:doAdd,[])
}
Add(Memory,14465865,595,126)
{
}
Add(Charset,1909617,497,126)
{
link(onCharset,14465865:doValue,[])
}
карма: 1

0
Ответов: 24
Рейтинг: 0
#17: 2016-03-28 09:36:52 ЛС | профиль | цитата
sashaoli писал(а):
Ну так вставьте...

Спасибо...чуть не хватило чтоб по Вашему вставить Charset
Уважаемый sashaoli, помогите в этом вопросе:
В выпадающем списке сет.интерфейсов как сделать чтоб информация о скорости не по первому по списку при запуске программы была, либо по активному интерфейсу либо нужный мне...если за основу взять Вашу схему.
При разрыве связи выпадающего списка с NetInterfaceInfo, по интересующему меня индексу в NetInterfaceInfo вроде как получается, но потом нет возможности использовать выпадающий список,как связать все не дойду никак
------------ Дoбавленo в 09.36:

Add(MainForm,2215622,119,77)
{
Width=410
Height=133
link(onCreate,10705467:doEnum,[])
}
Add(NetInterfaceInfo,4391455,336,154)
{
Index=9
Point(OutOctets)
Point(InOctets)
link(onReadInfo,2138135:doEvent1,[])
link(Index,15991383:Index,[])
}
Add(Hub,2138135,378,154)
{
link(onEvent1,1589606:doCalcDelta,[])
link(onEvent2,9873678:doCalcDelta,[(403,167)(403,237)])
}
Add(Timer,8065535,294,154)
{
Point(onStop)
link(onTimer,4391455:doReadinfo,[])
}
Add(NetInterfaces,10705467,175,91)
{
link(onEnum,6504417:doValue,[])
}
Add(Label,8453998,574,231)
{
Left=15
Top=30
}
Add(Label,5381564,574,154)
{
Left=15
Top=50
}
Add(SampleDelta,9873678,427,231)
{
link(onCalcDelta,4100927:doCalc,[])
link(Data,4391455:OutOctets,[(433,215)(342,215)])
}
Add(SampleDelta,1589606,427,154)
{
link(onCalcDelta,4545758:doCalc,[])
link(Data,4391455:InOctets,[(433,145)(419,145)(419,194)(349,194)])
}
Add(FormatStr,7429219,525,231)
{
DataCount=1
Mask="Исходящий канал: %1 МБ\с"
link(onFString,8453998:doText,[])
}
Add(FormatStr,5873850,525,154)
{
DataCount=1
Mask="Входящий канал: %1 МБ\с"
link(onFString,5381564:doText,[])
}
Add(ComboBox,15991383,322,91)
{
Width=394
Height=21
Align=2
Text=""
ReadOnly=0
DropDownCount=30
Point(Index)
}
Add(MT_MultiMem,6504417,224,91)
{
link(onData,7331740:doCharset,[])
}
Add(Charset,7331740,273,91)
{
link(onCharset,15991383:doAdd,[])
link(Text,6504417:Value2,[(279,82)(265,82)(265,131)(237,131)])
}
Add(MathParse,4100927,476,231)
{
MathStr="round(%1/1048576,0.001) "
link(onResult,7429219:doString,[])
}
Add(MathParse,4545758,476,154)
{
MathStr="round(%1/1048576,0.001) "
link(onResult,5873850:doString,[])
}

При разных значениях Interval в Timer на выходе и значения разные, каким образом влияет?как обойти это?
карма: 1

0
Ответов: 24
Рейтинг: 0
#18: 2016-04-03 09:17:22 ЛС | профиль | цитата
Помогите сделать полупрозрачную форму,подобную плавающему окошку в Download Master,у управлением с трея: показать, выйти, поверх всех окон
code_37131.txt

карма: 1

0
файлы: 1code_37131.txt [8.2KB] [1268]
Ответов: 824
Рейтинг: 138
#19: 2016-04-03 11:01:21 ЛС | профиль | цитата
Управление из трея, прозрачностьcode_37132.txt

карма: 1

0
файлы: 1code_37132.txt [4.1KB] [652]
19
Сообщение
...
Прикрепленные файлы
(файлы не залиты)