Make(delphi) ver(4.03 build 180) Add(Edit,12981330,273,77) { Left=330 Top=10 Width=170 ReadOnly=0 link(onChange,10567774:doEvent1,[]) } Add(ListBox,12742582,210,7) { Left=903 Top=25 Width=105 Height=641 Align=3 link(onClick,9708431:doRead,[(255,20)(255,62)(212,62)(212,83)]) } Add(MainForm,14095003,7,67) { Left=20 Top=105 Width=1014 Height=688 Caption="\"Hex ICQ\"" BorderStyle=4 } Add(HTTP_Get,4446761,47,21) { URL="http://hiasm.com/ip.php" link(onDownload,1580175:doConvert,[]) } Add(Convertor,1580175,96,28) { Mode=11 link(onResult,7927816:doReplace,[]) } Add(Replace,7927816,145,28) { SubStr="\r\n" link(onReplace,12742582:doText,[]) } Add(Button,906711,7,21) { Left=509 Top=10 Width=65 Caption="Обновить" link(onClick,4446761:doDownload,[]) } Add(ArrayRW,9708431,224,77) { link(onRead,12981330:doText,[]) link(Array,12742582:Array,[]) } Add(ChildGroupBox,8541894,504,455) { } BEGIN_SDK Add(EditMulti,6698624,3,3) { WorkCount=2 link(doWork1,10138160:doClear,[(82,9)(82,41)]) link(doWork2,10138160:doAdd,[(74,16)(74,34)]) } Add(GroupBox,9133691,35,105) { Left=330 Top=40 Width=497 Height=85 Font=[Arial,8,0,0,1] Caption="Error" } Add(ListBox,10138160,161,28) { Left=2 Top=15 Width=338 Height=68 Align=5 Color=14145495 Font=[Arial,8,0,0,1] Hint="Ошибки" SelectAdd=0 } END_SDK Add(Thread,4079161,168,343) { FastStop=0 link(onExec,8485048:doScanIPInfo,[]) } Add(ScanIPInfo,8485048,273,343) { Point(onError) link(onNameFromIP,16246918:doStrCat,[]) link(IP,732802:Var2,[]) link(onError,15877188:doWork2,[(324,405)(324,468)]) } Add(TreeViewTrain,4303500,469,14) { Left=5 Top=5 Width=315 Height=426 Name="maintree" ModeSp=3 IconsManager="icons" ParentIDIndex=1 IDIndex=2 IconIndex=3 Numeric=0 UseHashMap=0 Point(NextID) } Add(IconsManager,506766,385,14) { Name="icons" Icons=['Host'=[ZIP5E07000078DA636060044209090610C9E0C1CEC020C6C0C0A001C4402106030688380828B0330C1068686838800300A528318781E13F1041CC21DE28FCEE2168D484AAF4C98DF9539A4BC836675143CCCAEAC89519766B134C57C61A9361CE99C5B9876A8CF7A49B1F4830DD92EEB03BD9E148BC0DA9E65C5C927DB25C6F63A0CA5A4FB9E5EED2ADE11A13FC1456BB8A0395FDC701B09A73A65A778513DF024BF679964CF3ED1853837942C2F9263932361001E0865CA8F559EDC5BBD896698503C36A378675DE0C69118C42E92CD1118C24F9EB50A6CA7247C60D5E0CDB0318768732EC886688C96566296410CE2521DEEFCCCCD91CC0BEC58F617F04C3F1048633E90C3B7219E4EB19981B18846A4930E7FAE470A021072219CEA4325CCF65B857C2B0A98E51B78D41B59DA1A49181F870BE36D9735F38C3E934864B050C7B1B98E6B433554DE0689CC03AAF97E96E0703F1E17C73AAE78924869B450CB3DB5975E60A45CD16AE9925B47491C887B97C3FA67310EFAF7B8B422F67319CAA63B29B2F29B2415F718B99C176DB85DBAC3F6DB1FCB35E8778731E6F48BE53C4B8BD8D5563BDBEE26E17CD830106C763FC4FC4EF3B9DF2F35422F1E63CDB5D70A55FA970AEBCE66E57C363D15E17F24B6F35C7DDA8EFBEDBF1EA413F49E979C9BE78ED4DA6FA47C29D2F1576DE6ABEF172E1F2376BCF7F3EF0FCDDDAB3E7B2093A09910E2F74C71F8DB73C1E9376B5ACE7C1843DEFD79DFDB6FFC6D743BB5ECC0F3F93D2B8D381F852F1FCAD79FDC713EBCF66CCBFD376E6F9BC631F369C7DB970F2DD76F35389663BEC37CF1624267F41C0C9A78B565EAD5B7AB160D38DFAA5F77A9AEF76FA5F29D33F16A3BCCD66C62C9117FD220F16B8DDDC3399C882F4E88349A76E342CBB5AD978ADAAF1447CE27EBF845D5EDB36F9BFDE57424635F1ECDE92DBF7973EBA35EBC6F519B76FCE797A691A412DFF1FF0FFFF7F801D88998198F1FF3F06C6FF3F80F801101F80E2062866C083616A0E303003F5FEFFFF0368DC3FA0B10028C8024A],'Prop'=[ZIP5E07000078DA95944F4C134114C6871307EF8683072F241E3D7834E188076E1C3C18490CEAA570A121268448A42A04B1346DA989420A58420517FC5330B8298136ADD4DA2D554A2325166335A1119226A818649FDFB068DBED6AA66FBF997E333BEFD799C9CC325685A7A686F19A9DAB66EC3863EC140ABAD869A6F5F33859CD2A880D2363E859A9E7E12AD8D552B35AD65FF28ACED7526D2D70F387103363B78EC6045889D135F5E6DF9CA745627F6A56D6D4F9F275B98D8C9B950C701BF5EBC25A6C7ADADA0446EA63B8B717F55A30BC165534A34C4A7EBBF3BF347DF8C73C998D8D6C368B3A9D4CA522910FB170FC5524343DB33C362A885A0F8791FE757B1BD250E06CC6E3C940E0EDFCCBF0F844724A1AECE81041216B379F873414D257C73D099B150A0CF48333E970082E8D4F604A7A2FFB310D4062969E958E4E68D672ADA22D8ACA4B3FE71A77FC831A64B9B52D72F92A044E25378B7368FA04742037E4176F643C56D0E69A9AB0AE8A38B1E73E7A7186E6CFF21A5A6AD8932F65273AB14558AF38E7B5F7112DD4231D52838DDC04EB214C2FE7BDA2D8CD828BC23941BA1ABE40D1E6BF42933383F54AF74D414EEAC93D9EBB62A277E682D0042DD8A8F4F50B723E2E0CF0C46427A52D05A189CE68B3E2720A723EFBBB7962E60E7D72148466DAF23DD4AEDC1F12E1E022700E12BF0CD3D6584187281C03E9B6D0FEE056FE485C0744DD9128EFD3C4FD210A7F21C841C8BE39DFC8C8E3D1C1E08C7B3D32934BCF7ECBC91CB5FB302DF589738A0F243E233E9B1D0A8DBADE487771A487EC4E5679E0CB9378E6D5147A30049AE1306A5168DFD44E55A656AA3A7691F65BB244A603526D44BF5817EDB13AFCD6910AAF323A2ADC6BFD4685BFA34594CD2EFA0DE8230534]] } Add(Hub,10567774,329,77) { link(onEvent1,8541894:doWork1,[(361,83)(361,461)]) link(onEvent2,7638297:doAdd,[(385,90)(385,167)]) } Add(TVT_AddNode,12324373,539,224) { TreeView="maintree" link(onAddNode,4079161:doStart,[(583,230)(583,279)(156,279)(156,349)]) link(onAddFailed,8627708:doWork2,[]) } Add(MT_AddData,7638297,427,161) { Count=4 link(onAdd,8766149:doEvent1,[]) link(Data1,732802:Var3,[(433,124)]) link(Data2,8778642:Value,[(440,120)(433,120)]) link(Data3,4870605:Var1,[(447,86)]) link(Data4,3865461:Value,[(454,111)(517,111)]) } Add(Memory,3865461,511,14) { Default=Integer(0) } Add(Memory,8778642,427,14) { Default=Integer(0) } Add(MT_String,10195621,630,231) { Delimeter="|" link(onResult,7086025:doStrCat,[]) } Add(StrCat,7086025,700,231) { Str1="Ошибка добавления картежа " link(onStrCat,15877188:doWork1,[(878,237)(878,439)(424,439)]) } Add(HubEx,15877188,420,462) { link(onEvent,8541894:doWork2,[]) } Add(MT_AddData,14612606,462,343) { Count=4 link(onAdd,4820238:doAddNode,[]) link(Data1,16246918:Result,[(468,331)(436,331)(436,387)(405,387)]) link(Data2,11706331:Value,[(475,201)(678,201)]) link(Data3,4870605:Var2,[]) link(Data4,12172827:Value,[(489,307)(496,307)]) } Add(Hub,8766149,490,161) { link(onEvent1,11706331:doValue,[]) link(onEvent2,12324373:doAddNode,[(522,174)(522,230)]) } Add(Memory,11706331,672,161) { Default=Integer(-1) Point(Data) link(Data,4870605:Var3,[(678,86)]) } Add(GetDataEx,4870605,476,81) { link(Data,4303500:NextID,[]) } Add(Memory,12172827,490,238) { Default=String(1) } Add(StrCat,16246918,399,343) { Str1="Hostname: " link(onStrCat,14612606:doAdd,[]) } Add(TVT_AddNode,4820238,553,343) { TreeView="maintree" link(onAddFailed,8627708:doWork3,[(606,356)]) } Add(HubEx,8627708,602,231) { link(onEvent,10195621:doStr,[]) } Add(GetDataEx,732802,273,119) { link(Data,12981330:Text,[]) }