Add(MainForm,2953706,21,105) { Width=360 } Add(Button,5761700,189,238) { Left=60 Top=80 Width=105 Caption="Upload!" link(onClick,10245362:doLoadString,[]) } Add(Label,9811927,21,231) { Left=5 Top=50 Width=49 Height=17 Caption="Filename:" } Add(Edit,3529944,273,168) { Left=55 Top=45 Width=280 Text="testfile.txt" } Add(HTTPClient,10245362,259,238) { Method=1 FileField="userfile" Point(UploadFile) link(URL,15065117:Text,[]) link(onFinish,12695097:doText,[]) link(UploadFile,3529944:Text,[]) AddHint(57,48,44,13,Method) AddHint(38,73,48,13,FileField) } Add(Label,2078934,21,175) { Left=20 Top=10 Width=29 Height=17 Caption="URL:" } Add(Edit,15065117,259,112) { Left=55 Top=5 Width=260 Text="localhost/upload.php" } Add(Memo,12695097,427,224) { Left=10 Top=110 Width=325 Height=150 }