Make(cnet) ver(4.04 build 185) Add(EntryPoint,2953706,189,56) { Width=399 Height=382 Text="INI file access" } Add(INIFile,5731443,252,161) { Point(doDeleteKey) Point(doEraseSection) Point(doReadSections) Point(doReadKeys) Point(onReadSections) Point(onReadKeys) link(onResult,4112319:doText,[]) link(FileName,10298028:Var2,[]) link(Section,2019918:Text,[(265,140)(300,140)]) link(Key,3399077:Text,[(272,145)(342,145)]) link(Value,4865390:Text,[(279,152)(384,152)]) link(onReadSections,13044623:doForEach,[(292,174)(292,216)]) link(onReadKeys,9246206:doForEach,[(289,181)(289,258)]) } Add(Button,10523813,189,105) { Left=15 Top=130 Width=125 Text="ReadKey" Point(onClick) link(onClick,5731443:doReadKey,[(237,111)(237,167)]) AddHint(-85,5,59,13,Text) } Add(Label,4112319,301,161) { Left=150 Top=135 Width=230 Anchor=7 Point(doText) Point(onClick) } Add(INIFile,6020746,238,315) { Section="unknown" Key="unknown" link(onResult,12213875:doText,[]) link(FileName,10298028:Var1,[(244,145)]) link(Value,8722451:Value,[]) } Add(Button,10685272,189,315) { Left=15 Top=320 Width=125 Text="ReadUnknownKey" Point(onClick) link(onClick,6020746:doReadKey,[]) AddHint(-122,6,105,13,Text) } Add(Label,12213875,287,315) { Left=155 Top=325 Width=230 Anchor=7 Point(doText) Point(onClick) } Add(TextBox,2140961,252,98) { Left=110 Top=15 Width=275 Text="C:\HiAsm\Elements\CNET\Example\tests\test.ini" Anchor=13 Lines=[] Point(doText) Point(Text) } Add(GetDataEx,10298028,252,140) { link(Data,2140961:Text,[]) } Add(Button,12609877,189,140) { Left=15 Top=160 Width=125 Text="WriteKey" Point(onClick) link(onClick,5731443:doWriteKey,[(230,146)(230,174)]) AddHint(-84,5,58,13,Text) } Add(TextBox,4865390,378,98) { Left=110 Top=90 Width=275 Text="value1" Anchor=13 Lines=[] Point(doText) Point(Text) } Add(Button,6182311,189,175) { Left=15 Top=190 Width=125 Text="DeleteKey" Point(onClick) link(onClick,5731443:doDeleteKey,[]) AddHint(-84,5,64,13,Text) } Add(Label,291818,252,56) { Left=15 Top=20 Width=90 Text="File:" TextAlign=1 Point(doText) Point(onClick) } Add(TextBox,2019918,294,98) { Left=110 Top=40 Width=275 Text="section1" Anchor=13 Lines=[] Point(doText) Point(Text) } Add(TextBox,3399077,336,98) { Left=110 Top=65 Width=275 Text="key1" Anchor=13 Lines=[] Point(doText) Point(Text) } Add(Label,1222474,294,56) { Left=15 Top=45 Width=90 Text="Section:" TextAlign=1 Point(doText) Point(onClick) } Add(Label,1457223,336,56) { Left=15 Top=70 Width=90 Text="Key:" TextAlign=1 Point(doText) Point(onClick) } Add(Label,9268494,378,56) { Left=15 Top=95 Width=90 Text="New value:" TextAlign=1 Point(doText) Point(onClick) } Add(Memory,8722451,259,266) { Default=String(default value) } Add(Button,11526715,189,210) { Left=15 Top=220 Width=125 Text="EraseSection" Point(onClick) link(onClick,5731443:doEraseSection,[(237,216)(237,188)]) AddHint(-102,6,78,13,Text) } Add(Button,10076303,189,245) { Left=15 Top=250 Width=125 Text="Sections" Point(onClick) link(onClick,5731443:doReadSections,[(241,251)(241,195)]) AddHint(-76,6,56,13,Text) } Add(ForEach,13044623,301,210) { @Hint=#6:object| link(onItem,8375844:doMessage,[]) } Add(Message,8375844,343,210) { Caption="Section" } Add(Button,6360754,189,280) { Left=15 Top=280 Width=125 Text="Keys" Point(onClick) link(onClick,5731443:doReadKeys,[(247,286)(247,202)]) AddHint(-56,8,38,13,Text) } Add(ForEach,9246206,301,252) { @Hint=#6:object| link(onItem,11834638:doMessage,[]) } Add(Message,11834638,343,252) { Caption="Key" }