Add(MainForm,13473972,161,77)
{
 Width=396
 Height=356
 Point(Handle)
}
Add(StreamConvertor,5465620,322,140)
{
 Mode=7
 Point(Data)
 link(onResult,3030542:doCreate,[])
}
Add(WinExec,12628925,427,126)
{
 Mode=0
 Point(onConsoleResult)
 Point(doConsoleExec)
 Point(onConsoleError)
 link(onConsoleResult,10423991:doWork1,[(480,146)])
 link(onConsoleError,10423991:doWork2,[])
}
Add(Memo,7517007,539,147)
{
 Top=40
 Width=380
 Height=277
 Align=5
 Font=[Lucida Console,12,0,0,204]
 Antialiased=1
 ScrollBars=3
}
Add(TempFileStream,3030542,371,140)
{
 Extention=".bat"
 link(onCreate,12628925:doConsoleExec,[])
}
Add(FormatStr,12737990,217,140)
{
 Mask="@echo off\r\n\r\n:: Переменные\r\nset SOURCE_DIR=C:\\123\r\nset BACKUP_DIR=D:\\Backup\r\nset ARCHIVE_NAME=MyFolder_%DATE%.rar\r\nset PASSWORD=1234\r\n\r\n:: Проверяем наличие каталога резервных копий\r\nif not exist "%BACKUP_DIR%" mkdir %BACKUP_DIR%\r\n\r\n:: Создаем зашифрованный архив\r\n"C:\\Program Files\\WinRAR\\rar.exe" a -r -m5 -hp"%PASSWORD%" "%BACKUP_DIR%\\%ARCHIVE_NAME%" "%SOURCE_DIR%"\r\n\r\n:: Сообщение о завершении операции\r\necho Архив успешно создан!"
 Point(FString)
 link(onFString,904231:doCharset,[])
}
Add(Label,7869497,210,77)
{
 Width=380
 Height=40
 Align=2
 Caption=""
 AutosizeAtStart=1
}
Add(Button,329755,168,140)
{
 Left=20
 Top=10
 Width=70
 Height=25
 Caption="1"
 link(onClick,12737990:doString,[])
}
Add(Charset,3953454,497,147)
{
 link(onCharset,7517007:doAdd,[])
}
Add(HubEx,10423991,476,147)
{
 link(onEvent,3953454:doCharset,[])
}
Add(Charset,904231,273,140)
{
 Type=1
 link(onCharset,5465620:doConvert,[])
}

Add(MainForm,1006912,210,98)
{
 Width=637
 Height=654
}
Add(Memo,10575623,560,168)
{
 Left=125
 Top=170
 Width=415
 Height=230
 Color=-16777193
 Font=[MS Sans Serif,8,1,65280,1]
 ScrollBars=2
 ReadOnly=0
}
Add(WinExec,14321779,427,154)
{
 FileName=""C:\\Program Files\\WinRAR\\rar.exe""
 Mode=0
 Point(doConsoleExec)
 Point(doConsoleInput)
 Point(onConsoleResult)
 Point(onConsoleError)
 Point(onConsoleTerminate)
 link(onConsoleResult,6708017:doWork2,[])
 link(onConsoleError,6708017:doWork3,[(480,181)])
}
Add(Button,329755,245,168)
{
 Left=45
 Top=100
 Width=70
 Height=25
 Caption="1"
 link(onClick,13554666:doString,[])
}
Add(Charset,11302287,497,168)
{
 link(onCharset,10575623:doAdd,[])
}
Add(FormatStr,12737990,371,168)
{
 DataCount=3
 Mask="a -r -m5 -hp"%1" "%2" "%3""
 Point(FString)
 link(onFString,14321779:doConsoleExec,[])
 link(Str1,12194363:Text,[])
 link(Str3,15447791:Text,[])
}
Add(VisualStrings,12194363,371,77)
{
 Lines=#4:1234|
 Width=53
}
Add(VisualStrings,15447791,385,105)
{
 Lines=#8:c:\\тест|
 Width=95
}
Add(HubEx,6708017,476,168)
{
 link(onEvent,11302287:doCharset,[])
}
Add(Time,16277997,294,112)
{
 Format="D-M-Y"
}
Add(FormatStr,13554666,294,168)
{
 DataCount=1
 Mask="D:\\Backup\\MyFolder_%1.rar"
 link(onFString,12737990:doString,[])
 link(Str1,16277997:FormatTime,[])
}