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
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
|
object MainForm: TMainForm
Left = 622
Top = 252
Caption = 'MySQL Query Browser'
ClientHeight = 751
ClientWidth = 862
Color = clBtnFace
Constraints.MinHeight = 572
Constraints.MinWidth = 800
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
Menu = MainMenu
OldCreateOrder = False
Scaled = False
OnActivate = TntFormActivate
OnClose = FormClose
OnCloseQuery = TntFormCloseQuery
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
OnKeyUp = TntFormKeyUp
PixelsPerInch = 96
TextHeight = 13
object StatusBar: TTntStatusBar
Left = 0
Top = 732
Width = 862
Height = 19
Panels = <
item
Width = 100
end
item
Style = psOwnerDraw
Width = 50
end
item
Width = 300
end>
OnMouseDown = StatusBarMouseDown
OnDrawPanel = StatusBarDrawPanel
end
object MainMenu: TTntMainMenu
AutoHotkeys = maManual
Left = 662
Top = 26
object FileMI: TTntMenuItem
Caption = '&File'
GroupIndex = 10
object NewInstanceConnectionMI: TTntMenuItem
Caption = '&New Instance Connection ...'
GroupIndex = 11
OnClick = NewInstanceConnectionMIClick
end
object SwitchMI: TTntMenuItem
Caption = 'Switch Connection'
GroupIndex = 11
OnClick = SwitchMIClick
end
object N5: TTntMenuItem
Caption = '-'
GroupIndex = 11
end
object NewResultsetTabMI: TTntMenuItem
Caption = '&New Resultset Tab'
GroupIndex = 11
OnClick = NewResultsetTabMIClick
end
object NewSQLScriptTabMI: TTntMenuItem
Caption = 'Ne&w Script Tab'
GroupIndex = 11
OnClick = NewSQLScriptTabMIClick
end
object OpenQueryMI: TTntMenuItem
Caption = '&Open Query ...'
GroupIndex = 11
OnClick = OpenQueryMIClick
end
object OpenSQLScriptMI: TTntMenuItem
Caption = 'O&pen Script ...'
GroupIndex = 11
OnClick = OpenSQLScriptMIClick
end
object ReopenMI: TTntMenuItem
Caption = 'Reopen'
Enabled = False
GroupIndex = 11
end
object N2: TTntMenuItem
Caption = '-'
GroupIndex = 11
end
object SaveMI: TTntMenuItem
Caption = '&Save'
Enabled = False
GroupIndex = 11
OnClick = SaveMIClick
end
object SaveAsMI: TTntMenuItem
Caption = 'Save &As ...'
Enabled = False
GroupIndex = 11
OnClick = SaveAsMIClick
end
object ExportResultsetMI: TTntMenuItem
Caption = 'E&xport Resultset'
GroupIndex = 12
end
object CloseTabMI: TTntMenuItem
Caption = '&Close Tab'
GroupIndex = 13
OnClick = CloseTabMIClick
end
object N3: TTntMenuItem
Caption = '-'
GroupIndex = 13
end
object ChangeDefaultSchemaMI: TTntMenuItem
Caption = 'Change &Default Schema ...'
GroupIndex = 13
OnClick = ChangeDefaultSchemaMIClick
end
object N4: TTntMenuItem
Caption = '-'
GroupIndex = 13
end
object PageSetupMI: TTntMenuItem
Caption = 'Page Setup ...'
Enabled = False
GroupIndex = 13
end
object PrinttoPDFMI: TTntMenuItem
Caption = 'Print to PDF ...'
Enabled = False
GroupIndex = 13
end
object PrintMI: TTntMenuItem
Caption = 'Print ...'
Enabled = False
GroupIndex = 13
end
object N10: TTntMenuItem
Caption = '-'
GroupIndex = 13
end
object CloseMI: TTntMenuItem
Caption = 'Ex&it'
GroupIndex = 13
OnClick = CloseMIClick
end
end
object Edit1: TTntMenuItem
Caption = '&Edit'
GroupIndex = 20
object Undo1: TTntMenuItem
Action = EditUndo1
end
object Redo1: TTntMenuItem
Action = EditRedo1
end
object N15: TTntMenuItem
Caption = '-'
end
object CutMI: TTntMenuItem
Action = EditCut1
end
object CopyMI: TTntMenuItem
Action = EditCopy1
end
object PasteMI: TTntMenuItem
Action = EditPaste1
end
object SelectAllMI: TTntMenuItem
Action = EditSelectAll1
end
object N1: TTntMenuItem
Caption = '-'
end
object FindMI: TTntMenuItem
Caption = 'Find ...'
OnClick = FindMIClick
end
end
object ViewMenuItem: TTntMenuItem
Caption = '&View'
GroupIndex = 30
end
object ToolsMI: TTntMenuItem
Caption = '&Tools'
GroupIndex = 200
object MySQLAdministratorMI: TTntMenuItem
Caption = 'MySQL Administrator'
OnClick = MySQLAdministratorMIClick
end
object MySQLCommandLineClientMI: TTntMenuItem
Caption = 'MySQL Command Line Client'
OnClick = MySQLCommandLineClientMIClick
end
object N11: TTntMenuItem
Caption = '-'
end
object WindowsCommandLineMI: TTntMenuItem
Caption = 'Windows Command Line'
OnClick = WindowsCommandLineMIClick
end
object N12: TTntMenuItem
Caption = '-'
GroupIndex = 13
end
object RegExTextImporterMI: TTntMenuItem
Caption = 'RegEx Text Importer ...'
GroupIndex = 13
OnClick = RegExTextImporterMIClick
end
object N9: TTntMenuItem
Caption = '-'
GroupIndex = 13
end
object ManageConnectionsMI: TTntMenuItem
Caption = 'Manage Connections ...'
GroupIndex = 13
OnClick = ManageConnectionsMIClick
end
object SavecurrentConnectionMI: TTntMenuItem
Caption = 'Save Current Connection ...'
GroupIndex = 13
OnClick = SavecurrentConnectionMIClick
end
object N14: TTntMenuItem
Caption = '-'
GroupIndex = 13
end
object OptionsMI: TTntMenuItem
Caption = 'Options ...'
GroupIndex = 13
OnClick = OptionsMIClick
end
end
object WindowMI: TTntMenuItem
Caption = '&Window'
GroupIndex = 210
object WindowDummyMI: TTntMenuItem
Caption = '0'
end
end
object HelpMI: TTntMenuItem
Caption = '&Help'
GroupIndex = 210
object LaunchHelpMI: TTntMenuItem
Caption = 'Help'
OnClick = LaunchHelpMIClick
end
object QuickStartGuideMI: TTntMenuItem
Caption = 'Quick Start Guide'
OnClick = QuickStartGuideMIClick
end
object N8: TTntMenuItem
Caption = '-'
end
object OnlineDocsMI: TTntMenuItem
Caption = 'Online Docs'
OnClick = OnlineDocsMIClick
end
object OnlineReferenceCAPIMI: TTntMenuItem
Caption = 'Online Docs - C API'
OnClick = OnlineReferenceCAPIMIClick
end
object OnlineDocsPHPAPIMI: TTntMenuItem
Caption = 'Online Docs - PHP API'
OnClick = OnlineDocsPHPAPIMIClick
end
object N6: TTntMenuItem
Caption = '-'
end
object VisitMySQLcomMI: TTntMenuItem
Caption = 'Launch MySQL.com Site'
OnClick = VisitMySQLcomMIClick
end
object N13: TTntMenuItem
Caption = '-'
end
object ListreportedBugsMI: TTntMenuItem
Caption = 'List Reported Bugs'
OnClick = ListreportedBugsMIClick
end
object ReportBugMI: TTntMenuItem
Caption = 'Report a New Bug to MySQL'
OnClick = ReportBugMIClick
end
object N7: TTntMenuItem
Caption = '-'
end
object AboutMI: TTntMenuItem
Caption = 'About'
OnClick = AboutMIClick
end
end
end
object MainActionManager: TActionManager
OnUpdate = MainActionManagerUpdate
Left = 696
Top = 28
StyleName = 'XP Style'
object EditCut1: TEditCut
Category = 'Edit'
Caption = 'Cu&t'
Hint = 'Cut|Cuts the selection and puts it on the Clipboard'
ImageIndex = 0
ShortCut = 16472
OnExecute = EditCut1Execute
end
object EditCopy1: TEditCopy
Category = 'Edit'
Caption = '&Copy'
Hint = 'Copy|Copies the selection and puts it on the Clipboard'
ImageIndex = 1
ShortCut = 16451
OnExecute = EditCopy1Execute
end
object EditPaste1: TEditPaste
Category = 'Edit'
Caption = '&Paste'
Hint = 'Paste|Inserts Clipboard contents'
ImageIndex = 2
ShortCut = 16470
OnExecute = EditPaste1Execute
end
object EditSelectAll1: TEditSelectAll
Category = 'Edit'
Caption = 'Select &All'
Hint = 'Select All|Selects the entire document'
ShortCut = 16449
OnExecute = EditSelectAll1Execute
end
object EditUndo1: TEditUndo
Category = 'Edit'
Caption = '&Undo'
Hint = 'Undo|Reverts the last action'
ImageIndex = 3
ShortCut = 16474
OnExecute = EditUndo1Execute
end
object EditRedo1: TEditDelete
Category = 'Edit'
Caption = '&Redo'
Hint = 'Redo|Redoes the last undone action'
ImageIndex = 5
ShortCut = 16473
SecondaryShortCuts.Strings = (
'Shift+Ctrl+Z')
OnExecute = EditRedo1Execute
end
end
end
|
