Вверх ↑
Этот топик читают: Гость
Ответов: 199
Рейтинг: 6
#1: 2018-10-30 15:30:18 ЛС | профиль | цитата
Почему при считывании строки из RichEdit в RichEdit меняется кодировка?

И из CtrList в RichEdit нормально переносятся строки, а обратно меняет колировку


Add(MainForm,2953706,518,259)
{
Width=566
Height=498
Position=1
Point(onClose)
link(onClose,929769:doSave,[])
}
Add(StrList,929769,616,245)
{
@Hint=#23:Список тем для удаления|
FileName="Mask-tema.txt"
Strings=#11:Тема первая|11:Тема вторая|7:Windows|14:Последняя тема|
AddHint(-60,-36,145,13,@Hint)
}
Add(RichEdit,14398242,693,378)
{
Left=10
Top=15
Width=530
Height=155
}
Add(Button,11197926,574,378)
{
Left=15
Top=190
Caption="Считать"
Data=Integer(0)
link(onClick,520654:doEnum,[])
}
Add(ArrayRW,5792362,1141,287)
{
link(onRead,3110833:doAdd,[])
link(Array,2029941:Array,[])
}
Add(ArrayEnum,520654,630,378)
{
link(onItem,14398242:doAdd,[])
link(Array,929769:Array,[])
}
Add(Button,4285093,609,469)
{
Left=90
Top=190
Width=65
Caption="Добавить"
link(onClick,5004948:doEvent1,[])
}
Add(ArrayEnum,16335057,707,476)
{
link(onItem,13817499:In,[])
link(Array,14398242:Array,[])
}
Add(Hub,5004948,658,469)
{
OutCount=3
link(onEvent1,4482519:In,[(691,475)(691,524)])
link(onEvent2,16335057:doEnum,[])
link(onEvent3,14398242:doClear,[(682,489)(682,391)])
}
Add(LineBreak,8033898,567,259)
{
link(Out,929769:doClear,[(607,265)(607,258)])
Primary=[4482519,140,259]
}
Add(LineBreak,7989815,567,238)
{
link(Out,929769:doAdd,[(607,244)(607,251)])
Primary=[13817499,189,238]
}
Add(RichEdit,2029941,1127,224)
{
Left=15
Top=240
Width=520
Strings=#13:Первая строка|
}
Add(RichEdit,3110833,1197,287)
{
Left=15
Top=330
Width=520
}
Add(Button,10483953,1085,287)
{
Left=20
Top=425
Caption="Считать"
Data=Integer(0)
link(onClick,5792362:doRead,[])
}

карма: 2

0
vip
#1.1контекстная реклама от партнеров
Ответов: 199
Рейтинг: 6
#2: 2018-10-30 17:25:41 ЛС | профиль | цитата
Это вполне нормальное поведение компонентов или только у меня такое?
карма: 2

0
Ответов: 3837
Рейтинг: 620
#3: 2018-10-30 18:14:20 ЛС | профиль | цитата
Это баг точки RichEdit.Array. Пока никто не предложил решения.
карма: 17

0
Ответов: 16412
Рейтинг: 1210
#4: 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 ? По-моему там такой проблемы не было.

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