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
|
object MainForm: TMainForm
Left = 370
Top = 286
AlphaBlend = True
AlphaBlendValue = 200
BorderIcons = []
BorderStyle = bsNone
ClientHeight = 169
ClientWidth = 181
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = False
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 96
TextHeight = 13
object PopupMenu: TTntPopupMenu
AutoHotkeys = maManual
OwnerDraw = True
OnPopup = PopupMenuPopup
Left = 110
Top = 8
object MySQLAdministratorMI: TTntMenuItem
Caption = 'MySQL Administrator'
ImageIndex = 0
OnClick = MySQLAdministratorMIClick
OnDrawItem = DrawItem
OnMeasureItem = MeasureItem
end
object MySQLQueryBrowserMI: TTntMenuItem
Caption = 'MySQL Query Browser'
ImageIndex = 1
OnClick = MySQLQueryBrowserMIClick
OnDrawItem = DrawItem
OnMeasureItem = MeasureItem
end
object N2: TTntMenuItem
Caption = '-'
end
object ActionsMI: TTntMenuItem
Caption = 'Actions'
OnDrawItem = DrawItem
OnMeasureItem = MeasureItem
object ManageInstancesMI: TTntMenuItem
Caption = 'Manage MySQL Instances'
OnClick = ManageInstancesMIClick
end
end
object MontorOptions1: TTntMenuItem
Caption = 'Monitor Options'
OnDrawItem = DrawItem
OnMeasureItem = MeasureItem
object DisplayCPULoadMI: TTntMenuItem
Caption = 'Display CPU Load'
Checked = True
OnClick = DisplayCPULoadMIClick
OnDrawItem = DrawSubMenuCheckItem
OnMeasureItem = MeasureSubMenuCheckItem
end
object StartMonitorAutomaticallyMI: TTntMenuItem
Caption = 'Launch Monitor After Login'
OnClick = StartMonitorAutomaticallyMIClick
OnDrawItem = DrawSubMenuCheckItem
OnMeasureItem = MeasureSubMenuCheckItem
end
object OnlyScanServicesStartingWithmysqlMI: TTntMenuItem
Caption = 'Only Scan Services Starting With "mysql"'
Checked = True
OnClick = OnlyScanServicesStartingWithmysqlMIClick
OnDrawItem = DrawSubMenuCheckItem
OnMeasureItem = MeasureSubMenuCheckItem
end
object ScanIntervallMI: TTntMenuItem
Caption = 'Scan Interval'
OnDrawItem = DrawSubMenuItem
OnMeasureItem = MeasureSubMenuCheckItem
object N1Second1: TTntMenuItem
Tag = 1
Caption = '1 Second'
OnClick = N1Second1Click
OnDrawItem = DrawSubMenuCheckItem
OnMeasureItem = MeasureSubMenuCheckItem
end
object N2Seconds1: TTntMenuItem
Tag = 2
Caption = '2 Seconds'
Checked = True
OnClick = N1Second1Click
OnDrawItem = DrawSubMenuCheckItem
OnMeasureItem = MeasureSubMenuCheckItem
end
object N5Seconds1: TTntMenuItem
Tag = 5
Caption = '5 Seconds'
OnClick = N1Second1Click
OnDrawItem = DrawSubMenuCheckItem
OnMeasureItem = MeasureSubMenuCheckItem
end
object N10Sec1: TTntMenuItem
Tag = 10
Caption = '10 Seconds'
OnClick = N1Second1Click
OnDrawItem = DrawSubMenuCheckItem
OnMeasureItem = MeasureSubMenuCheckItem
end
object N30Sec1: TTntMenuItem
Tag = 30
Caption = '30 Seconds'
OnClick = N1Second1Click
OnDrawItem = DrawSubMenuCheckItem
OnMeasureItem = MeasureSubMenuCheckItem
end
object N1Minute1: TTntMenuItem
Tag = 60
Caption = '1 Minute'
OnClick = N1Second1Click
OnDrawItem = DrawSubMenuCheckItem
OnMeasureItem = MeasureSubMenuCheckItem
end
end
end
object N1: TTntMenuItem
Caption = '-'
OnMeasureItem = MeasureItem
end
object CloseMonitorMI: TTntMenuItem
Caption = 'Close Monitor'
OnClick = CloseMonitorMIClick
OnDrawItem = CloseMonitorMIDrawItem
OnMeasureItem = MeasureItem
end
end
object Timer: TTimer
Enabled = False
OnTimer = TimerTimer
Left = 142
Top = 8
end
end
|
