Вверх ↑
Этот топик читают: Гость
Ответов: 195
Рейтинг: 1
#1: 2014-08-07 14:18:03 ЛС | профиль | цитата
хочу небольшой индикатор наличия инета сделать.
подскажите как можно определять наличие соединения с интернетом
карма: 0

0
Ответов: 9906
Рейтинг: 351
#2: 2014-08-07 14:33:42 ЛС | профиль | цитата
Для "программы-шутки", надо полагать
карма: 9

0
Ответов: 195
Рейтинг: 1
#3: 2014-08-07 15:34:26 ЛС | профиль | цитата
нет. просто для себя. у меня на работе с инетом проблемы и часто нужно следить, когда он пропадает
карма: 0

0
Ответов: 844
Рейтинг: 17
#4: 2014-08-07 18:13:27 ЛС | профиль | цитата
Пингуй например гоогле или майл,если ответа нету то и интернета нету
карма: 0

0
Ответов: 195
Рейтинг: 1
#5: 2014-08-07 22:03:23 ЛС | профиль | цитата
как чем пинговать? может пример покажете?
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#6: 2014-08-07 22:10:14 ЛС | профиль | цитата
Ping
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 1343
Рейтинг: 31
#7: 2014-08-08 16:17:35 ЛС | профиль | цитата
code_34125.txt
карма: 2

0
файлы: 1code_34125.txt [313B] [190]
Ответов: 195
Рейтинг: 1
#8: 2014-08-08 17:35:19 ЛС | профиль | цитата
блин теперь не могу реализовать смену иконки в трее.

компонент выводит текущую иконку программы.
а как на лету ее менять?
карма: 0

0
Ответов: 824
Рейтинг: 138
#9: 2014-08-08 18:36:00 ЛС | профиль | цитата
z80 писал(а):
блин теперь не могу реализовать смену иконки в трее.

Загрузить

карма: 1

