sla8a писал(а): aka, на разбирайся:http://hiasm.com//getfile/16472
Спасибо великое
------------ Дoбавленo в 13.31:
sla8a
А к твоей схеме, как можно сделать чтоб файл загружать со списком, делаю для открытия файла, но не получается список загружать?
Add(StrList,14031325,35,21) { } Add(MainForm,2953706,7,77) { Width=1164 Height=703 link(onCreate,10309353:doEnum,[]) } Add(ArrayEnum,10309353,49,91) { link(onItem,11233448:doTrim,[]) link(onEndEnum,1600945:doWork1,[(91,104)(91,476)(676,476)]) link(Array,14031325:Array,[]) } Add(Trim,11233448,98,91) { Char=" " link(onTrim,14994378:doTrim,[]) } Add(StringTable,212668,784,385) { Top=120 Width=1145 Height=545 Columns=#8:Заправка|5:Адрес|8:Телефоны|6:Валюта|7:А-76/80|5:Аи-92|5:Аи-95|2:ДТ|7:ДT(зим)| Point(doSortDigit) Point(Matrix) } Add(StrMask,6038008,448,196) { @Hint=#7:А-76/80| Mask="А-76/80*" link(onFalse,6646724:doCompare,[(492,202)(492,220)(436,220)(436,237)]) link(onTrue,8286563:doDelete,[]) AddHint(-92,63,54,13,@Hint) } Add(StrMask,6646724,448,231) { @Hint=#5:Аи-92| Mask="Аи-92*" link(onFalse,7122166:doCompare,[(492,237)(492,255)(436,255)(436,272)]) link(onTrue,16367727:doDelete,[]) AddHint(-82,59,43,13,@Hint) } Add(StrMask,7122166,448,266) { @Hint=#5:Аи-95| Mask="Аи-95*" link(onFalse,9842792:doCompare,[(488,272)(488,307)]) link(onTrue,15282293:doDelete,[]) AddHint(-87,49,43,13,@Hint) } Add(StrMask,13095925,448,336) { @Hint=#3:Д/Т| Mask="ДТ*" link(onTrue,12513211:doDelete,[]) AddHint(-67,34,36,13,@Hint) } Add(FormatStr,14794152,616,385) { DataCount=9 Mask="%1;%2;%3;%4;%5;%6;%7;%9;%8" link(onFString,5525744:doEvent1,[]) link(Str1,10971022:Var2,[]) link(Str2,15106972:Value,[]) link(Str3,611124:Value,[]) link(Str4,13311569:Value,[]) link(Str5,10311573:Value,[]) link(Str6,6786669:Value,[]) link(Str7,9055033:Value,[]) link(Str8,3751961:Value,[]) link(Str9,12426124:Value,[]) } Add(Memory,1361115,616,49) { Default=Integer(0) link(onData,8032324:doWork2,[]) } Add(Memory,15106972,623,98) { link(onData,8032324:doWork3,[(659,104)(659,62)]) } Add(Memory,611124,630,133) { link(onData,8032324:doWork4,[(668,139)(668,69)]) } Add(Memory,13311569,637,168) { link(onData,8032324:doWork5,[(676,174)(676,76)]) } Add(Memory,10311573,644,203) { Default=String(-) } Add(Memory,6786669,651,238) { Default=String(-) } Add(Memory,9055033,658,273) { Default=String(-) } Add(Memory,3751961,665,308) { Default=String(-) } Add(Hub,5525744,700,385) { OutCount=10 link(onEvent1,212668:doAdd,[]) link(onEvent2,12959588:In,[]) link(onEvent3,6444654:In,[]) link(onEvent4,4303559:In,[]) link(onEvent5,4427660:In,[]) link(onEvent6,12950261:In,[]) link(onEvent7,13544891:In,[]) link(onEvent8,11757501:In,[]) link(onEvent9,5068190:In,[]) link(onEvent10,15173965:In,[]) } Add(LineBreak,7671074,574,56) { Caption="0" link(Out,1361115:doClear,[]) Primary=[12959588,154,336] } Add(LineBreak,9159970,588,315) { Caption="0" link(Out,3751961:doClear,[]) Primary=[5068190,140,126] } Add(LineBreak,11101064,588,280) { Caption="0" link(Out,9055033:doClear,[]) Primary=[11757501,140,154] } Add(LineBreak,338812,588,245) { Caption="0" link(Out,6786669:doClear,[]) Primary=[13544891,140,182] } Add(LineBreak,1069827,581,210) { Caption="0" link(Out,10311573:doClear,[]) Primary=[12950261,147,210] } Add(LineBreak,9070459,581,175) { Caption="0" link(Out,13311569:doClear,[]) Primary=[4427660,147,238] } Add(LineBreak,8234996,574,140) { Caption="0" link(Out,611124:doClear,[]) Primary=[4303559,154,266] } Add(LineBreak,11320581,574,105) { Caption="0" link(Out,15106972:doClear,[]) Primary=[6444654,154,294] } Add(GetDataEx,10971022,616,84) { link(Data,1361115:Value,[]) } Add(Trim,14583402,182,91) { Char=""" link(onTrim,9948690:doEvent,[]) } Add(Trim,14994378,140,91) { Char=" " link(onTrim,14583402:doTrim,[]) } Add(IndexToChanel,9948690,224,91) { Count=5 Point(Index) link(onEvent1,4400708:doWork2,[]) link(onEvent2,15106972:doValue,[]) link(onEvent3,611124:doValue,[(499,111)(499,139)]) link(onEvent4,13311569:doValue,[(489,118)(489,174)]) link(onEvent5,5983393:doCompare,[(264,125)(264,202)]) link(Index,926903:Value,[]) } Add(LineBreak,463839,574,385) { Caption="add" link(Out,14794152:doString,[]) Primary=[8653042,-175,-175] } Add(If_else,6786437,329,203) { Op2=Integer(0) link(onFalse,8967829:doEvent1,[]) link(Op1,10971022:Var1,[(335,89)]) } Add(Hub,8967829,371,210) { link(onEvent1,8653042:In,[]) link(onEvent2,4400708:doWork3,[(394,223)(394,250)(270,250)]) } Add(Memory,926903,224,49) { Default=Integer(0) } Add(StrMask,5983393,280,196) { Mask="[*?,*?,*?]*" link(onFalse,6038008:doCompare,[]) link(onTrue,6786437:doCompare,[]) } Add(ChanelToIndex,8032324,686,42) { Count=5 link(onIndex,926903:doValue,[(800,48)(800,32)(210,32)(210,55)]) } Add(HubEx,4400708,266,91) { link(onEvent,1361115:doValue,[(291,97)(291,55)]) } Add(Delete,15282293,511,273) { Count=6 link(onDelete,9055033:doValue,[]) } Add(Delete,16367727,511,238) { Count=6 link(onDelete,6786669:doValue,[]) } Add(Delete,8286563,511,203) { Count=8 link(onDelete,10311573:doValue,[]) } Add(Memory,12426124,672,343) { Default=String(-) } Add(LineBreak,9271735,588,350) { Caption="0" link(Out,12426124:doClear,[]) Primary=[15173965,140,98] } Add(StrMask,9842792,448,301) { @Hint=#8:Д/Т(зим)| Mask="ДТ(зим.)*" link(onFalse,13095925:doCompare,[(492,307)(492,335)(436,335)(436,342)]) link(onTrue,4236120:doDelete,[]) AddHint(-99,40,62,13,@Hint) } Add(Delete,4236120,511,308) { Count=9 link(onDelete,3751961:doValue,[]) } Add(Delete,12513211,511,343) { Count=2 link(onDelete,12426124:doValue,[]) } Add(Hub,12653573,735,490) { OutCount=4 link(onEvent1,66273:doClear,[(1070,496)(1070,538)]) link(onEvent2,212668:doSortDigit,[(765,503)(765,426)]) link(onEvent3,15065158:doValue,[(780,510)(780,454)]) link(onEvent4,6404254:doFor,[(763,517)(763,531)]) } Add(MatrixRW,2394833,833,525) { link(onRead,12887792:doValue,[]) link(Matrix,11440117:Var2,[]) link(X,15065158:Value,[]) link(Y,2983187:Var1,[(860,516)]) } Add(For,6404254,777,525) { link(onEvent,2394833:doRead,[]) link(End,212668:Count,[]) } Add(Memory,15065158,847,448) { } Add(MatrixRW,6609352,973,525) { link(onRead,8419668:doString,[]) link(Matrix,11440117:Var3,[(979,509)]) link(X,12575900:Value,[]) link(Y,2983187:Var3,[(1000,516)]) } Add(Case,2869630,924,525) { Value=String(-) link(onNextCase,6609352:doRead,[]) } Add(GetDataEx,11440117,833,504) { link(Data,212668:Matrix,[(839,435)(804,435)]) } Add(StringTable,66273,1092,525) { Left=170 Top=15 Width=485 Height=95 Columns=#12:Заправка=400|4:Цена| } Add(GetDataEx,2983187,865,511) { Angle=2 link(Data,6404254:Position,[(871,572)(783,572)]) } Add(FormatStr,8419668,1015,525) { Mask="%1;%2" link(onFString,12017933:doEvent1,[]) link(Str2,12887792:Value,[(1028,513)(1050,513)(1050,575)(888,575)]) } Add(Memory,12887792,882,525) { link(onData,2869630:doCase,[]) } Add(Memory,12575900,987,448) { Default=Integer(0) } Add(Hub,12017933,1057,525) { link(onEvent1,66273:doAdd,[]) link(onEvent2,16133498:doCompare,[(1078,538)(1078,594)]) } Add(If_else,16133498,1092,588) { Op2=Integer(3) link(onTrue,6404254:doStop,[(1141,594)(1141,684)(762,684)(762,538)]) link(Op1,66273:Count,[]) } Add(ComboBox,7961396,623,483) { Left=10 Top=20 Width=95 Height=21 Strings=#7:А-76/80|5:Аи-92|5:Аи-95|2:ДТ|7:ДT(зим)| Point(doSelect) link(onClick,1600945:doWork2,[]) } Add(Math,5409068,693,490) { Op2=4 link(onResult,12653573:doEvent1,[]) } Add(HubEx,1600945,672,490) { link(onEvent,5409068:doOperation,[]) } Add(SDialog,420977,1001,637) { link(onExecute,66273:doSave,[(1062,643)(1062,559)]) } Add(Button,9836662,938,637) { Left=665 Top=45 Width=85 Caption="Сохранить" link(onClick,420977:doExecute,[]) } Add(Button,9686488,21,273) { Left=665 Top=15 Width=85 Caption="Открыть" link(onClick,16488141:doExecute,[(61,279)(61,237)]) } Add(ODialog,16488141,70,231) { link(onExecute,14031325:doAdd,[(114,237)(114,132)(23,132)(23,27)]) }
Что не так, помогите!
|