Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2018-10-31 11:23:27 ЛС | профиль | цитата
.....

Add(MainForm,4722459,154,161)
{
Width=632
Height=458
Position=1
Point(onClose)
}
Add(StrList,929769,252,147)
{
@Hint=#23:Список тем для удаления|
FileName="Mask-tema.rtf"
Strings=#6:ABCDEF|10:0123456789|66:АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдеёжзийклмнопрстуфхцчшщъыьэюя|3:Оля|4:Коля|4:Петя|4:Вася|0:|0:|
Point(doSave)
Point(Array)
AddHint(-60,-36,145,13,@Hint)
}
Add(RichEdit,14398242,315,231)
{
Left=5
Top=15
Width=610
Height=110
Font=[Courier New,8,0,0,204]
FileName="Mask-tema.rtf"
Point(doFormatSel)
Point(doSave)
}
Add(Button,11197926,196,231)
{
Left=20
Top=130
Caption="Считать"
Data=Integer(0)
link(onClick,520654:doEnum,[])
}
Add(ArrayEnum,520654,252,231)
{
link(onItem,14398242:doAdd,[])
link(Array,929769:Array,[])
}
Add(Button,4285093,203,371)
{
Left=95
Top=130
Width=415
Caption="Добавить с построчной обработкой."
link(onClick,5004948:doEvent1,[])
}
Add(ArrayEnum,16335057,406,378)
{
link(onItem,16180694:doOperation,[])
link(Array,14076953:Array,[])
}
Add(Hub,5004948,252,371)
{
OutCount=3
link(onEvent1,2642968:doData,[(298,377)(298,293)])
link(onEvent2,16335057:doEnum,[])
}
Add(RichEdit,2029941,707,378)
{
Left=5
Top=155
Width=610
Height=110
Font=[Courier New,8,0,0,204]
}
Add(RichEdit,3110833,756,427)
{
Left=5
Top=305
Width=610
Height=110
Font=[Courier New,8,0,0,204]
}
Add(Button,10483953,658,441)
{
Left=20
Top=275
Caption="Считать"
Data=Integer(0)
link(onClick,16395861:doData,[])
}
Add(StrList,14076953,406,273)
{
Point(doText)
Point(Array)
}
Add(DoData,2642968,315,287)
{
Point(Data)
link(onEventData,14076953:doText,[])
link(Data,14398242:Text,[])
}
Add(DoData,16395861,707,441)
{
Point(Data)
link(onEventData,3110833:doText,[])
link(Data,2029941:Text,[])
}
Add(If_else,15324974,532,378)
{
Op1=Integer(1)
link(onTrue,922245:doModify,[])
link(onFalse,5914491:doData,[])
}
Add(Math,16180694,476,378)
{
OpType=41
ResultType=0
link(onResult,15324974:doCompare,[])
link(Op1,16335057:Index,[(482,366)(450,366)(450,422)(419,422)])
}
Add(HubEx,13142226,672,378)
{
link(onEvent,2029941:doAdd,[])
}
Add(DoData,5914491,637,385)
{
Point(Data)
link(onEventData,13142226:doWork3,[(676,391)])
link(Data,9899689:Var3,[(643,353)])
}
Add(StrCase,922245,588,378)
{
Type=4
link(onModify,13142226:doWork2,[])
link(Str,9899689:Var2,[])
}
Add(GetDataEx,9899689,588,348)
{
Angle=3
link(Data,16335057:Item,[(362,353)(362,424)(412,424)])
}

Леонид, можете выложить из своих архивов первый RichEdit ? По-моему там такой проблемы не было.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Редактировалось 4 раз(а), последний 2018-10-31 16:51:19