0
Ответов: 1
Рейтинг: 0
#10: 2014-08-08 19:47:46 ЛС | профиль | цитата
Вот, держи - не совсем то, но все таки полностью рабочая
За схему не ругайте(2 года валялась), я и сейчас не все компоненты понимаю.Где-то была с настройками в ini, если надо поищу.
code_34126.txt
------------ Дoбавленo в 19.47:
Вторая часть схемы
 Add(Time,4921787,175,84)
{
Format="h m"
}
Add(If_else,9253190,203,161)
{
link(onTrue,840326:doData,[(274,167)(274,132)])
link(Op1,4921787:FormatTime,[(209,151)(181,151)])
link(Op2,1564203:Text,[])
}
Add(Edit,1564203,210,35)
{
Left=45
Top=15
Width=35
Text=""
}
Add(Label,5318483,35,175)
{
Left=35
Top=20
Width=10
Height=18
Font=[Centaur,8,2,0,0]
Caption="ч"
}
Add(Label,11692416,49,175)
{
Left=80
Top=20
Width=12
Height=18
Font=[Centaur,8,2,0,0]
Caption="м"
}
Add(Label,1489100,63,175)
{
Left=43
Top=35
Width=39
Height=17
Font=[Calibri,8,2,0,204]
Caption="пробел"
}
Add(DoData,840326,287,126)
{
link(onEventData,6881899:onEvent1,[(328,132)(328,27)])
link(Data,6881899:Data1,[(293,74)(27,74)])
}
END_SDK
Add(ChildGroupBox,7248544,98,168)
{
link(onEvent1,8626037:In,[])
link(Data1,6234061:Checked,[(104,163)(76,163)])
link(Data2,9244506:Var,[])
}
BEGIN_SDK
Add(EditMulti,5652093,21,7)
{
EventCount=1
WorkCount=3
DataCount=2
Width=356
Height=333
link(doWork1,15774740:doCompare,[(49,13)(49,76)])
link(doWork2,11415458:doEnabled,[(31,20)(31,104)])
link(doWork3,12860059:doText,[(87,27)(87,118)])
}
Add(GroupBox,11415458,42,98)
{
Left=115
Top=60
Width=103
Height=55
Font=[Calibri,8,2,0,204]
Enabled=1
Caption=" Лимит на откл"
Point(doEnabled)
}
Add(Edit,15944682,252,28)
{
Left=25
Top=15
Width=70
Text="888888888888"
link(onEnter,498254:doValue,[(296,41)(296,79)(240,79)(240,118)])
}
Add(If_else,15774740,217,70)
{
Type=2
Op2=Integer(9999999)
link(onTrue,8399624:doData,[])
link(Op1,5652093:Data2,[(223,32)(34,32)])
}
Add(Label,12860059,154,112)
{
Left=40
Top=35
Width=36
Height=17
Font=[Calibri,8,2,0,204]
Caption="кБайт"
}
Add(DoData,8399624,308,70)
{
link(onEventData,5652093:onEvent1,[(366,76)(366,13)])
link(Data,5652093:Data1,[(314,24)(27,24)])
}
Add(Memory,498254,252,112)
{
Point(Data)
link(onData,15944682:doText,[(296,118)(296,76)(240,76)(240,34)])
link(Data,15944682:Text,[])
}
END_SDK
Add(LineBreak,5108854,28,182)
{
Caption="мБайт"
link(Out,7248544:doWork3,[])
Primary=[8487858,476,-91]
}
Add(CheckBox,6234061,70,126)
{
Left=120
Top=75
Width=15
Caption=""
link(onCheck,7248544:doWork2,[(140,132)(140,160)(40,160)(40,181)])
}
Add(CheckBox,3343611,119,224)
{
Left=10
Top=75
Width=15
Caption=""
link(onCheck,16720378:doWork2,[(159,230)(159,262)(108,262)(108,279)])
}
Add(Host,7573174,301,98)
{
}
Add(LineBreak,13614038,84,399)
{
Caption="Str в поток"
link(Out,708539:doWork1,[(157,405)(157,423)])
Primary=[1207005,56,-70]
}
Add(LineBreak,7515997,56,336)
{
Caption="Add"
link(Out,526195:doAddItem,[])
Primary=[946102,-28,-294]
}
Add(LineBreak,13650482,35,266)
{
Caption="ИнA"
link(Out,2453865:doEvent1,[])
Primary=[12442966,182,-217]
}
Add(LineBreak,2973281,588,35)
{
Caption="D по Вр"
link(Out,9572696:onEvent2,[])
Primary=[1765607,-427,231]
}
Add(LineBreak,399712,630,42)
{
Caption="D по Тр"
link(Out,9572696:onEvent3,[])
Primary=[8626037,-490,126]
}
Add(LineBreak,6864572,14,77)
{
Caption="кБ"
Type=1
link(Data,9572696:Data1,[])
Primary=[9244506,91,70]
}
Add(Hub,2453865,91,266)
{
OutCount=3
link(onEvent1,16720378:doWork1,[])
link(onEvent2,12090861:In,[])
link(onEvent3,10739608:doEvent1,[(203,286)])
}
Add(LineBreak,6586750,49,168)
{
Caption="ИнA"
link(Out,7248544:doWork1,[])
Primary=[12090861,119,105]
}
Add(Label,16559155,182,105)
{
Left=10
Top=125
Width=98
Height=17
Font=[Calibri,8,2,0,204]
Caption="IP компьютера"
}
Add(DoData,1192394,301,217)
{
link(onEventData,4041895:doCase,[])
link(Data,6058813:Var1,[(307,181)(298,181)(298,145)])
}
Add(Case,4041895,343,217)
{
Value=String(127.0.0.1)
DataOnTrue=String(local)
link(onNextCase,11935756:doData,[(380,223)(380,181)])
link(onTrue,1705808:doWork2,[])
}
Add(Hub,10739608,203,210)
{
link(onEvent1,12648563:doText,[(217,174)])
link(onEvent2,1192394:doData,[])
}
Add(Label,7991640,406,224)
{
Left=395
Top=215
}
Add(DoData,11935756,385,175)
{
Data=String(1)
link(onEventData,1705808:doWork1,[(429,181)(429,204)(389,204)])
link(Data,1143138:Var3,[(391,163)(132,163)])
}
Add(HubEx,1705808,385,224)
{
link(onEvent,7991640:doText,[])
}
Add(Edit,12648563,301,168)
{
Left=115
Top=120
Width=100
Font=[Calibri,8,2,0,204]
Text="127.0.0.1"
link(Str,6058813:Var2,[(307,158)(314,158)])
}
Add(GetDataEx,6058813,308,140)
{
link(Data,7573174:LoacalIP,[])
}
Add(Registry,8103411,343,343)
{
HKey=2
Key="SoftwareHiNET"
Value="Имя соединения"
link(onRead,15261216:In,[])
link(Data,8341159:Var,[])
}
Add(Registry,6734314,364,420)
{
HKey=2
Key="SoftwareHiNET"
Value="Номер адаптера"
link(onRead,1253107:In,[(429,426)(429,437)])
link(Data,12710598:Var,[])
}
Add(ChildPanel,15818329,441,84)
{
link(onEvent1,9572696:onEvent4,[(593,90)(593,55)])
link(onEvent2,8487858:In,[])
}
BEGIN_SDK
Add(EditMulti,8931367,21,21)
{
EventCount=2
}
Add(Panel,9675204,35,105)
{
Left=225
Width=81
Height=66
}
Add(RadioButton,13831126,77,119)
{
Left=10
Top=20
Width=65
Font=[Calibri,8,2,0,204]
Selected=0
Caption="кБайт"
link(onSelect,5361850:doEvent1,[])
}
Add(RadioButton,6338603,84,56)
{
Left=10
Top=40
Width=65
Font=[Calibri,8,2,0,204]
Caption="мБайт"
link(onSelect,5210515:doEvent1,[])
}
Add(Hub,2719679,252,35)
{
link(onEvent1,8885509:doWork1,[])
link(onEvent2,8885509:doWork2,[])
}
Add(DoData,16687711,210,56)
{
Data=String(trunc(%1 / 1000000, 0.1))
link(onEventData,709221:doWork2,[(255,62)(255,97)])
}
Add(DoData,6917376,210,63)
{
Data=String(trunc(((%1+%2)/1000000), 0.1))
link(onEventData,14806591:doWork2,[(251,69)(251,104)])
}
Add(Hub,5210515,126,56)
{
OutCount=3
link(onEvent1,16687711:doData,[])
link(onEvent2,6917376:doData,[])
link(onEvent3,9512208:doData,[])
}
Add(DoData,9512208,210,70)
{
Data=String(мБайт)
link(onEventData,6810388:doWork2,[(209,76)(225,79)])
}
Add(DoData,6983946,203,119)
{
Data=String(trunc(%1 / 1000, 0.1))
link(onEventData,709221:doWork3,[(242,125)])
}
Add(DoData,14120521,203,126)
{
Data=String(trunc(((%1+%2)/1000), 0.1))
link(onEventData,14806591:doWork3,[(256,132)])
}
Add(DoData,13163862,203,133)
{
Data=String(кБайт)
link(onEventData,6810388:doWork3,[(242,139)])
}
Add(Hub,5361850,119,119)
{
OutCount=3
link(onEvent1,6983946:doData,[])
link(onEvent2,14120521:doData,[])
link(onEvent3,13163862:doData,[])
}
Add(HubEx,709221,231,91)
{
link(onEvent,2719679:doEvent1,[(245,97)(245,41)])
}
Add(HubEx,14806591,252,98)
{
link(onEvent,8885509:doWork3,[(269,104)(269,55)])
}
Add(HubEx,6810388,224,105)
{
link(onEvent,8931367:onEvent2,[(276,111)(276,34)])
}
Add(Label,14903201,133,182)
{
Left=10
Top=5
Width=69
Height=17
Font=[Calibri,8,2,0,204]
Caption="Ед.измерения"
}
Add(MT_ChanelToIndex,8885509,287,35)
{
Count=3
link(onIndex,8931367:onEvent1,[(316,41)(316,27)])
}
END_SDK
Add(GetDataEx,1143138,126,462)
{
Angle=1
link(Data,5990483:Text,[(146,467)])
}
Add(Label,14374777,546,252)
{
Left=225
Top=110
Width=81
Height=17
Font=[Calibri,8,2,0,204]
Caption="Всего"
}
Add(Label,2069785,546,154)
{
Left=225
Top=70
Width=79
Height=17
Font=[Calibri,8,2,0,204]
Caption="Принято"
}
Add(Label,2445486,546,203)
{
Left=225
Top=90
Width=81
Height=17
Font=[Calibri,8,2,0,204]
Caption="Отправлено"
}
Add(MT_IndexToChanel,1198299,175,49)
{
Count=4
link(onEvent1,12442966:In,[])
link(onEvent2,8497383:In,[])
link(onEvent3,13890446:In,[])
link(onEvent4,3466890:In,[])
}
Add(LineBreak,10621994,504,154)
{
link(Out,2069785:doText,[])
Primary=[8497383,-287,-98]
}
Add(LineBreak,14844901,504,203)
{
link(Out,2445486:doText,[])
Primary=[13890446,-287,-140]
}
Add(LineBreak,6191239,504,252)
{
link(Out,14374777:doText,[])
Primary=[3466890,-287,-182]
}
END_SDK
Add(LineBreak,16296111,189,168)
{
Caption="rg"
link(Out,7771380:doWork2,[(235,174)(235,188)])
Primary=[10864432,-91,35]
}
Add(HubEx,7292603,329,189)
{
PColor(onEvent,0)
link(onEvent,8282181:doHandUp,[])
}
Add(WinTools,7337451,42,161)
{
link(Handle,9245137:Handle,[(48,235)(-8,235)])
}
Add(Hub,11480582,70,203)
{
link(onEvent1,10864432:In,[])
link(onEvent2,14045688:In,[])
}
Add(LineBreak,5271215,294,140)
{
Caption="cBut"
link(Out,14557681:doWork1,[(340,146)])
Primary=[15722352,-119,343]
}
Add(LineBreak,2159151,294,203)
{
Caption="d"
PColor(Out,0)
link(Out,7292603:doWork1,[(333,209)])
Primary=[2029785,-217,210]
}
Add(HubEx,602925,147,336)
{
link(onEvent,13325603:In,[])
}
Add(BitBtn,3753354,91,483)
{
Width=45
Height=13
Font=[Calibri,8,3,0,204]
Caption="Connect"
Data=Integer(1)
Point(doColor)
link(onClick,13276401:doData,[])
}
Add(HubEx,9950527,147,343)
{
link(onEvent,3351050:In,[])
}
Add(HubEx,14557681,336,154)
{
Angle=1
link(onEvent,8282181:doDial,[(340,188)])
}
Add(LineBreak,2871108,49,490)
{
link(Out,3753354:doColor,[])
Primary=[13325603,119,-154]
}
Add(LineBreak,13888147,-14,420)
{
link(Out,10907170:doColor,[])
Primary=[3351050,175,-77]
}
Add(LineBreak,9368721,-28,329)
{
Caption="MT"
link(Out,14473135:doEvent,[])
Primary=[14503915,448,49]
}
Add(DoData,13276401,133,483)
{
link(onEventData,15722352:In,[])
}
Add(SelectColor,5412801,105,343)
{
Color=65280
link(onColor,10869526:doWork2,[])
}
Add(SelectColor,15620620,105,350)
{
Color=255
link(onColor,10869526:doWork3,[(151,356)])
}
Add(HubEx,10869526,147,343)
{
Angle=3
link(onEvent,9950527:doWork1,[])
}
Add(MT_IndexToChanel,14473135,14,329)
{
Count=6
link(onEvent1,16705708:doColor,[])
link(onEvent2,4433846:doColor,[])
link(onEvent3,5412801:doColor,[])
link(onEvent4,15620620:doColor,[])
link(onEvent5,6079733:In,[])
link(onEvent6,10793332:In,[])
}
Add(InfoTip,9319977,-35,294)
{
Info=#67:Кнопки управления:верхняя-Connect,контроль исходящего трафика кр зл|44:нижняя-Сlosed,контроль входящего трафика -#-|
Width=316
Height=249
}
Add(LineBreak,8671747,154,196)
{
Caption="ИницА"
link(Out,7771380:doWork4,[])
Primary=[3269662,266,175]
}
Add(LineBreak,11896624,259,245)
{
Caption="Adap"
Type=1
link(Data,7771380:Var2,[])
Primary=[10242498,84,98]
}
Add(LineBreak,8904214,231,224)
{
Caption="IP"
Type=1
link(Data,7771380:Var1,[(237,215)(258,215)])
Primary=[7793584,147,119]
}
Add(LineBreak,13050278,301,245)
{
Caption="Соедин"
Type=1
link(Data,7771380:Var3,[(307,227)(272,227)])
Primary=[5934731,49,-98]
}
Add(LineBreak,2332891,175,154)
{
Caption="настр"
link(Out,7771380:doWork1,[(241,160)(241,181)])
Primary=[10325947,-147,56]
}
Add(LineBreak,16398296,301,154)
{
Caption="сF"
link(Out,14557681:doWork2,[])
Primary=[14045688,-203,56]
}
Add(LineBreak,10131856,140,182)
{
Caption="ПереборСоед"
link(Out,7771380:doWork3,[(233,188)(233,195)])
Primary=[3771355,252,-7]
}
Add(LineBreak,8778747,371,413)
{
Caption="кБ"
Type=1
link(Data,4207381:Var1,[])
Primary=[11045731,-119,-266]
}
Add(LineBreak,6242615,273,231)
{
Caption="кБ"
Type=1
link(Data,7771380:Var4,[])
Primary=[830220,133,112]
}
Add(LineBreak,11993366,315,371)
{
Caption="кБ-мБ"
link(Out,4207381:doWork1,[])
Primary=[2568878,7,-154]
}
Add(BitBtn,10907170,28,413)
{
Top=10
Width=45
Height=13
Font=[Calibri,8,3,0,204]
Caption="Closed"
Data=Integer(0)
Point(doColor)
link(onClick,2029785:In,[])
}
Add(BitBtn,8948412,-28,140)
{
Left=45
Top=10
Width=10
Height=15
Color=255
Caption=""
Point(doColor)
link(onClick,9245137:doClose,[(13,146)(13,181)(-22,181)(-22,216)])
}
Add(LineBreak,12107492,49,483)
{
Caption="ul"
link(Out,3753354:doCaption,[])
Primary=[6079733,7,-126]
}
Add(LineBreak,11948725,-14,413)
{
Caption="dl"
link(Out,10907170:doCaption,[])
Primary=[10793332,70,-49]
}

