-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathHttpGetUnit.dfm
More file actions
147 lines (147 loc) · 3.45 KB
/
HttpGetUnit.dfm
File metadata and controls
147 lines (147 loc) · 3.45 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
object HttpGetForm: THttpGetForm
Left = 895
Top = 662
Width = 406
Height = 164
Caption = 'File download 4'
Color = clBtnFace
Constraints.MaxHeight = 1150
Constraints.MaxWidth = 1920
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poOwnerFormCenter
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object SpTBXTitleBar1: TSpTBXTitleBar
Left = 0
Top = 0
Width = 398
Height = 137
Caption = 'File download'
Active = False
Options.Minimize = False
Options.Maximize = False
object pnlMain: TSpTBXPanel
Left = 0
Top = 22
Width = 398
Height = 115
Caption = 'pnlMain'
Align = alClient
TabOrder = 1
Borders = False
TBXStyleBackground = True
DesignSize = (
398
115)
object Label1: TSpTBXLabel
Left = 16
Top = 8
Width = 33
Height = 13
Caption = 'Status:'
end
object StatusLabel: TSpTBXLabel
Left = 112
Top = 8
Width = 6
Height = 13
Caption = '?'
end
object Label2: TSpTBXLabel
Left = 16
Top = 24
Width = 47
Height = 13
Caption = 'FileName:'
end
object FileNameLabel: TSpTBXLabel
Left = 112
Top = 24
Width = 6
Height = 13
Caption = '?'
end
object ProgressBar: TSpTBXProgressBar
Left = 16
Top = 48
Width = 367
Height = 28
Caption = '0%'
Anchors = [akLeft, akTop, akRight, akBottom]
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
CaptionGlow = gldBottomRight
CaptionGlowColor = clBlack
Smooth = True
end
object ReceivedLabel: TSpTBXLabel
Left = 16
Top = 78
Width = 72
Height = 13
Caption = 'Received 0 KB'
Anchors = [akLeft, akBottom]
end
object CancelButton: TSpTBXSpeedButton
Left = 208
Top = 81
Width = 175
Height = 26
Caption = 'Cancel download'
Anchors = [akRight, akBottom]
Enabled = False
OnClick = CancelButtonClick
end
end
end
object HttpCli1: THttpCli
LocalAddr = '0.0.0.0'
ProxyPort = '80'
Agent = 'Mozilla/4.0 (compatible; ICS)'
Accept = 'image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, */*'
NoCache = False
ContentTypePost = 'application/x-www-form-urlencoded'
MultiThreaded = False
RequestVer = '1.0'
FollowRelocation = True
LocationChangeMaxCount = 5
ServerAuth = httpAuthNone
ProxyAuth = httpAuthNone
BandwidthLimit = 10000
BandwidthSampling = 1000
Options = []
OnHeaderData = HttpCli1HeaderData
OnDocBegin = HttpCli1DocBegin
OnDocData = HttpCli1DocData
SocksAuthentication = socksNoAuthentication
Left = 120
Top = 120
end
object SevenZip1: TSevenZip
SFXCreate = False
SFXModule = '7z.sfx'
AddOptions = []
ExtractOptions = [ExtractOverwrite]
LZMACompressType = LZMA
LZMACompressStrength = SAVE
LZMAStrength = 0
LPPMDmem = 0
LPPMDsize = 0
NumberOfFiles = -1
VolumeSize = 0
Left = 288
Top = 32
end
end