Add(MainForm,11153267,315,280)
{
Width=629
Height=486
}
Add(Button,9542592,315,406)
{
Left=525
Top=10
Caption="Select..."
link(onClick,16763806:doExecute,[])
}
Add(HTTP_FileUpload,3024452,469,525)
{
Name="filename"
link(onBuild,8204047:doEvent1,[])
link(FileName,7614253:Text,[])
link(URL,15204020:Text,[])
AddHint(67,15,54,13,Name)
}
Add(Hub,8204047,623,525)
{
OutCount=4
link(onEvent1,15429759:doClose,[(674,531)(674,508)(825,508)(825,545)])
link(onEvent2,3095139:doIPByHost,[])
link(onEvent3,15429759:doSend,[(674,545)(674,581)(825,581)(825,552)])
link(onEvent4,7208556:doAdd,[(658,552)(658,664)])
}
Add(TCP_Client,15429759,875,532)
{
Port=80
}
Add(Memo,7208556,742,658)
{
Left=30
Top=150
Width=560
Height=275
ScrollBars=3
}
Add(Edit,7614253,469,406)
{
Left=65
Top=10
Width=450
Text=""
}
Add(Edit,15204020,476,462)
{
Left=320
Top=55
Width=195
Text="/upload.php"
}
Add(Host,3095139,721,525)
{
link(onIPByHost,15429759:doOpen,[])
link(HostName,8741098:Text,[])
}
Add(Label,8524049,315,189)
{
Left=35
Top=60
Width=29
Height=17
Caption="Host:"
}
Add(Edit,8741098,728,427)
{
Left=65
Top=55
Width=195
Text="localhost"
}
Add(Label,3311355,371,189)
{
Left=280
Top=60
Width=32
Height=17
Caption="Page:"
}
Add(Label,558966,315,126)
{
Left=15
Top=15
Width=49
Height=17
Caption="Filename:"
}
Add(Button,11953298,399,525)
{
Left=65
Top=100
Width=125
Height=30
Caption="Upload"
link(onClick,3024452:doBuild,[])
}
Add(ODialog,16763806,385,406)
{
Title="Select file for upload"
FileName=""
link(onExecute,7614253:doText,[])
}
Ответов: 4630
Рейтинг: 749
|
|||
А я схемку сделал Но не пропадать же добру:
|
|||
карма: 26 |
|