Вверх ↑
Ответов: 632
Рейтинг: 4
#1: 2017-08-28 13:03:23 ЛС | профиль | цитата
Razzzor писал(а):
--- Добавлено в 2017-08-28 11:12:09

Vadimluk1 писал(а):
Потом только останется зашифровать.

Спасибо. А как потом вытащить файл из файла?

Редактировалось 2 раз(а), последний 2017-08-28 11:12:09

Нужно сделать, разделить в склеивания файлов, которая твоя программа сможет находить и понимать, как вытаскивать файлы.

Add(MainForm,9361407,210,196)
{
Width=358
Height=128
Caption="Склеивание файлов"
}
Add(FileStream,14688063,497,294)
{
Mode=1
Point(doCopyFromStream)
Point(doPosition)
link(onLoad,16436871:doData,[])
}
Add(Edit,2192225,308,245)
{
Left=75
Top=10
Width=260
Text=""
ReadOnly=0
link(onChange,14688063:doOpen,[(448,251)(448,300)])
}
Add(Button,4074826,357,259)
{
Left=10
Top=65
Width=325
Caption="Записать на диск"
link(onClick,14688063:doClose,[(429,265)(429,307)])
}
Add(FileStream,16378432,357,308)
{
link(onLoad,1018753:doEvent1,[])
}
Add(ODialog,3015364,259,308)
{
link(onExecute,16405465:doText,[])
}
Add(Edit,16405465,308,308)
{
Left=75
Top=40
Width=260
Text=""
ReadOnly=0
link(onChange,16378432:doOpen,[])
}
Add(Button,9182617,210,308)
{
Left=10
Top=40
Width=60
Caption="Файл 2"
link(onClick,3015364:doExecute,[])
}
Add(DoData,16436871,546,294)
{
link(onEventData,14688063:doPosition,[(587,300)(587,345)(484,345)(484,321)])
link(Data,14688063:Size,[(552,282)(537,282)(537,337)(510,337)])
}
Add(ODialog,12961147,259,245)
{
link(onExecute,2192225:doText,[])
}
Add(Button,13789902,210,245)
{
Left=10
Top=10
Width=60
Caption="Файл 1"
link(onClick,12961147:doExecute,[])
}
Add(Hub,1018753,406,308)
{
link(onEvent1,6919520:doStrCat,[])
link(onEvent2,16378432:doClose,[(429,321)(429,346)(348,346)(348,321)])
}
Add(StrCat,6919520,441,308)
{
Str1=";"
link(onStrCat,14688063:doCopyFromStream,[])
}
Add(MultiStrPart,5805636,511,476)
{
link(Str,10215609:Stream,[(517,464)(429,464)(429,527)(342,527)])
}
Add(FileStream,10215609,336,483)
{
Point(doCopyFromStream)
Point(doPosition)
link(onLoad,5805636:doSplit,[(440,489)(440,482)])
}
Add(InfoTip,14630062,441,441)
{
Info=#26:Первая точка, первый файл.|26:Вторая точка, второй файл.|
Width=225
Height=116
}

Что это работать будет, дать гарантии не могу, время проверять нет.
карма: 0

0