Make(delphi) ver(4.02 build 179) Pos(222,0) Add(MainForm,2953706,-176,161) { Width=593 Height=378 Caption="Creator Install Pack" BorderStyle=1 Position=1 link(onCreate,9358416:doRead,[(-136,181)(-136,167)]) } Add(Registry,9358416,-124,161) { HKey=1 Key="Software\hiasm" Value="InstallPath" NotEmpty=1 link(onRead,13545547:doWork2,[]) } Add(Button,15714801,-166,441) { Left=205 Top=315 Width=175 Height=24 Font=[MS Sans Serif,8,1,0,1] TabOrder=-1 Caption="Create Install Pack" Data=Integer(0) link(onClick,5960871:doEvent1,[]) } Add(MTStrTbl,4642668,-117,35) { Left=5 Top=55 Width=575 Height=255 Color=15527129 Font=[MS Sans Serif,8,1,0,1] Name="tab" DoubleBuffered=0 Columns=#7: =50==1|10:Имя=120==0|15:Описание=130==0|14:Вкладка=120==0|15:Описание=130==0| FlatScroll=1 ColumnClick=1 CheckBoxes=0 SmallIconsManager="icon" StateIconsManager="check" DrawManager="draw_tab" link(onColumnClick,9771476:doSort,[(-73,48)(-73,41)]) } Add(DS_SQLite,3818256,877,175) { Name="sqlite_db" WaitClose=0 link(onOpen,13830597:doClear,[]) link(FileName,15285174:FString,[(883,156)(782,156)(782,212)(687,212)]) } Add(Hub,16556851,828,175) { OutCount=4 link(onEvent1,3818256:doOpen,[]) link(onEvent2,13335692:doQuery,[(859,188)(859,265)]) link(onEvent3,3818256:doClose,[(867,195)(867,188)]) link(onEvent4,11166063:doData,[(853,202)(853,321)]) } Add(DSC_Query,13335692,877,259) { SQL="SELECT\r\n '',\r\n name,\r\n info,\r\n (SELECT name FROM groups WHERE id = elements.tab),\r\n (SELECT info FROM groups WHERE id = elements.tab) \r\nFROM\r\n elements\r\nWHERE\r\n substr(name, 1, 1) <> '*'\r\n AND\r\n (SELECT name FROM groups WHERE id = elements.tab) <> ''; " DSManager="sqlite_db" link(onQuery,3153128:doValue,[]) } Add(MST_RowAction,16685620,1374,322) { MSTControl="tab" } Add(MST_CheckBoxes,423117,16,406) { MSTControl="tab" } Add(ArrayEnum,8422574,16,469) { link(onItem,1972340:doEvent,[(74,475)(74,531)]) link(onEndEnum,917065:doData,[(67,482)(67,615)]) link(Array,423117:CheckBoxes,[]) } Add(Hub,5960871,-117,441) { OutCount=3 link(onEvent1,11669171:doClear,[(294,447)(294,545)]) link(onEvent2,14570500:doClear,[]) link(onEvent3,5600531:doData,[(-93,461)(-93,475)]) } Add(MST_ArrayRows,4279017,135,469) { MSTControl="tab" } Add(MT_MTArrayRW,1208385,135,532) { link(onRead,3942816:doValue,[]) link(Array,4279017:Strings,[]) } Add(IndexToChanel,1972340,86,525) { Point(Data) link(onEvent2,1208385:doRead,[]) link(Data,8422574:Index,[(92,513)(29,513)]) } Add(MT_MultiMem,3942816,177,532) { From=1 Count=3 link(onData,9700698:doString,[]) } Add(FormatStr,9700698,254,532) { DataCount=4 Mask="if (sys.extelement("%4", "%1"))\r\n sys.delelement("%4","%1");\r\nsys.addelement("%4","%1","%2","%3");\r\n" link(onFString,11669171:doStrCat,[]) link(Str1,1109587:Var3,[(260,520)(238,520)(238,590)]) link(Str2,3942816:Value2,[(267,515)(231,515)(231,583)(190,583)]) link(Str3,3942816:Value3,[(274,510)(224,510)(224,576)(197,576)]) link(Str4,3486562:getVar,[]) } Add(FormatStr,13052025,282,609) { DataCount=1 Mask="function run()\r\n{\r\n%1}" link(onFString,14570500:doText,[(389,615)(389,606)(389,468)]) } Add(StrCat,11669171,310,532) { Point(doClear) link(onStrCat,9489264:doEvent1,[]) link(Str1,7669672:Var1,[(316,520)(300,520)(300,583)]) } Add(GetDataEx,7669672,303,574) { link(Data,11669171:Result,[]) } Add(Hub,9672086,240,609) { OutCount=3 link(onEvent1,13052025:doString,[]) link(onEvent2,4306434:doString,[]) link(onEvent3,570852:doMessage,[(268,629)(268,657)]) } Add(MST_SortInCol,9771476,-61,35) { MSTControl="tab" } Add(ComboBox,2973307,576,154) { Left=5 Top=5 Width=150 Height=21 Color=15984895 Font=[MS Sans Serif,8,1,0,1] Hint="Pockets" Text="" DataType=1 Point(Index) link(onClick,5800735:doWork2,[]) link(Str,7112211:Value,[(582,135)(482,135)(482,186)(358,186)]) } Add(StrCat,9036980,-12,161) { Str2="\Int\hiasm.db" link(onStrCat,14916763:doFileExists,[(29,167)(29,188)]) } Add(DS_SQLite,15784351,184,175) { Name="sqlite_db2" WaitClose=0 link(FileName,9036980:Result,[(190,156)(102,156)(102,205)(-6,205)]) } Add(Hub,6136603,135,161) { OutCount=6 link(onEvent1,2973307:doClear,[]) link(onEvent2,14990398:doClear,[(228,174)(228,286)]) link(onEvent3,15784351:doOpen,[]) link(onEvent4,2434808:doQuery,[(165,188)(165,223)]) link(onEvent5,15784351:doClose,[(173,195)(173,188)]) link(onEvent6,2194362:doData,[(158,202)(158,251)]) } Add(DSC_Query,2434808,184,217) { SQL="SELECT units,codename FROM packs\r\n " DSManager="sqlite_db2" link(onQuery,6103146:doSeparateMT,[]) } Add(FormatStr,15285174,681,168) { Mask="%1\Elements\%2\Elements.db" Point(FString) link(onFString,13061031:doFileExists,[(723,174)(723,195)]) link(Str1,3356567:getVar,[]) } Add(MST_Clear,13830597,926,175) { MSTControl="tab" link(onChange,16271003:doClearIcons,[]) } Add(HubEx,5800735,625,154) { link(onEvent,6027332:doEvent1,[]) } Add(DoData,2194362,583,245) { link(onEventData,5800735:doWork3,[(629,251)]) link(Data,10969412:Var2,[]) } Add(DoData,917065,135,609) { link(onEventData,10453545:doCase,[]) link(Data,7669672:Var2,[(141,598)(316,598)]) } Add(Case,10453545,177,609) { Value=String() link(onNextCase,9672086:doEvent1,[]) link(onTrue,243861:doMessage,[(228,622)(228,699)]) } Add(IconsManager,8719277,37,35) { Name="icon" ImgSize=32 Icons=[] } Add(IconsManager,7844537,86,35) { Name="check" ImgSize=13 Icons=['UnCheck'=[ZIP7A02000078DA95D14D0AC2301005E06737AEBA15110FE021BC8477F020DE52C4124A2050211042AD6DAD6D4C71444478D4373F8BE1DB0D308B95A6887B897D022C006CE2C4135678DDC76C13FCE4B05B4FE9D139EF7D595EABEA56D74DDBDEBBEED1F7C3308477C459E7381577B1965371A6283815A78DE1549CD29A5371E73CE754DC49294EC51DB38CD38FE3F4CB112A6ED27F310FE1DF79020E829A9B],'Check'=[ZIP7A02000078DA63606004425E5E062029C190C2C4C020C6C0C0A001C44021062906883808D8303160808640196210481DC37F06FC68541D5E751BFF1F8720A2CC23561D617B898A5F06F6FFFF49C5001984C670]] } Add(StrCase,9266157,310,140) { Type=3 link(onModify,7112211:doValue,[]) } Add(StrList,14990398,681,273) { link(Str,797858:Value,[]) } Add(MT_MultiData,6103146,247,217) { link(onData1,797858:doValue,[]) link(onData2,9266157:doModify,[(295,230)(295,146)]) } Add(ArrayRW,7064222,695,329) { link(Array,14990398:Array,[]) link(Index,2973307:Index,[(708,207)(596,207)]) } Add(Hub,6027332,646,161) { link(onEvent1,7064222:doRead,[(669,167)(669,335)]) link(onEvent2,15285174:doString,[]) } Add(Icon,12770703,1332,147) { @Hint=#3:nil| } Add(LineBreakEx,16032584,1157,203) { Caption="PPath" Type=2 } Add(FormatStr,16692113,1157,266) { DataCount=3 Mask="%1\Elements\%2\icon\%3.ico" link(onFString,16408964:doEvent1,[]) link(Str1,16032584:getVar,[]) link(Str2,1459840:getVar,[]) link(Str3,7385220:Var3,[(1177,240)]) } Add(FileTools,15686100,1283,203) { link(onEnd,11983794:doIndex,[]) } Add(Icon,12883416,1290,154) { @Hint=#3:nil| Icon=[ZIP5E07000078DACDD35D4853611CC7F1FFC9CDB3B379365D212B31D3B0A436DD9C8EB35373E54BE88574D14517A189126D4E670ABEA0E01BF4825D04C99032ADE805C42BBBAFA484D00A22EAC23BB117BA3018A559437AFA3D0D8619D22AB09EF3F90FF670F8F2B0734624E0B258887F52B948944A4439186C919DA2FB7CED10E9DF2DD5F5D0A13C05BB7DB8C07615FE2062B5B29F3BBF9B4204B24ABED83D0C94FC973B1D1F213BED66FC29A712CE551994BB5981BA086A2E73B816C09537AF5AEFC046766C79AC2AC065EE5DC8F132C876B3FCD265D8E77E976E1D81D5F7CFB6183A1C7AE85637C1593B553924A8F3453A4F840B0F31F016704EE79BDD450CDC36E6C91A81359D4F43C6F53AD1543C9DC7ADDCD26969AADE082FEA84D946096A5BD8F94EAEF6E4F29E62065E17B32A5C86F37D61C504486544159CECE5A9E7AD3A1C095EF9085EFBB4F03640C1FA45085D62FEEA159C2AA7E8AB92BFC4A98FA825098CFD446DC9DC61217AAAD5A958279A8A76209E0ED64C90D0890C9AE79B1261A696BA4B0C70BC86152911C8DCCF6C9E0F205C4C491813401F4AA4260B57F9C3B37ED6F03D7566173A7D1E53745317940FDE3B05FA5B29A62113D065A2E1EDDC0DA21E4E3A9ABCE6B5410A1DF8CB0EFFAD1AB8D892DA533DD301A0D124719C400A89F2A006B4D7CCD4A6E10EFCFAC51603E6CA27CD4017526858C385B6D015E24644ED801EE8C8C6758C7EB964A619B4D7656994407B5BA71913401C4C369DDB06E48EE31F3B905AFCA0156C53FEE2FB7D503ADD5E36DD059EBB5DCA4435C8C71236AC931E4CD8DCB615741D463968006D63A2BEDE049A5E83B93F0D049F85FEB3C5182336D7436CD24BAC378318996243B121EAC54C62E630E11AA2CF98157C61EB0DEF62BE0182247DAB] } Add(ArrayRW,4008568,1241,266) { link(Array,16271003:IconArray,[]) link(Value,11983794:Var,[(1261,256)(1331,256)]) } Add(GetIndexData,11983794,1325,203) { link(Data1,12883416:Icon,[(1331,195)(1296,195)]) link(Data2,12770703:Icon,[]) } Add(Hub,16408964,1199,266) { OutCount=4 link(onEvent1,12770703:doLoad,[(1223,272)(1223,153)]) link(onEvent2,15686100:doFileExists,[(1230,279)(1230,230)]) link(onEvent3,4008568:doAdd,[]) link(onEvent4,9872150:doAdd,[(1230,293)(1230,328)]) } Add(WorkIconsManager,16271003,1241,175) { IconsManager="icon" Point(EndIdxIcons) } Add(LineBreakEx,6507242,-54,210) { Caption="PPath" Type=3 link(_Data,12971186:Text,[]) } Add(GetDataEx,10969412,576,203) { link(Data,2973307:String,[]) } Add(MT_MultiMem,3153128,926,259) { From=1 Count=1 link(onData,3230014:doValue,[]) } Add(MT_Memory,3230014,975,259) { link(onData,15061423:doString,[]) } Add(MT_AddData,9872150,1325,322) { link(onAdd,16685620:doRowAction,[]) link(Data1,3230014:Value,[(1331,307)(981,307)]) link(Data2,16271003:EndIdxIcons,[(1338,249)(1261,249)]) } Add(MST_DrawManager,3128543,-12,35) { Name="draw_tab" IconSize=24 SingleString=0 TabGridFrame=0 LightTextSel=1 Gradient=0 GradientColor=14262639 } Add(LineBreakEx,3356567,681,140) { Caption="PPath" Type=2 } Add(LineBreakEx,12051552,597,224) { Caption="PPack" Type=3 link(_Data,10969412:Var3,[(603,212)]) } Add(LineBreakEx,1459840,1164,217) { Caption="PPack" Type=2 } Add(FormatStr,15061423,1024,259) { DataCount=4 Mask="%1\Elements\%2\code\hi%3.%4" Point(FString) link(onFString,13926728:doFileExists,[(1064,265)(1064,286)]) link(Str1,16551579:getVar,[]) link(Str2,13879819:getVar,[]) link(Str3,7385220:Var2,[]) link(Str4,3312486:getVar,[]) } Add(LineBreakEx,16551579,1024,189) { Caption="PPath" Type=2 } Add(LineBreakEx,13879819,1031,203) { Caption="PPack" Type=2 } Add(FileTools,13926728,1073,259) { link(onEnd,8307425:doEvent,[]) } Add(IndexToChanel,8307425,1115,259) { link(onEvent2,16692113:doString,[]) } Add(LineBreakEx,3312486,1045,217) { Caption="PExt" Type=2 } Add(LineBreakEx,10856588,695,378) { Caption="PExt" Type=3 link(_Data,7064222:Item,[]) } Add(GetDataEx,7385220,1031,231) { Angle=3 link(Data,3153128:Value1,[(971,240)(971,307)(932,307)]) } Add(Edit,9619195,233,35) { Left=160 Top=30 Width=397 Height=21 Color=13099746 Font=[MS Sans Serif,8,1,0,1] Hint="Target Folder" Text="" Point(doSetFocus) } Add(ToolBar,13757442,135,35) { Left=558 Top=28 Width=24 Height=24 Wrapable=1 Buttons=['=Папка'=[ZIP3604000078DA8D922D0F83301086BB64627212B9B9ED0F90CC2297CC4C6227919358241259CB4F40D62291486C2512D9DD958FDCE0283479D21E77EF4BAF6DF0F28FC20E1FB801E78183B8F489214F8731C6E2C57217633DC5CBCAFDCC3C3C595A24ACA37A9BBB54E2F4CD17FA5877D623D60E1A2382A259E8AF79251EAAB6FAA475001E816A17FAA0D0D6238738EBDCBC9516A1AA260FD4635F38A75DDF838BB0041F98A93E19F4916AA67D75CC3D21D88399EBA1B767A9A7B3DC03D54BE82B6560DF8AFC7F03181BA64F7AB76B63F4C0B3E7FE436321242A7A3E7D4CF3E841E1F63E7930FA659D64BE0FB90D3DADE5E235FFB57D70F563FC03A73D1FF4]] link(onClick,12782088:doBrowse,[]) } Add(Browse,12782088,184,35) { Title="Выбор папки" NewStyle=0 link(onBrowse,9619195:doText,[]) } Add(LineBreakEx,43852,233,77) { Caption="PFolder" Type=3 link(_Data,9619195:Text,[]) } Add(DoData,5600531,-82,469) { link(onEventData,3376490:doCase,[]) link(Data,16187329:getVar,[]) } Add(Case,3376490,-40,469) { link(onNextCase,8422574:doEnum,[]) link(onTrue,16694953:doMessage,[(1,482)(1,531)]) } Add(LineBreakEx,16187329,-82,420) { Caption="PFolder" Type=2 } Add(Message,16694953,16,525) { Message="No Selected Target Folder" Caption="Warning!" Icon=3 } Add(FormatStr,4306434,331,616) { DataCount=1 Mask="%1\install.his" Point(FString) link(onFString,14570500:doSave,[(396,622)(396,482)]) link(Str1,6776423:getVar,[]) } Add(LineBreakEx,6776423,331,588) { Caption="PFolder" Type=2 } Add(Hub,9489264,450,532) { OutCount=3 link(onEvent1,15511757:doWork1,[]) link(onEvent2,15511757:doWork2,[]) link(onEvent3,15511757:doWork3,[]) } Add(EventFromData,9685699,611,469) { link(onEvent,13528125:doString,[]) } Add(FormatStr,8541650,590,637) { DataCount=3 Mask="%1\Elements\%2\%3" Point(FString) link(onFString,9851693:doString,[]) link(Str1,2848708:getVar,[(596,629)(533,629)]) link(Str2,13567136:getVar,[(603,624)(589,624)]) link(Str3,2238282:Var,[]) } Add(LineBreakEx,2848708,527,602) { Caption="PPath" Type=2 } Add(LineBreakEx,13567136,583,602) { Caption="PPack" Type=2 } Add(FileTools,15516833,688,637) { link(FileName,8541650:FString,[(694,625)(660,625)(660,682)(596,682)]) } Add(FormatStr,9851693,639,637) { Mask="%1\%2" link(onFString,15516833:doCopy,[(679,643)(679,650)]) link(Str1,15348858:getVar,[]) link(Str2,9385872:Var,[]) } Add(LineBreakEx,15348858,639,602) { Caption="PFolder" Type=2 } Add(Edit,12971186,-54,161) { Left=160 Top=5 Width=397 Height=21 Color=15984895 Font=[MS Sans Serif,8,1,0,1] Hint="HiAsm Install Folder" Text="" Point(doSetFocus) link(onChange,9036980:doStrCat,[]) } Add(ToolBar,15098610,-173,203) { Left=558 Top=3 Width=24 Height=24 Wrapable=1 Buttons=['=Папка'=[ZIP3604000078DA8D922D0F83301086BB64627212B9B9ED0F90CC2297CC4C6227919358241259CB4F40D62291486C2512D9DD958FDCE0283479D21E77EF4BAF6DF0F28FC20E1FB801E78183B8F489214F8731C6E2C57217633DC5CBCAFDCC3C3C595A24ACA37A9BBB54E2F4CD17FA5877D623D60E1A2382A259E8AF79251EAAB6FAA475001E816A17FAA0D0D6238738EBDCBC9516A1AA260FD4635F38A75DDF838BB0041F98A93E19F4916AA67D75CC3D21D88399EBA1B767A9A7B3DC03D54BE82B6560DF8AFC7F03181BA64F7AB76B63F4C0B3E7FE436321242A7A3E7D4CF3E841E1F63E7930FA659D64BE0FB90D3DADE5E235FFB57D70F563FC03A73D1FF4]] link(onClick,5093528:doBrowse,[]) } Add(Browse,5093528,-124,203) { Title="Выбор папки" link(onBrowse,13545547:doWork3,[(-71,209)]) } Add(HubEx,13545547,-75,154) { link(onEvent,12971186:doText,[]) } Add(StrList,14570500,408,441) { } Add(MST_SelectRow,13130069,926,315) { MSTControl="tab" } Add(DoData,11166063,877,315) { Data=Integer(0) link(onEventData,13130069:doSelect,[]) } Add(LineBreakEx,3486562,275,497) { Caption="PPack" Type=2 } Add(Message,570852,282,651) { Message="Installing Pack Succesful Created\r\n\r\n" Caption="Creator Install Pack" Icon=4 } Add(Memory,7112211,352,140) { link(onData,12647856:doString,[]) } Add(FormatStr,12647856,394,140) { Mask="%1\Elements\%2\" Point(FString) link(onFString,1071193:doExists,[(434,146)(434,167)]) link(Str1,5027406:getVar,[]) } Add(LineBreakEx,5027406,394,105) { Caption="PPath" Type=2 } Add(DirTools,1071193,443,140) { Point(doExists) link(onOK,16439849:doEvent,[]) } Add(IndexToChanel,16439849,492,140) { link(onEvent2,914648:doEvent1,[]) } Add(IndexToChanel,12581589,79,161) { link(onEvent1,10892566:doMessage,[(119,167)(119,125)]) link(onEvent2,6136603:doEvent1,[(123,174)(123,167)]) } Add(IndexToChanel,6702805,779,168) { link(onEvent1,11644642:doMessage,[(820,174)(820,125)]) link(onEvent2,16556851:doEvent1,[]) } Add(Message,243861,282,693) { Message="No Selected Items" Caption="Warning!" Icon=3 } Add(Message,10892566,135,119) { Message="File hiasm.db Not Found" Caption="Warning!" Icon=3 } Add(Message,11644642,828,119) { Message="File Elements.db Not Found" Caption="Warning!" Icon=3 } Add(GetIndexData,2238282,604,532) { Count=3 link(Data1,3438576:GetData,[(610,516)(470,516)]) link(Data2,9685699:GetData,[]) link(Data3,15840441:GetData,[(624,516)(764,516)]) } Add(ChanelToIndex,15511757,485,532) { Count=3 link(onIndex,2149563:doEvent1,[]) } Add(Hub,2149563,534,532) { OutCount=3 link(onEvent1,2238282:doIndex,[]) link(onEvent2,9385872:doIndex,[(573,545)(573,566)]) link(onEvent3,8541650:doString,[(562,552)(562,643)]) } Add(GetIndexData,9385872,646,560) { Count=3 link(Data1,13507489:FString,[(652,510)(512,510)]) link(Data2,13528125:FString,[]) link(Data3,1763035:FString,[(666,534)(806,534)]) } Add(Hub,914648,534,147) { link(onEvent1,2973307:doAdd,[(562,153)(562,160)]) link(onEvent2,14990398:doAdd,[(556,160)(556,279)]) } Add(FileTools,14916763,38,161) { link(onEnd,12581589:doEvent,[]) } Add(FileTools,13061031,733,168) { link(onEnd,6702805:doEvent,[]) } Add(GetDataEx,1109587,170,581) { link(Data,3942816:Value1,[]) } Add(EventFromData,3438576,464,469) { link(onEvent,13507489:doString,[]) } Add(FormatStr,13507489,506,469) { Mask="hi%1.%2" Point(FString) link(onFString,47493:doStrCat,[]) link(Str1,153987:Var2,[]) link(Str2,14623585:getVar,[]) } Add(EventFromData,15840441,758,469) { link(onEvent,1763035:doString,[]) } Add(StrCat,47493,548,469) { Str1="code\" link(onStrCat,3438576:doData,[(592,475)(592,463)(452,463)(452,475)]) } Add(LineBreakEx,14623585,513,434) { Caption="PExt" Type=2 } Add(FormatStr,13528125,653,469) { DataCount=1 Mask="%1.ini" Point(FString) link(onFString,12009071:doStrCat,[]) link(Str1,5572484:Var2,[]) } Add(StrCat,12009071,695,469) { Str1="conf\" link(onStrCat,9685699:doData,[(739,475)(739,463)(599,463)(599,475)]) } Add(FormatStr,1763035,800,469) { DataCount=1 Mask="%1.ico" Point(FString) link(onFString,13812799:doStrCat,[]) link(Str1,5572484:Var3,[(806,429)]) } Add(StrCat,13812799,842,469) { Str1="icon\" link(onStrCat,15840441:doData,[(886,475)(886,463)(746,463)(746,475)]) } Add(GetDataEx,5572484,646,420) { Angle=3 link(Data,153987:Var3,[]) } Add(GetDataEx,153987,499,420) { Angle=3 link(Data,1109587:Var1,[(172,429)(172,590)]) } Add(Memory,797858,681,217) { }