Вверх ↑
Ответов: 48
Рейтинг: 4
#1: 2013-07-02 14:45:12 ЛС | профиль | цитата
nesco
убрал кракозябры


Add(WinFTP,2407830,490,195)
{
Directory="."
RemoteName="list.txt"
Point(onConnect)
Point(onFindFile)
Point(FoundIsDirectory)
Point(FoundFileName)
Point(FoundFileSize)
Point(doDirectory)
Point(onWrite)
link(onError,2183670:MassageErr,[(534,201)(534,125)])
link(onRead,12995982:doConvert,[(548,208)(548,209)])
link(LocalName,1556754:Var2,[(496,165)(495,165)])
link(onConnect,2407830:doReadFile,[(526,215)(526,239)(482,239)(482,215)])
}
Add(Button,11189587,405,160)
{
Left=265
Top=5
Width=115
Height=35
Caption="Connection"
link(onClick,2407830:doOpen,[(463,166)(463,201)])
}
Add(Label,6675800,588,119)
{
Left=10
Top=245
Width=369
Height=17
Caption="Error code"
}
Add(StrCat,11202494,554,308)
{
Str2="_end"
link(onStrCat,9017750:doAdd,[(622,314)(622,188)])
link(Str1,10403565:Text,[(560,296)(538,296)])
}
Add(Convertor,12995982,574,203)
{
Mode=11
link(onResult,9017750:doText,[])
link(Data,1556754:Var3,[(580,159)])
}
Add(MemoryStream,3763216,489,104)
{
}
Add(GetDataEx,1556754,489,154)
{
link(Data,3763216:Stream,[])
}
Add(Memo,9017750,644,182)
{
Left=10
Top=60
Width=365
Height=95
link(onChange,10403565:doText,[(693,188)(693,241)(521,241)(521,258)])
link(Str,11202494:Result,[(650,170)(616,170)(616,348)(560,348)])
}
Add(Edit,10403565,532,252)
{
Left=10
Top=10
Width=245
link(onEnter,11202494:doStrCat,[(576,265)(576,289)(542,289)(542,314)])
}
Add(Button,9352866,644,315)
{
Left=10
Top=35
Width=85
Caption="Write"
link(onClick,8406004:doConvert,[(692,321)(692,272)])
}
Add(Convertor,8406004,707,266)
{
Mode=12
link(onResult,2407830:doWriteFile,[(746,272)(746,253)(478,253)(478,222)])
link(Data,9017750:Text,[(713,246)(650,246)])
}
Add(MultiElementEx,2183670,546,119)
{
@Hint=#12:MessageError|
link(Error,6675800:doText,[])
}
BEGIN_SDK
Add(EditMultiEx,4470868,21,21)
{
WorkCount=#10:MassageErr|
EventCount=#12:Error=Ошибка|
Width=181
Height=144
link(MassageErr,9579324:doRead,[(31,27)(31,111)])
}
Add(StrList,6494328,42,35)
{
Strings=#0:|23:Нет доступа к Интернэту|101:Ошибка создания FTP-сессии%13%10Проверьте правильность ввода параметров%13%10Host, UserName, Password|22:Ошибка доступа к папке|24:Ошибка файловой операции|23:Ошибка доступа к файлу |0:|1: |
}
Add(ArrayRW,9579324,56,105)
{
link(onRead,1614930:doReplace,[])
link(Array,6494328:Array,[])
}
Add(Replace,1614930,105,105)
{
SubStr="%13%10"
DestStr="
"
link(onReplace,4470868:Error,[(169,111)(169,27)])
}
END_SDK


карма: 1

0
файлы: 1code_31391.txt [2.6KB] [260]