www.pudn.com > Indy10_New_Demo.rar > uMain.dfm
object Form1: TForm1
Left = 279
Top = 126
Width = 553
Height = 319
Caption = 'Multipart Form-Data'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 16
Top = 16
Width = 115
Height = 13
Caption = 'File Name at Destination'
end
object Label2: TLabel
Left = 16
Top = 112
Width = 55
Height = 13
Caption = 'MIME Type'
end
object Label3: TLabel
Left = 16
Top = 64
Width = 85
Height = 13
Caption = 'Destination Folder'
end
object Label4: TLabel
Left = 16
Top = 160
Width = 16
Height = 13
Caption = 'File'
end
object Label5: TLabel
Left = 16
Top = 208
Width = 22
Height = 13
Caption = 'Host'
end
object edtPersonName: TEdit
Left = 16
Top = 32
Width = 233
Height = 21
TabOrder = 0
Text = 'Shiv Kumar'
end
object edtMIMEType: TEdit
Left = 16
Top = 128
Width = 233
Height = 21
TabOrder = 2
Text = 'application/msword'
end
object edtDescription: TEdit
Left = 16
Top = 80
Width = 233
Height = 21
TabOrder = 1
Text = 'Testing'
end
object edtFile: TEdit
Left = 16
Top = 176
Width = 433
Height = 21
TabOrder = 3
end
object Button1: TButton
Left = 456
Top = 172
Width = 75
Height = 25
Caption = '&Browse...'
TabOrder = 4
OnClick = Button1Click
end
object Button2: TButton
Left = 16
Top = 256
Width = 75
Height = 25
Caption = '&Send File'
TabOrder = 5
OnClick = Button2Click
end
object edtHost: TEdit
Left = 16
Top = 224
Width = 433
Height = 21
TabOrder = 6
Text = 'http://www.matlus.com/scripts/multifileupload.dll/Upload'
end
object IdHTTP1: TIdHTTP
MaxLineAction = maException
ReadTimeout = 0
AllowCookies = True
ProxyParams.BasicAuthentication = False
ProxyParams.ProxyPort = 0
Request.ContentLength = -1
Request.ContentRangeEnd = 0
Request.ContentRangeStart = 0
Request.ContentType = 'text/html'
Request.Accept = 'text/html, */*'
Request.BasicAuthentication = False
Request.UserAgent = 'Mozilla/3.0 (compatible; Indy Library)'
HTTPOptions = [hoForceEncodeParams]
Left = 288
Top = 16
end
object OpenDialog1: TOpenDialog
Left = 320
Top = 16
end
end