Вверх ↑
Ответов: 287
Рейтинг: 5
#1: 2021-10-15 14:30:24 ЛС | профиль | цитата
Блин почему первый байт не читает

Add(FileStream,5579189,434,280)
{
Point(doPosition)
link(onLoad,14482734:doConvert,[])
}
Add(Button,6901598,224,280)
{
Left=15
Top=45
link(onClick,10644980:doExecute,[])
}
Add(ODialog,10644980,280,280)
{
link(onExecute,7672151:doEvent1,[])
}
Add(Memo,8413688,700,280)
{
Left=20
Top=135
Width=735
Height=360
ScrollBars=3
}
Add(StreamConvertor,14482734,497,280)
{
Point(Data)
}
Add(MainForm,2953706,336,133)
{
Caption="Пример использования компонента FileStream"
}
Add(Hub,7672151,336,280)
{
OutCount=5
link(onEvent1,5579189:doOpen,[])
link(onEvent3,7228710:doFor,[(364,300)(364,398)])
link(onEvent4,5579189:doClose,[(392,307)(392,293)])
}
Add(For,7228710,378,392)
{
IncludeEnd=1
link(onEvent,8206227:doEvent1,[])
link(End,5579189:Size,[(391,353)(447,353)])
}
Add(Convertor,7177771,567,399)
{
Mode=6
link(onResult,8413688:doAdd,[(649,405)(649,286)])
link(Data,15470337:Data,[(573,387)(517,387)(517,443)(461,443)])
}
Add(DataToFileEx,15470337,455,399)
{
BigEndian=0
Point(doPosition)
link(onGet,7177771:doConvert,[])
link(Stream,5579189:Stream,[(461,367)(440,367)])
}
Add(Hub,8206227,420,392)
{
link(onEvent1,5579189:doPosition,[(446,398)(446,349)(422,349)(422,300)])
link(onEvent2,15470337:doGet,[])
}

карма: 0

0