Вверх ↑
Ответов: 181
Рейтинг: 14
#1: 2022-07-10 15:00:54 ЛС | профиль | цитата
А создать файл можно на ftp?
Add(MainForm,8185650,126,168)
{
Width=522
Height=220
Point(onClose)
link(onClose,4379778:doClose,[(175,195)(175,132)])
}
Add(FTP_Client,4379778,210,119)
{
@Color=11788021
Name="test1"
Host="ftp.rasla.ru"
Port=0
link(onConnect,7129149:doDirAction,[])
}
Add(Button,12335799,126,119)
{
@Hint=#4:Open|
Left=40
Top=15
Width=315
Height=60
Font=[MS Sans Serif,8,1,0,1]
TabOrder=-1
Caption="Проверить наличие файла на FTP"
link(onClick,4379778:doOpen,[])
}
Add(FTPC_FileSearch,15541029,329,119)
{
@Color=11788021
Mask="WarHammer40000.rar"
FTP_Client="test1"
Point(onNotFound)
link(onSearch,4947320:doData,[])
link(onNotFound,11448921:doData,[(419,139)(419,132)])
}
Add(FTPC_DirAction,7129149,266,119)
{
@Color=11788021
Directory="/Books"
FTP_Client="test1"
link(onDirAction,15541029:doSearch,[])
}
Add(Label,5963048,595,189)
{
Left=388
Top=30
Width=64
Height=30
Font=[MS Sans Serif,18,1,0,1]
Name="нз 13"
Caption="---"
AutoSize=1
Alignment=2
Point(doFont)
link(Text,1036234:Value,[])
}
Add(Memory,1036234,595,119)
{
Default=String(НЕТ)
link(onData,5963048:doText,[(639,125)(639,160)(583,160)(583,195)])
}
Add(DoData,4947320,406,119)
{
Data=String(ДА)
link(onEventData,1036234:doValue,[])
}
Add(DoData,11448921,476,126)
{
Data=String(НЕТ)
link(onEventData,1036234:doClear,[])
}
Add(StrList,14190204,210,189)
{
Strings=#6:qwqwqw|5:qwqwq|7:wfdsdfs|4:sffs|5:53535|
Point(doSave)
}
Add(FTPC_ReadWrite,2972772,210,252)
{
@Color=11788021
Mode=1
RemoteName="123.txt"
FTP_Client="test1"
Point(onError)
link(onFileOperation,13987831:doWork2,[])
link(LocalName,14190204:Text,[])
link(onError,13987831:doWork3,[(263,265)])
}
Add(Button,15374699,126,252)
{
@Hint=#4:Open|
Left=40
Top=100
Width=315
Height=60
Font=[MS Sans Serif,8,1,0,1]
TabOrder=-1
Caption="Создать"
link(onClick,2972772:doFileOperation,[])
}
Add(Label,2025956,336,252)
{
Left=388
Top=115
Width=64
Height=30
Font=[MS Sans Serif,18,1,0,1]
Name="нз 13"
Caption="---"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(HubEx,13987831,259,252)
{
link(onEvent,688590:doData,[])
}
Add(DoData,688590,287,252)
{
Data=String(ОК)
link(onEventData,2025956:doText,[])
}

карма: 0

0
Редактировалось 2 раз(а), последний 2022-07-10 15:20:42