Add(MainForm,68161,511,266)
{
Left=21
Top=106
Width=345
Height=197
Caption="Сервер - клиент"
link(onCreate,9973059:doEvent1,[])
}
Add(Edit,7298692,308,357)
{
Left=5
Top=95
Width=145
Text="Пример текста"
link(onEnter,10742204:doEvent1,[])
}
Add(StreamPack,14434465,511,350)
{
DataCount=#10:тип данных|6:данные|0:|
link(onPack,7240964:doSend,[])
link(данные,12524206:Data,[(524,337)(499,337)(499,393)(461,393)])
}
Add(StreamUnPack,13235102,721,336)
{
DataCount=#10:тип данных|6:данные|0:|
link(onUnPack,4233687:doEvent,[])
}
Add(TCP_Server,6739532,672,336)
{
Port=111
DataType=3
link(onRead,13235102:doUnPack,[])
}
Add(TCP_Client,7240964,595,336)
{
Port=111
IP="127.0.0.1"
DataType=3
}
Add(Hub,9973059,553,280)
{
link(onEvent1,6739532:doOpen,[(644,286)(644,342)])
link(onEvent2,7240964:doOpen,[(581,293)(581,342)])
}
Add(IndexToChanel,4233687,777,336)
{
Count=4
Point(Index)
Point(Data)
link(onEvent1,9252309:doFileName,[(874,342)(874,223)])
link(onEvent2,958573:doCopy,[(889,349)(889,181)])
link(onEvent3,4456694:doAdd,[])
link(Index,13235102:тип данных,[(783,324)(768,324)(768,384)(727,384)])
link(Data,13235102:данные,[(790,319)(762,319)(762,380)(734,380)])
}
Add(ChanelToIndex,12524206,455,350)
{
Count=3
Point(Data)
link(onIndex,14434465:doPack,[])
}
Add(FileStream,2227522,308,308)
{
link(onLoad,15407374:doData,[])
}
Add(Button,7328284,168,301)
{
Left=10
Top=10
Caption="Файл"
link(onClick,774689:doExecute,[])
}
Add(ODialog,774689,217,301)
{
Title="файл для отправки данных"
link(onExecute,10529649:doEvent1,[])
}
Add(DoData,15407374,364,308)
{
link(onEventData,12524206:doWork2,[(412,314)(412,363)])
link(Data,2227522:Stream,[(370,296)(351,296)(351,351)(314,351)])
}
Add(SDialog,9252309,966,210)
{
Title="сохранить принятые данные в файл"
Point(doFileName)
link(onExecute,15993375:doValue,[])
}
Add(MemoryStream,958573,917,175)
{
link(onCopy,9252309:doExecute,[(957,181)(957,216)])
}
Add(FileStream,968047,1022,273)
{
Mode=2
Point(doCopyFromStream)
link(FileName,15993375:Value,[])
}
Add(Memory,15993375,1022,210)
{
link(onData,329189:doData,[(1072,216)(1072,316)(908,316)(908,279)])
}
Add(DoData,329189,917,273)
{
link(onEventData,5559598:doEvent1,[])
link(Data,958573:Stream,[])
}
Add(Hub,5559598,980,273)
{
OutCount=3
link(onEvent1,968047:doOpen,[])
link(onEvent2,968047:doCopyFromStream,[(1012,286)(1012,293)])
link(onEvent3,968047:doClose,[(1012,293)(1012,286)])
}
Add(Label,13327372,980,350)
{
Left=190
Top=10
Width=90
Color=12639424
Caption="принятый текст:"
AutoSize=1
}
Add(RichEdit,4456694,931,350)
{
Left=170
Top=30
Width=150
Height=125
Color=12639424
ScrollBars=2
}
Add(Label,7520253,448,266)
{
Left=10
Top=40
Width=137
Height=17
Caption="---------------------"
}
Add(Hub,10529649,259,301)
{
OutCount=3
link(onEvent1,10690890:doPart,[(283,307)(283,272)])
link(onEvent2,2227522:doOpen,[])
link(onEvent3,2227522:doClose,[])
}
Add(Hub,661063,371,266)
{
link(onEvent1,7520253:doText,[])
link(onEvent2,12524206:doWork1,[(421,279)(421,356)])
}
Add(FilePartElm,10690890,308,266)
{
link(onPart,661063:doEvent1,[])
}
Add(Button,5178758,245,406)
{
Left=5
Top=120
Caption="Текст"
link(onClick,15097737:doData,[])
}
Add(DoData,15097737,308,406)
{
link(onEventData,10742204:doEvent2,[(359,412)(359,377)])
link(Data,7298692:Text,[])
}
Add(Hub,10742204,378,364)
{
InCount=2
OutCount=1
link(onEvent1,12524206:doWork3,[])
}
Add(InfoTip,9835884,413,406)
{
Info=#121:На какую ножку подаш сигнал с такой и снимеш|0:|0:|102:Тип подаваемых данных не имеет значение, так как они упаковываются\распаковываются в поток \ из потока|
Transparent=1
HAlign=0
Width=505
Height=102
Margin=10
}
Add(InfoTip,6691684,287,231)
{
Info=#17:Передатчик файлов|
Width=148
Height=123
}
Add(InfoTip,7348943,861,133)
{
Info=#15:Приемник файлов|
Width=225
Height=193
}
Ответов: 263
Рейтинг: 18
|
|||
Схема не моя. Модифицируйте под свои нужды.
|
|||
карма: 3 |
|
Редактировалось 1 раз(а), последний 2020-12-20 07:07:53