-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathServerModule.dfm
More file actions
58 lines (54 loc) · 2 KB
/
ServerModule.dfm
File metadata and controls
58 lines (54 loc) · 2 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
object UniServerModule: TUniServerModule
OldCreateOrder = False
FilesFolder = 'files\'
TempFolder = 'temp\'
Title = 'New Application'
BGColor = 8404992
BGColorLogin = clWhite
CharSet = 'utf-8'
SuppressErrors = []
UnavailableErrMsg = 'Communication Error'
LoadingMessage = 'Loading...'
Bindings = <>
ServerMessages.ExceptionTemplate.Strings = (
'<html>'
'<body bgcolor="#dfe8f6">'
'<p style="text-align:center;color:#A05050">An Exception has occu' +
'red in application:</p>'
'<p style="text-align:center;color:#0000A0">[###message###]</p>'
'<p style="text-align:center;color:#A05050"><a href="[###url###]"' +
'>Restart application</a></p>'
'</body>'
'</html>')
ServerMessages.InvalidSessionTemplate.Strings = (
'<html>'
'<body bgcolor="#dfe8f6">'
'<p style="text-align:center;color:#0000A0">[###message###]</p>'
'<p style="text-align:center;color:#A05050"><a href="[###url###]"' +
'>Restart application</a></p>'
'</body>'
'</html>')
ServerMessages.TerminateTemplate.Strings = (
'<html>'
'<body bgcolor="#dfe8f6">'
'<p style="text-align:center;color:#0000A0">[###message###]</p>'
'<p style="text-align:center;color:#A05050"><a href="[###url###]"' +
'>Restart application</a></p>'
'</body>'
'</html>')
ServerMessages.InvalidSessionMessage = 'Invalid session or session Timeout.'
ServerMessages.TerminateMessage = 'Web session terminated.'
Compression.MinTextSize = 512
SSL.SSLOptions.RootCertFile = 'root.pem'
SSL.SSLOptions.CertFile = 'cert.pem'
SSL.SSLOptions.KeyFile = 'key.pem'
SSL.SSLOptions.Method = sslvTLSv1_1
SSL.SSLOptions.SSLVersions = [sslvTLSv1_1]
SSL.SSLOptions.Mode = sslmUnassigned
SSL.SSLOptions.VerifyMode = []
SSL.SSLOptions.VerifyDepth = 0
ConnectionFailureRecovery.ErrorMessage = 'Connection Error'
ConnectionFailureRecovery.RetryMessage = 'Retrying...'
Height = 150
Width = 215
end