Вверх ↑
Ответов: 286
Рейтинг: 5
#1: 2021-10-15 15:00:58 ЛС | профиль | цитата
Спасибо разобрался

--- Добавлено в 2021-10-15 15:15:14

[b]Netspirit [/b] А как обойти такую байду.Мне при сравнивании строк в оригинальном файле нужен шаг 1 байт,а в переведенном 2 байта.Сравнение будет некорректным.
Add(MainForm,2953706,294,35)
{
Width=616
Height=342
Caption="Пример использования компонента FileStream"
}
Add(FileStream,5579189,392,147)
{
Point(doPosition)
link(onLoad,7672151:doEvent1,[])
}
Add(Button,6901598,224,147)
{
Left=60
Top=15
Width=65
Caption="Оригинал"
link(onClick,10644980:doExecute,[])
}
Add(ODialog,10644980,280,147)
{
link(onExecute,5579189:doOpen,[])
}
Add(Memo,8413688,784,252)
{
Left=5
Top=45
Width=250
Height=250
ScrollBars=3
}
Add(Hub,7672151,441,147)
{
link(onEvent1,7228710:doFor,[(490,153)(490,251)])
link(onEvent2,5579189:doClose,[(474,160)(474,200)(352,200)(352,160)])
}
Add(For,7228710,525,245)
{
IncludeEnd=1
link(onEvent,8206227:doEvent1,[])
link(End,5579189:Size,[(538,220)(405,220)])
}
Add(Convertor,7177771,707,252)
{
Mode=6
link(onResult,8413688:doAdd,[])
}
Add(DataToFileEx,15470337,630,252)
{
BigEndian=0
Point(doPosition)
link(onGet,7177771:doConvert,[])
link(Stream,5579189:Stream,[(636,234)(398,234)])
}
Add(Hub,8206227,574,245)
{
link(onEvent2,15470337:doGet,[])
}
Add(FileStream,12186776,413,357)
{
Point(doPosition)
link(onLoad,7330781:doEvent1,[])
}
Add(Button,7326642,245,357)
{
Left=390
Top=15
Width=90
Caption="Измененный"
link(onClick,8129174:doExecute,[])
}
Add(ODialog,8129174,301,357)
{
link(onExecute,12186776:doOpen,[])
}
Add(Memo,3411457,805,462)
{
Left=320
Top=45
Width=250
Height=250
ScrollBars=3
}
Add(Hub,7330781,462,357)
{
link(onEvent1,4366585:doFor,[(511,363)(511,461)])
link(onEvent2,12186776:doClose,[(495,370)(495,410)(373,410)(373,370)])
}
Add(For,4366585,546,455)
{
Step=2
IncludeEnd=1
link(onEvent,15601516:doEvent1,[])
link(End,12186776:Size,[(559,430)(426,430)])
}
Add(Convertor,3180973,728,462)
{
Mode=6
link(onResult,3411457:doAdd,[])
}
Add(DataToFileEx,13955297,651,462)
{
BigEndian=0
Point(doPosition)
link(onGet,3180973:doConvert,[])
link(Stream,12186776:Stream,[(657,444)(419,444)])
}
Add(Hub,15601516,595,455)
{
link(onEvent2,13955297:doGet,[])
}

карма: 0

0
Редактировалось 4 раз(а), последний 2021-10-15 15:24:08