карма: 0

0
файлы: 1code_34126.txt [14.3KB] [199]
Ответов: 195
Рейтинг: 1
#11: 2014-08-11 11:17:34 ЛС | профиль | цитата
блин вроде получилось. только запутался с таймером. короче не работает интервал пинга.

точнее его выбор. что я не так сделал?

http://rghost.ru/57404859

карма: 0

0
Ответов: 16884
Рейтинг: 1239
#12: 2014-08-11 13:32:21 ЛС | профиль | цитата
icontray2.rar
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
файлы: 1icontray2.rar [60.9KB] [91]
Голосовали:z80
Ответов: 195
Рейтинг: 1
#13: 2014-08-11 14:02:58 ЛС | профиль | цитата
блин код красивый, отлично реализовано но не пойму почему ничего не меняется. точнее как запустишь то иконка, в зависимости от наличия соединения, меняется. но потом выключаю инет или включаю изменений нет.

не пойму в чем проблема. может гугл меня забанил за ддос атаку))))
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#14: 2014-08-11 14:25:10 ЛС | профиль | цитата
Поставь Автостоп=0
Выпустил из вида.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 195
Рейтинг: 1
#15: 2014-08-11 18:58:00 ЛС | профиль | цитата
спасибо уже разобрался.
карма: 0

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