Вверх ↑
Этот топик читают: Гость
Этот топик был перемещен из раздела "Помощь по среде"
Ответов: 29
Рейтинг: 1
#1: 2017-03-17 00:16:06 ЛС | профиль | цитата
Как отобразить или найти все интерфейсы понятно, есть в примерах. А вот как определить какой из них в данный момент активный в системе?
для примера набросал код пинга ip адреса


Add(MainForm,2953706,528,63)
{
Width=218
Height=32
KeyPreview=1
Ctl3D=0
WinStyle=1
Caption="Ping"
BorderStyle=0
Icon=[ZIP3615000078DAE5984D6E83301085878014A555550E809AACAA921374D7880517A8B2EFB247E82E9CA6EA32E2678FC4BE67C8315854753D504BC8F2800DA2A464A2A780336F3E6319130360C102361BE0DF1BF87001EE01C075EBF35707E0931F3FF0369E023BA8DB312217FE75F8BECF74D4A7761445AC4B3C4D4B9AB5CE8A9F2409A314C7313B1E8F5A6CCBB2AA5CF4B4D594F959963195D234ADF2557C64A1C4B168C75CF4A097AA2BB8455178A6F38FBA76D5FCDBEFF71E3284E49A799E2BD511541FB48262CA0A82A0D26AB5BA36E5A347F8DBB86DB1DD6E2BF5BDFE16FFD01834FE8635C712863331FF4AE6BF3F8F2B897F33311F74F8D447F7F7B9F0C93125FA33377ED7F8CF956F3ADE73E35FFAFD3FF5FA7B49FC3F7EFE9F137FAA584C096718A725E3FFC4EDA60EA7E5AD5DAE4B78F45EBEDFEE0EAC5C63CEA2217B88107BE0C2F714EEEFBB0AF19E62E7E8F53D0C43A61295CFF762AC296A6E28F2C4FE853545F9157964FF656F5BFF35F70D30A27FE8BDD677BD52FAE5678DF2D9D4E1579D9BF865BE899FE20EE19B5C7F9FF19F6AAD2DD70091550B8FBF9E6A89B63631DE831FFFD73017]
Position=1
Point(doVisible)
Point(onShow)
link(onCreate,5055068:doWork1,[(571,83)(571,107)(318,107)])
link(onShow,9583301:doReset,[(595,90)(595,223)(93,223)(93,90)])
}
Add(Timer,1542367,147,84)
{
Enable=1
link(onTimer,19647:doPing,[])
}
Add(TrayIcon,31106,385,150)
{
FormHook=0
ShowWORemoveIcon=0
Icon=0
Point(doHint)
link(onClick,816907:doEvent,[])
link(onDblClick,5522720:doEvent,[(425,163)(425,69)])
}
Add(IndexToChanel,13842,528,157)
{
Count=1
link(onEvent1,2953706:doClose,[(572,163)(572,127)(516,127)(516,90)])
}
Add(PopupMenu,13445,485,157)
{
Menu=#5:Выход|
link(onClick,13842:doEvent,[])
}
Add(IndexToChanel,816907,434,150)
{
Count=3
link(onEvent2,13445:doPopupHere,[])
}
Add(Edit,31284,196,28)
{
Left=5
Top=5
Width=185
Height=21
Font=[Arial,8,1,0,1]
KeyPreview=1
Ctl3D=1
WinStyle=1
Hint="Адрес который нужно пинговать."
Text="127.0.0.1"
ClearAfterEnter=1
Point(onKeyDown)
link(onKeyDown,9144520:doEvent2,[(240,48)(240,69)(47,69)(47,139)])
}
Add(Ping,19647,196,84)
{
Name=""
ByteCount=32
TimeOut=2000
Point(Time)
Point(ByteCount)
link(onFind,30574:doString,[(240,90)(240,126)(177,126)(177,170)])
link(onFailed,11761:doData,[])
link(Name,31284:Text,[])
}
Add(DoData,11761,259,91)
{
Data=String(Нет ответа!)
link(onEventData,5987776:doEvent2,[(309,97)(309,177)])
link(Data,16531367:Icon,[])
}
Add(FormatStr,30574,196,164)
{
DataCount=1
Mask="%1"
link(onFString,10342315:doPosition1,[])
link(Str1,19647:Time,[])
}
Add(Switch,9583301,105,77)
{
Point(onOn)
Point(onOff)
link(onOn,1542367:doTimer,[])
link(onOff,1542367:doStop,[])
}
Add(IndexToChanel,5522720,434,63)
{
Count=3
link(onEvent1,2953706:doVisible,[(497,69)(497,97)])
}
Add(IconGraph,10342315,259,164)
{
Max=999
Sensit=0
Style=2
KindBar=1
FrameBar=1
ChannelsBar=0
TextColor=65280
link(onIconGraph,5987776:doEvent1,[])
}
Add(Icon,16531367,259,28)
{
Icon=[ZIP3E01000078DA636060044201010120C9C2A0C1C8C020C6C0C0A001C40240AC00C420711038C080000250FACFBF3F509E1898DFC4A4CBC0C0F41FC89A00C4350C0C010E0C0CEF814C2188FA894F131936BAAC6130676860A803CA1BE302A6A1C6C6A1C1203AD814420301903606D11005602E9C868AC3D421F441CCC101FE039D0AC38F8F33303C6C676078C0CEC0F0819F81E1873C0483D82031901C480DB21E005A8244D6]
}
Add(Hub,5987776,343,164)
{
InCount=2
OutCount=1
link(onEvent1,31106:doIcon,[])
}
Add(BitBtn,10425787,7,126)
{
Left=190
Top=5
Width=21
Height=21
Cursor=2
Ctl3D=0
WinStyle=1
Hint="Старт"
Frame=1
FrameColor=0
Caption=""
Bitmap=[ZIP3604000078DA73F235636100033320D600620128666450804840E591C1FFFFFFA98E191A1828D64F891930FDE49A81AC9F1C33D0F5936A0636FDA498814B3FB166D0C2FE810AFF814A7FB4C857B4C0007216849E]
link(onClick,9144520:doEvent1,[])
}
Add(Hub,9144520,56,126)
{
InCount=2
OutCount=3
link(onEvent1,9583301:doSwitch,[(79,132)(79,83)])
link(onEvent2,5055068:doWork2,[])
link(onEvent3,13604192:doEnum,[(154,146)(154,461)])
}
Add(HubEx,5055068,314,133)
{
Angle=1
link(onEvent,31106:doHide,[(318,163)])
}
Add(FormatStr,16171998,259,388)
{
DataCount=3
Mask="Принято мбайт %2\r\nОтправлено мбайт: %1\r\nСкорость: %3 мбит\r\n"
link(onFString,31106:doHint,[(374,394)(374,177)])
link(Str1,11226107:Result,[(265,368)(237,368)])
link(Str2,10158047:Result,[(272,368)(286,368)])
link(Str3,6329513:Result,[(279,365)(335,365)])
}
Add(MathParse,10158047,280,315)
{
DataCount=1
MathStr="%1 / 1000000"
ResultType=0
link(X1,6308936:InOctets,[(286,303)(384,303)(384,555)(482,555)])
}
Add(MathParse,11226107,231,315)
{
DataCount=1
MathStr="%1 / 1000000"
ResultType=0
link(X1,6308936:OutOctets,[(237,291)(366,291)(366,564)(489,564)])
}
Add(MathParse,6329513,329,315)
{
DataCount=1
MathStr="%1 / 1000000"
ResultType=0
link(X1,6308936:Speed,[(335,280)(413,280)(413,574)(496,574)])
}
Add(NetInterfaces,13604192,196,455)
{
link(onEnum,13948942:doGet,[])
}
Add(NetInterfaceInfo,6308936,476,511)
{
Point(InOctets)
Point(OutOctets)
Point(Speed)
link(onReadInfo,10838629:doRead,[])
}
Add(For,29567,189,511)
{
IncludeEnd=1
link(onEvent,6308936:doReadinfo,[])
link(End,13604192:Count,[])
}
Add(MT_MTArray,4328564,532,406)
{
}
Add(MT_MTArrayRW,10838629,532,511)
{
link(onRead,11129896:doEvent1,[(576,517)(576,446)(165,446)(165,335)])
link(Array,4328564:Array,[])
link(Index,29567:Position,[(545,496)(402,496)(402,577)(195,577)])
}
Add(MT_Get,14226739,308,455)
{
link(onData,9850478:doAdd,[])
link(onGet,14465865:doValue,[(397,468)(397,412)])
}
Add(MT_Add,9850478,476,455)
{
InputMT=1
link(onAdd,10838629:doAdd,[(520,461)(520,531)])
link(Data,14465865:Value,[])
}
Add(Memory,14465865,476,406)
{
}
Add(MT_Get,13948942,252,455)
{
link(onData,14226739:doGet,[])
link(onGet,14563791:doTimer,[(292,468)(292,498)(128,498)(128,517)])
}
Add(Timer,14563791,140,511)
{
Enable=1
link(onTimer,29567:doFor,[])
}
Add(Hub,11129896,182,329)
{
OutCount=4
link(onEvent1,11226107:doCalc,[(214,335)(214,321)])
link(onEvent2,10158047:doCalc,[(238,342)(238,321)])
link(onEvent3,6329513:doCalc,[(262,349)(262,321)])
link(onEvent4,16171998:doString,[(228,356)(228,394)])
}

карма: 0

0
vip
#1.1контекстная реклама от партнеров
1
Сообщение
...
Прикрепленные файлы
(файлы не залиты)