-
Notifications
You must be signed in to change notification settings - Fork 6
/
Copy pathDHCPLogsUnit.dfm
172 lines (172 loc) · 3.81 KB
/
DHCPLogsUnit.dfm
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
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
object DHCPLogsForm: TDHCPLogsForm
Left = 0
Top = 63
Caption = 'DHCP Logs'
ClientHeight = 547
ClientWidth = 651
Color = clBtnFace
OldCreateOrder = False
OnShow = UniFormShow
MonitoredKeys.Keys = <>
RTL = False
PixelsPerInch = 96
TextHeight = 13
object UniDBGrid1: TUniDBGrid
Left = 17
Top = 95
Width = 616
Height = 387
Hint = ''
DataSource = UniMainModule.DataSource5
Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
WebOptions.LoadMaskMsg = 'Please wait...'
HeaderTitleAlign = taLeftJustify
StripeRows = False
TabOrder = 0
Columns = <
item
FieldName = 'time'
Title.Caption = 'Time'
Width = 120
Visible = True
Expanded = False
end
item
FieldName = 'ip'
Title.Caption = 'IP'
Width = 120
Visible = True
Expanded = False
end
item
FieldName = 'mac'
Title.Caption = 'MAC'
Width = 120
Visible = True
Expanded = False
end
item
FieldName = 'dhcpservername'
Title.Caption = 'DHCP Server Name'
Width = 100
Visible = True
Expanded = False
end
item
FieldName = 'kind'
Title.Caption = 'Operation'
Width = 100
Visible = True
Expanded = False
end>
end
object UniDBNavigator1: TUniDBNavigator
Left = 377
Top = 50
Width = 256
Height = 25
Hint = ''
DataSource = UniMainModule.DataSource5
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbDelete]
ConfirmDelete = True
TabOrder = 1
end
object UniButton1: TUniButton
Left = 377
Top = 19
Width = 145
Height = 25
Hint = ''
Caption = 'Show DHCP Logs'
TabOrder = 2
OnClick = UniButton1Click
end
object UniButton2: TUniButton
Left = 558
Top = 16
Width = 75
Height = 25
Hint = ''
Caption = 'Close'
TabOrder = 3
OnClick = UniButton2Click
end
object UniDateTimePicker1: TUniDateTimePicker
Left = 136
Top = 20
Width = 120
Height = 21
Hint = ''
DateTime = 41047.000000000000000000
DateFormat = 'yyyy-MM-dd'
TimeFormat = 'HH:mm:ss'
Kind = tUniDate
FirstDayOfWeek = dowLocaleDefault
TabOrder = 4
ParentColor = False
Color = clWhite
end
object UniLabel2: TUniLabel
Left = 22
Top = 28
Width = 52
Height = 13
Hint = ''
Caption = 'Begin Date'
TabOrder = 5
end
object UniLabel1: TUniLabel
Left = 22
Top = 64
Width = 44
Height = 13
Hint = ''
Caption = 'End Date'
TabOrder = 6
end
object UniDateTimePicker2: TUniDateTimePicker
Left = 136
Top = 56
Width = 120
Height = 21
Hint = ''
DateTime = 41047.000000000000000000
DateFormat = 'yyyy-MM-dd'
TimeFormat = 'HH:mm:ss'
Kind = tUniDate
FirstDayOfWeek = dowLocaleDefault
TabOrder = 7
ParentColor = False
Color = clWhite
end
object UniButton3: TUniButton
Left = 480
Top = 504
Width = 153
Height = 25
Hint = ''
Caption = 'Yesterday Logs to Text File'
TabOrder = 8
OnClick = UniButton3Click
end
object UniButton5: TUniButton
Left = 22
Top = 504
Width = 187
Height = 25
Hint = ''
Caption = '30 Days Logs to Text File'
TabOrder = 9
OnClick = UniButton5Click
end
object UniButton4: TUniButton
Left = 264
Top = 504
Width = 153
Height = 25
Hint = ''
Caption = 'Export Report to Text File'
TabOrder = 10
OnClick = UniButton4Click
end
end