Вверх ↑
Ответов: 141
Рейтинг: 11
#1: 2013-04-14 15:51:02 ЛС | профиль | цитата
Так, как я понял и что вышло:
URL: /files
Host: muon.rghost.ru
Name: file
И всё же не понимаю что такое VarList
Пока что вот что у меня выходит:
Add(MainForm,9452082,161,301)
{
Width=865
Height=159
}
Add(HTTP_FileUpload,3277775,357,476)
{
URL="/files"
Host="muon.rghost.ru"
Name="file"
Point(VarsValue)
Point(doVarsList)
link(onBuild,5415745:doEvent1,[])
link(FileName,15537032:Text,[])
}
Add(Edit,1471851,560,280)
{
Left=35
Top=15
Width=315
Text="Title of file"
}
Add(Edit,2082879,609,280)
{
Left=35
Top=40
Width=315
Text="user name"
}
Add(Edit,15537032,357,336)
{
Left=35
Top=65
Width=315
Text=""
}
Add(Button,7306664,245,336)
{
Left=355
Top=65
Width=25
Caption="..."
link(onClick,8510228:doExecute,[])
}
Add(Button,12327116,182,476)
{
Left=140
Top=95
Width=125
Height=25
Caption="Send"
link(onClick,5988017:doEvent1,[])
}
Add(ODialog,8510228,301,336)
{
link(onExecute,15537032:doText,[])
}
Add(EventFromData,1260066,413,336)
{
link(onEvent,9081596:doCompare,[])
}
Add(If_else,9081596,462,336)
{
Op2=String(id)
link(onTrue,12053862:doData,[])
link(onFalse,6300632:doCompare,[(502,349)(502,391)])
}
Add(DoData,12053862,511,336)
{
Data=Integer(12)
link(onEventData,1224693:doWork2,[])
}
Add(If_else,6300632,511,385)
{
Op2=String(title30ins)
link(onTrue,10512379:doData,[])
link(onFalse,112990:doCompare,[(551,398)(551,440)])
}
Add(HubEx,1224693,651,336)
{
Angle=3
link(onEvent,1260066:doData,[(655,329)(407,329)(407,342)])
}
Add(DoData,10512379,560,385)
{
link(onEventData,12980371:doWork2,[])
link(Data,1471851:Text,[])
}
Add(If_else,112990,560,434)
{
Op2=String(user30ins)
link(onTrue,10419873:doData,[])
}
Add(DoData,10419873,609,434)
{
link(onEventData,12980371:doWork3,[(655,440)])
link(Data,2082879:Text,[])
}
Add(HubEx,12980371,651,385)
{
Angle=3
link(onEvent,1224693:doWork3,[])
}
Add(Memo,12685441,469,399)
{
Left=385
Top=5
Width=460
Height=120
ScrollBars=3
}
Add(Label,1482537,259,245)
{
Left=14
Top=17
Width=20
Height=17
Caption="title"
}
Add(Label,12043141,252,266)
{
Top=42
Width=34
Height=17
Caption="author"
}
Add(Label,4919481,245,287)
{
Left=17
Top=67
Width=17
Height=17
Caption="file"
}
Add(TCP_Client,8329135,574,539)
{
Port=80
link(onRead,1211923:doMessage,[])
}
Add(Hub,5415745,413,476)
{
link(onEvent1,12685441:doText,[(448,482)(448,426)])
link(onEvent2,4030595:doEvent1,[(434,489)(434,545)])
}
Add(Hub,4030595,441,539)
{
link(onEvent1,820334:doHostByIP,[(469,545)(469,524)])
link(onEvent2,8329135:doSend,[(478,552)(478,559)])
}
Add(Message,1211923,630,539)
{
}
Add(Hub,5988017,238,476)
{
link(onEvent1,10541436:doData,[(266,482)(266,510)])
link(onEvent2,3277775:doBuild,[(304,489)(304,482)])
}
Add(StrList,2804538,273,413)
{
Strings=#1:s|
}
Add(DoData,10541436,273,504)
{
link(Data,2804538:Text,[])
}
Add(Host,820334,483,518)
{
link(onIPByHost,8329135:doOpen,[(545,531)(545,545)])
link(HostName,2183037:Value,[])
}
Add(Memory,2183037,490,462)
{
Default=String(muon.rghost.ru)
}
карма: 0

0
файлы: 1code_30820.txt [2.8KB] [426]