Make(cnet) ver(4.04 build 185) Add(StringSplit,14266117,497,154) { Separators=[] StringSplitOptions=1 link(onSplit,7845369:doEvent1,[]) link(String,9705148:Var1,[(503,144)(480,144)]) link(Separators,2173065:Var2,[]) } Add(IList,3591083,448,210) { Point(doClear) Point(value) link(Interface,16725234:Items,[]) } Add(ListBox,16725234,434,154) { Left=100 Top=125 Width=410 Height=205 Anchor=15 Point(Items) Point(onDoubleClick) link(onSelectedIndexChanged,14266117:doSplit,[]) link(onDoubleClick,8602671:doSplit,[(485,167)(485,216)]) } Add(FtpClient,9075582,378,224) { Point(doUploadFile) Point(Host) Point(User) Point(Password) Point(remote) Point(local) Point(newname) Point(doRename) Point(doMakeDirectory) Point(doDeleteFile) Point(doRemoveDirectory) Point(doDownloadFile) link(onListDirectory,3591083:doAdd,[(435,230)(435,216)]) link(onError,9255495:doShow4,[(435,237)(435,265)]) link(Host,10196266:Text,[(384,177)(265,177)]) link(User,12079131:Text,[(391,167)(307,167)]) link(Password,16759048:Text,[(398,153)(349,153)]) link(remote,2555966:Value,[]) link(newname,7995987:Value,[(419,212)(431,212)(431,348)(384,348)]) } Add(EntryPoint,2953706,483,350) { Width=535 Height=370 Text="Simple FTP client" Point(doText) } Add(Button,12921324,112,189) { Left=15 Top=125 Text="List" Point(onClick) link(onClick,4117443:doWork2,[(224,195)(224,216)]) AddHint(-45,8,31,13,Text) } Add(Button,9105524,112,259) { Left=15 Top=185 Text="Upload" Point(onClick) link(onClick,9421109:doCompare,[]) AddHint(-65,8,49,13,Text) } Add(TextBox,10196266,259,63) { Left=100 Top=5 Width=410 Text="localhost" Anchor=13 Lines=[] Point(doText) Point(Text) Point(Data) } Add(TextBox,12058830,399,63) { Left=100 Top=95 Width=410 Text="/" Anchor=13 Lines=[] Point(doText) Point(Text) Point(Data) } Add(Hub,15757951,280,210) { OutCount=4 link(onEvent1,5731393:doWork2,[]) link(onEvent2,3591083:doClear,[]) link(onEvent3,9075582:doListDirectoryDetails,[]) link(onEvent4,1319182:doWork1,[(319,237)]) } Add(Button,12604721,196,308) { Left=15 Top=215 Text="Rename" Point(onClick) link(onClick,3565081:doShowDialog,[]) AddHint(-81,11,55,13,Text) } Add(MessageBox,9255495,448,252) { Caption="Simple FTP client" Icon=6 Point(doShow4) } Add(Button,8832226,196,413) { Left=15 Top=245 Text="Delete" Point(onClick) link(onClick,10431253:doEvent1,[]) AddHint(-71,10,46,13,Text) } Add(Label,8035406,399,28) { Left=15 Top=100 Width=80 Text="Remote path:" TextAlign=2 Point(doText) Point(onClick) } Add(Label,1385247,259,28) { Left=15 Top=10 Width=80 Text="Host name:" TextAlign=2 Point(doText) Point(onClick) } Add(TextBox,12079131,301,63) { Left=100 Top=35 Width=410 Text="user" Anchor=13 Lines=[] Point(doText) Point(Text) Point(Data) } Add(Label,10215095,301,28) { Left=15 Top=40 Width=80 Text="User name:" TextAlign=2 Point(doText) Point(onClick) } Add(TextBox,16759048,343,63) { Left=100 Top=65 Width=410 Text="password" Anchor=13 Lines=[] PasswordChar="*" Point(doText) Point(Text) Point(Data) } Add(Label,11821808,343,28) { Left=15 Top=70 Width=80 Text="Password:" TextAlign=2 Point(doText) Point(onClick) } Add(If_else,9421109,154,259) { link(onTrue,14829636:doData,[]) link(Op1,14731785:ShowDialog,[]) link(Op2,9338171:DialogResult,[(167,249)(195,249)]) } Add(DialogResult,9338171,189,203) { } Add(OpenFileDialog,14731785,154,203) { Filter="All|*.*" Title="Upload file to FTP server" } Add(DoData,14829636,196,259) { link(onEventData,1995018:doEvent1,[]) link(Data,14731785:FileName,[(202,244)(167,244)]) } Add(ChildForm,3565081,238,308) { link(onDialogResult,9167632:doEvent1,[]) } BEGIN_SDK Add(EditMultiEx,4497517,21,14) { WorkCount=#12:doShowDialog| EventCount=#14:onDialogResult| Width=321 Height=151 link(doShowDialog,12685879:doCompare,[(70,20)(70,111)]) } Add(Form,15977889,196,35) { Left=35 Top=105 Width=310 Height=91 Visible=1 Name="child" FormBorderStyle=6 Point(doShow) Point(doDialogResult) } Add(TextBox,310188,280,35) { Left=10 Top=35 Width=200 Lines=[] Point(doText) Point(Text) Point(Data) } Add(If_else,12685879,196,105) { link(onTrue,5475299:doData,[]) link(Op1,15977889:ShowDialog,[]) link(Op2,9477793:Var2,[]) } Add(DialogResult,11987774,238,35) { } Add(DoData,15376774,133,119) { link(onEventData,15977889:doDialogResult,[(181,125)(181,48)]) link(Data,9477793:Var1,[(139,89)]) } Add(GetDataEx,9477793,203,84) { link(Data,11987774:DialogResult,[(209,79)(244,79)]) } Add(Label,3179692,140,35) { Left=15 Top=20 Width=235 Text="Type new name:" Point(doText) Point(onClick) } Add(Button,7199095,91,119) { Left=220 Top=35 Text="Rename" Point(onClick) link(onClick,15376774:doData,[]) } Add(DoData,5475299,280,105) { link(onEventData,4497517:onDialogResult,[(327,111)(327,20)]) link(Data,310188:Text,[]) } END_SDK Add(Memory,7995987,378,308) { } Add(Hub,9167632,280,308) { OutCount=4 link(onEvent1,12817889:doWork2,[]) link(onEvent2,9075582:doRename,[(330,321)(330,244)]) link(onEvent3,7954328:doWork2,[]) link(onEvent4,3490026:doWork1,[(301,335)(301,347)]) } Add(Button,6856240,196,357) { Left=15 Top=275 Text="MakeDir" Point(onClick) link(onClick,15371833:doShowDialog,[]) AddHint(-81,11,55,13,Text) } Add(Hub,14483000,280,357) { OutCount=5 link(onEvent1,5731393:doWork3,[(308,363)]) link(onEvent2,12817889:doWork3,[(312,370)]) link(onEvent3,9075582:doMakeDirectory,[(339,377)(339,251)]) link(onEvent4,1598010:doWork2,[]) link(onEvent5,5133202:doWork1,[(306,391)(306,402)]) } Add(ChildForm,15371833,238,357) { link(onDialogResult,14483000:doEvent1,[]) } BEGIN_SDK Add(EditMultiEx,15348033,21,14) { WorkCount=#12:doShowDialog| EventCount=#14:onDialogResult| Width=321 Height=151 link(doShowDialog,14192325:doCompare,[(70,20)(70,111)]) } Add(Form,16015617,196,35) { Left=35 Top=105 Width=310 Height=91 Visible=1 Name="child" FormBorderStyle=6 Point(doShow) Point(doDialogResult) } Add(TextBox,9171748,280,35) { Left=10 Top=35 Width=200 Lines=[] Point(doText) Point(Text) Point(Data) } Add(If_else,14192325,196,105) { link(onTrue,14040340:doData,[]) link(Op1,16015617:ShowDialog,[]) link(Op2,8897314:Var2,[]) } Add(DialogResult,2567598,238,35) { } Add(DoData,9650193,133,119) { link(onEventData,16015617:doDialogResult,[(181,125)(181,55)]) link(Data,8897314:Var1,[(139,89)]) } Add(GetDataEx,8897314,203,84) { link(Data,2567598:DialogResult,[(209,79)(244,79)]) } Add(Label,14001709,133,35) { Left=15 Top=20 Width=235 Text="Type new name:" Point(doText) Point(onClick) } Add(Button,13141989,91,119) { Left=220 Top=35 Text="MakeDir" Point(onClick) link(onClick,9650193:doData,[]) } Add(DoData,14040340,280,105) { link(onEventData,15348033:onDialogResult,[(327,111)(327,20)]) link(Data,9171748:Text,[]) } END_SDK Add(HubEx,12817889,308,308) { link(onEvent,7995987:doValue,[]) } Add(Button,8383574,196,462) { Left=15 Top=305 Text="RemoveDir" Point(onClick) link(onClick,9697718:doEvent1,[]) AddHint(-91,11,68,13,Text) } Add(DoData,14262306,434,350) { link(onEventData,10934698:doWork2,[]) link(Data,9075582:StatusDescription,[(440,303)(391,303)]) } Add(Hub,1995018,280,259) { OutCount=3 link(onEvent1,9075582:doUploadFile,[(325,265)(325,237)]) link(onEvent2,1319182:doWork2,[]) link(onEvent3,16683752:doWork1,[(306,279)(306,286)]) } Add(HubEx,7954328,315,322) { Angle=1 link(onEvent,14178929:doWork1,[]) } Add(HubEx,14178929,315,350) { link(onEvent,14262306:doData,[]) } Add(Hub,10431253,280,413) { OutCount=3 link(onEvent1,9075582:doDeleteFile,[(346,419)(346,258)]) link(onEvent2,10654198:doWork2,[]) link(onEvent3,9303371:doWork1,[(305,433)(305,446)]) } Add(HubEx,1598010,315,378) { Angle=3 link(onEvent,14178929:doWork3,[]) } Add(Hub,9697718,280,462) { OutCount=3 link(onEvent1,9075582:doRemoveDirectory,[(354,468)(354,265)]) link(onEvent2,16469943:doWork2,[]) link(onEvent3,9303371:doWork3,[(307,482)(307,493)(235,493)]) } Add(HubEx,10654198,315,420) { Angle=3 link(onEvent,1598010:doWork3,[]) } Add(HubEx,1319182,315,266) { Angle=1 link(onEvent,7954328:doWork1,[]) } Add(ArrayRW,11329322,574,161) { link(onRead,5915872:doEvent1,[]) link(Index,13135333:Var1,[(587,121)]) } Add(FormatStr,10254444,644,161) { Mask="{0}/{1}" link(onResult,8167726:doReplace,[]) link(Str1,9819229:Var2,[]) } Add(Replace,8167726,686,161) { OldValue="//" NewValue="/" link(onReplace,396300:doWork1,[(723,167)(723,116)(372,116)]) } Add(Memory,2555966,399,119) { link(onData,10934698:doWork1,[(473,125)]) } Add(DoData,10857825,322,182) { link(onEventData,396300:doWork3,[(372,188)]) link(Data,13006901:Var1,[(328,104)]) } Add(GetDataEx,13006901,399,99) { link(Data,12058830:Text,[]) } Add(HubEx,396300,368,119) { link(onEvent,2555966:doValue,[]) } Add(HubEx,4117443,231,210) { link(onEvent,15757951:doEvent1,[]) } Add(HubEx,3490026,231,341) { Angle=3 link(onEvent,16683752:doWork3,[]) } Add(HubEx,5133202,231,396) { Angle=3 link(onEvent,3490026:doWork3,[]) } Add(HubEx,9303371,231,440) { Angle=3 link(onEvent,5133202:doWork3,[]) } Add(StringSplit,8602671,490,210) { Separators=[] StringSplitOptions=1 link(onSplit,7855160:doRead,[]) link(String,9705148:Var3,[(496,195)]) link(Separators,2173065:Var3,[(503,193)(533,193)(533,145)]) } Add(ArrayRW,12361203,665,217) { link(onRead,9223019:doString,[]) link(Array,8602671:Result,[(671,210)(654,210)(654,251)(496,251)]) link(Index,13135333:Var3,[(678,121)]) } Add(FormatStr,9223019,707,217) { Mask="{0}/{1}" link(onResult,16297464:doReplace,[]) link(Str1,9819229:Var3,[(713,145)]) } Add(Replace,16297464,749,217) { OldValue="//" NewValue="/" link(onReplace,15568550:doEvent1,[]) } Add(GetDataEx,9705148,474,190) { Angle=3 link(Data,16725234:SelectedItem,[(440,195)]) } Add(Hub,15568550,791,217) { link(onEvent1,12058830:doText,[(817,223)(817,21)(387,21)(387,69)]) link(onEvent2,4117443:doWork1,[(812,230)(812,207)(235,207)]) } Add(GetDataEx,9819229,644,140) { link(Data,13006901:Var3,[(650,104)]) } Add(HubEx,16683752,231,280) { Angle=3 link(onEvent,4117443:doWork3,[]) } Add(HubEx,5731393,304,210) { Angle=3 link(onEvent,10857825:doData,[(308,188)]) } Add(Button,11575304,147,553) { Left=15 Top=155 Text="Download" Point(onClick) link(onClick,10979708:doCompare,[]) AddHint(-79,6,63,13,Text) } Add(Hub,4128366,280,553) { link(onEvent1,9075582:doDownloadFile,[(362,559)(362,272)]) link(onEvent2,16469943:doWork3,[(319,566)]) } Add(HubEx,16469943,315,469) { Angle=3 link(onEvent,10654198:doWork3,[]) } Add(SaveFileDialog,8830908,196,504) { AutoUpgradeEnabled=1 DefaultExt="rtf" Title="Download file from FTP server" Point(doFileName) } Add(DoData,9924868,238,553) { link(onEventData,4128366:doEvent1,[]) link(Data,8830908:FileName,[(244,542)(209,542)]) } Add(If_else,10979708,196,553) { link(onTrue,9924868:doData,[]) link(Op1,8830908:ShowDialog,[]) link(Op2,8191464:DialogResult,[(209,545)(237,545)]) } Add(DialogResult,8191464,231,504) { } Add(Hub,5915872,616,161) { link(onEvent1,10254444:doString,[]) link(onEvent2,8830908:doFileName,[(638,174)(638,496)(188,496)(188,517)]) } Add(ArrayRW,7855160,532,210) { link(onRead,4406262:doCopy,[]) } Add(Case,7005322,616,210) { Value=#1:d| link(onTrue,12361203:doRead,[]) } Add(Copy,4406262,574,210) { Count=1 link(onCopy,7005322:doCase,[]) } Add(Hub,7845369,539,154) { link(onEvent1,13061001:doRead,[(560,160)(560,69)]) link(onEvent2,11329322:doRead,[]) } Add(FieldRead,13061001,588,63) { Name="Length" link(onRead,13208538:doOperation,[]) } Add(HubEx,10934698,469,350) { link(onEvent,2953706:doText,[]) } Add(Math,13208538,630,63) { OpType=1 Op2=Integer(1) TypeOp1=2 TypeOp2=2 } Add(GetDataEx,13135333,630,116) { link(Data,13208538:Result,[]) } Add(StrArray,105971,504,63) { Strings=#1: |2:\t| } Add(GetDataEx,2173065,504,140) { link(Data,105971:Result,[]) }