Значение переменной может быть любым? Даже целый файл? Как правильно затолкать файлы в type и потом извлечь?
Пытался, но наверняка не правильно:
Add(MainForm,2953706,168,63) { Width=562 Height=629 } Add(Edit,15659177,315,126) { Left=5 Top=30 Width=540 Text="" link(onChange,1473513:doWork2,[]) } Add(Edit,9823317,322,168) { Left=5 Top=85 Width=540 Text="" link(onChange,1473513:doWork3,[(367,174)]) } Add(Type_Create,9672655,308,210) { Vars=#4:File|85:Lic=D:ПрограмируемПишем программыСоздание инсталяторовЛицензионное соглашение.txt|73:Com=D:ПрограмируемПишем программыСоздание инсталяторовОсобенности.txt| link(onCreate,16632832:doLoad,[]) link(Lic,15659177:Text,[]) link(Com,9823317:Text,[]) } Add(FileStream,16378432,707,112) { link(onLoad,7209227:doEvent1,[]) } Add(Type_Array,16632832,364,210) { UseName=0 Point(Name) Point(NameArray) Point(doUseName) link(onLoad,15012779:doEnum,[]) } Add(ArrayEnum,15012779,427,210) { link(onItem,16378432:doOpen,[(486,216)(486,118)]) link(onEndEnum,10958036:doEvent1,[]) link(Array,13772963:Array,[]) } Add(Counter,5683992,609,203) { Max=100000 link(onNext,16580548:doStrCat,[]) } Add(StrCat,16580548,658,203) { Str1="Files" link(onStrCat,12090577:doAdd,[]) } Add(LineBreakEx,7526858,364,259) { Caption="array" Type=3 link(_Data,16632832:Array,[]) } Add(MT_AddData,12090577,700,203) { link(onAdd,1179144:doValue,[]) link(Data1,10081507:Var,[]) link(Data2,16378432:Stream,[]) } Add(MT_MTArrayRW,13516543,798,189) { link(Array,10096108:getVar,[]) link(Value,1179144:Value,[(818,175)(841,175)(841,247)(755,247)]) } Add(MT_Memory,1179144,749,203) { link(onData,13516543:doAdd,[]) } Add(LineBreakEx,10096108,798,154) { Caption="array" Type=2 } Add(LineBreak,12604177,658,245) { Caption="name" Type=1 link(Data,16580548:Result,[]) Primary=[10081507,42,-70] } Add(Hub,7209227,749,112) { link(onEvent1,16378432:doClose,[(770,118)(770,101)(695,101)(695,125)]) link(onEvent2,5683992:doNext,[(775,125)(775,163)(597,163)(597,209)]) } Add(Type_MultiData,1828217,609,322) { Vars=#9:##onError|6:Files1|6:Files2| Point(GType) link(Files1,8784943:doGet,[]) link(Files2,9987174:doGet,[(660,342)(660,391)]) link(GType,9672655:FType,[(615,304)(314,304)]) } Add(Hub,10958036,511,217) { OutCount=3 link(onEvent1,5683992:doReset,[]) link(onEvent2,1828217:doSeparate,[(567,230)(567,328)]) link(onEvent3,3609753:doData,[(543,237)(543,482)]) } Add(LineBreakEx,10729255,609,448) { Caption="array" Type=2 } Add(HilightMemo,9735630,735,301) { Left=5 Top=180 Width=520 Height=130 Font=[Courier New,8,0,0,1] HilightFont=[Courier New,8,0,0,1] } Add(MT_MTArrayRW,11358255,609,476) { link(onRead,11137512:doGet,[]) link(Array,10729255:getVar,[]) } Add(DataToFile,11137512,672,469) { link(onGet,12532478:doAdd,[(720,475)(720,476)]) link(Stream,11358255:Item,[(678,464)(646,464)(646,520)(615,520)]) } Add(DataToFile,9987174,679,378) { Type=5 link(onGet,12572114:doConvert,[]) } Add(DataToFile,8784943,679,322) { Type=5 link(onGet,9735630:doAdd,[(719,328)(719,307)]) } Add(DoData,3609753,560,476) { Data=String(Files1) link(onEventData,11358255:doRead,[]) } Add(Convertor,12572114,728,378) { Mode=4 link(onResult,1003043:doAdd,[]) } Add(HilightMemo,12532478,737,470) { Left=5 Top=460 Width=520 Height=130 Font=[Courier New,8,0,0,1] HilightFont=[Courier New,8,0,0,1] } Add(InfoTip,16344736,504,273) { Info=#29:Наверно неправильно извлекаю?| Width=344 Height=270 } Add(InfoTip,13047264,581,70) { Info=#23:Или неправильно заношу?| Width=288 Height=193 } Add(Memo,1003043,784,378) { Left=5 Top=320 Width=520 Height=130 } Add(Button,10965101,203,126) { Left=5 Top=5 Width=105 Caption="Выбрать файл1" link(onClick,494420:doExecute,[]) } Add(ODialog,494420,259,126) { Filter="txtfile|*.txt*" link(onExecute,15659177:doText,[]) } Add(Button,618268,203,168) { Left=5 Top=60 Width=105 Caption="Выбрать файл2" link(onClick,7185496:doExecute,[]) } Add(ODialog,7185496,259,168) { Filter="txtfile|*.txt*" link(onExecute,9823317:doText,[]) } Add(Button,16501287,203,210) { Left=5 Top=110 Width=105 Caption="Создать тип" link(onClick,9672655:doCreate,[]) } Add(StrList,13772963,413,126) { } Add(HubEx,1473513,363,126) { link(onEvent,13772963:doAdd,[]) }
|