Доброго времени.После перебора текста ArrayEnum из RichEdit Выходят кракозябры, Ка лечить ? Add(MainForm,2953706,476,399) { Width=792 Height=380 link(onActivate,6627302:doEvent1,[]) } Add(RichEdit,7915306,748,189) { Left=30 Top=40 Width=330 Height=100 Strings=#5:Текст| Point(onMouseUp) Point(onKeyUp) Point(doLoad) Point(doSave) Point(FileName) Point(onDblClick) Point(doSetSelect) Point(PHandle) } Add(Edit,12740447,1057,287) { Left=30 Top=145 Width=330 Height=30 Font=[MS Sans Serif,12,1,0,1] } Add(RichEdit,16223376,916,287) { Left=30 Top=180 Width=330 Height=105 AddType=1 Point(onMouseUp) Point(onKeyUp) Point(doLoad) Point(doSave) Point(FileName) Point(onDblClick) link(onChange,12441107:doEvent1,[]) link(Str,11438320:Item,[(922,275)(846,275)(846,331)(769,331)]) } Add(ArrayEnum,11438320,763,287) { link(onItem,16223376:doAdd,[]) link(Array,7915306:Array,[(769,261)(768,261)]) } Add(Hub,12441107,987,287) { link(onEvent1,12740447:doText,[]) link(onEvent2,11438320:doStop,[(1009,300)(1009,358)(751,358)(751,300)]) } Add(Hub,6627302,623,399) { link(onEvent1,11438320:doEnum,[(700,405)(700,293)]) link(onEvent2,12370788:doEnum,[(697,412)(697,522)]) } Add(Edit,14500320,1050,516) { Left=400 Top=145 Width=330 Height=30 Font=[MS Sans Serif,12,1,0,1] } Add(RichEdit,9833928,909,516) { Left=400 Top=180 Width=330 Height=105 AddType=1 Point(onMouseUp) Point(onKeyUp) Point(doLoad) Point(doSave) Point(FileName) Point(onDblClick) link(onChange,12992977:doEvent1,[]) link(Str,12370788:Item,[(915,504)(839,504)(839,560)(762,560)]) } Add(ArrayEnum,12370788,756,516) { link(onItem,9833928:doAdd,[]) link(Array,7931368:Array,[]) } Add(Hub,12992977,980,516) { link(onEvent1,14500320:doText,[]) link(onEvent2,12370788:doStop,[(1001,529)(1001,586)(744,586)(744,529)]) } Add(Memo,7931368,742,411) { Left=400 Top=40 Width=330 Height=100 Strings=#5:Текст| }
|