Make(delphi) Add(MainForm,2953706,70,42) { Width=645 Height=228 link(onCreate,15065276:doLoad,[]) } Add(Button,8634019,70,98) { Left=20 Top=10 link(onClick,9283191:doEnum,[]) } Add(Label,10243633,301,98) { Left=20 Top=45 } Add(FTCG_Tools,1313600,238,98) { link(onResult,10243633:doText,[]) link(SrcStr,9283191:Item,[(244,86)(216,86)(216,142)(174,142)]) } BEGIN_SDK Add(EditMultiEx,3067227,21,21) { WorkCount=#5:doFor| EventCount=#8:onResult| DataCount=#6:SrcStr| Width=391 Height=172 link(doFor,5610319:doLength,[(35,27)(35,83)]) } Add(FT_If_else,7101216,231,77) { Op2=String(à) link(onTrue,11928372:doData,[]) } Add(FT_For,13921109,112,77) { Start=1 InData=0 link(onEvent,12469303:doCopy,[]) link(End,5610319:Result,[(118,65)(98,65)(98,120)(55,120)]) } Add(FT_Copy,12469303,175,77) { CharCount=1 link(onCopy,7101216:doCompare,[]) link(SrcStr,3067227:SrcStr,[(181,35)(27,35)]) } Add(FT_Math,3669617,343,77) { Op2=1 ResultType=0 link(onResult,3067227:onResult,[(383,83)(383,27)]) link(Op1,3669617:Result,[(349,65)(337,65)(337,121)(349,121)]) } Add(FT_Length,5610319,49,77) { link(onLength,13921109:doFor,[]) } Add(FT_DoData,11928372,287,77) { Data=Integer(1) link(onEventData,3669617:doOperation,[]) } END_SDK Add(ArrayEnum,9283191,168,98) { link(onItem,1313600:doFor,[]) link(Array,15065276:Array,[]) } Add(ListBox,15065276,154,28) { Left=90 Top=10 Width=525 Height=170 FileName="License.txt" }