home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi Anthology
/
aDELPHI.iso
/
Runimage
/
Delphi50
/
Bin
/
sqlb.dll
/
0
/
RCDATA
/
TSQLENTRYFORM
/
TSQLENTRYFORM.txt
Wrap
Text File
|
1999-08-11
|
11KB
|
345 lines
object SQLEntryForm: TSQLEntryForm
Left = 153
Top = 215
Width = 545
Height = 236
Caption = 'SQL Query Text Entry'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Default'
Font.Style = []
KeyPreview = True
Menu = MainMenu1
OldCreateOrder = True
OnCreate = FormCreate
OnKeyDown = FormKeyDown
PixelsPerInch = 96
TextHeight = 13
object SQLText: TMemo
Left = 0
Top = 26
Width = 537
Height = 164
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Default'
Font.Style = []
Lines.Strings = (
'')
ParentFont = False
ScrollBars = ssVertical
TabOrder = 0
OnKeyDown = FormKeyDown
end
object basicbuttonbar: TToolBar
Left = 0
Top = 0
Width = 537
Height = 26
AutoSize = True
Images = ImageList1
Indent = 4
TabOrder = 1
object tbbFileNew: TSpeedButton
Left = 4
Top = 2
Width = 21
Height = 22
Hint = 'Create a new query'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000FFFFFF000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF000000000000FFFF00FF000000FF00FF00FFFF000000666600888888888888
88888888888888888888888AAAAAAAAAAA88888A000000000A88888A00000000
0A88888A000000000A88888A000000000A88888A000000000A88888A00000000
0A88888A000000000A88888A000000000A88888A000000AAAA88888A000000A0
A888888A000000AA8888888AAAAAAAA888888888888888888888}
ParentShowHint = False
ShowHint = True
OnClick = tbbFileNewClick
end
object tbbOpen: TSpeedButton
Left = 25
Top = 2
Width = 20
Height = 22
Hint = 'Open an existing SQL Query'
Flat = True
Glyph.Data = {
36010000424D3601000000000000760000002800000011000000100000000100
040000000000C000000000000000000000001000000010000000FFFFFF000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF000000000000FFFF00FF000000FF00FF00FFFF000000666600888888888888
8888800000008888888888888888800000008AAAAAAAAAAA8888800000008AA3
33333333A888800000008ABA333333333A88800000008A0B0333333333A88000
00008AB0BA333333333A800000008A0B0BAAAAAAAAAAA00000008AB0B0B0B0BA
8888800000008A0B0B0B0B0A8888800000008AB0BAAAAAAA88888000000088AA
A88888888AAA8000000088888888888888AA80000000888888888A888A8A8000
00008888888888AAA88880000000888888888888888880000000}
ParentShowHint = False
ShowHint = True
OnClick = tbbOpenClick
end
object tbbFileSave: TSpeedButton
Left = 45
Top = 2
Width = 20
Height = 22
Hint = 'Save the current query'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000FFFFFF000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF000000000000FFFF00FF000000FF00FF00FFFF000000666600888888888888
888888AAAAAAAAAAAAA88A33AAAAAA88A3A88A33AAAAAA88A3A88A33AAAAAA88
A3A88A33AAAAAAAAA3A88A333333333333A88A33AAAAAAAA33A88A3A88888888
A3A88A3A88888888A3A88A3A88888888A3A88A3A88888888A3A88A3A88888888
AAA88A3A88888888A8A88AAAAAAAAAAAAAA88888888888888888}
ParentShowHint = False
ShowHint = True
OnClick = tbbFileSaveClick
end
object ToolButton1: TToolButton
Left = 65
Top = 2
Width = 8
Caption = 'ToolButton1'
ImageIndex = 0
Style = tbsDivider
end
object tbbCut: TSpeedButton
Left = 73
Top = 2
Width = 19
Height = 22
Hint = 'Cut to Clipboard'
Flat = True
Glyph.Data = {
36010000424D3601000000000000760000002800000011000000100000000100
040000000000C000000000000000000000001000000010000000FFFFFF000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF000000000000FFFF00FF000000FF00FF00FFFF000000666600888888888888
8888800000008888844888888888800000008888488488448888800000008888
4884848848888000000088884884848848888000000088888444848848888000
000088888884844488888000000088888884A48888888000000088888888A888
8888800000008888888AAA888888800000008888888A8A888888800000008888
88AA8AA8888880000000888888A888A8888880000000888888A888A888888000
0000888888A888A8888880000000888888888888888880000000}
ParentShowHint = False
ShowHint = True
OnClick = tbbCutClick
end
object tbbCopy: TSpeedButton
Left = 92
Top = 2
Width = 20
Height = 22
Hint = 'Copy to Clipboard'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000FFFFFF000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF000000000000FFFF00FF000000FF00FF00FFFF000000666600888888888888
8888888888888888888888888884444444448888888400000004888888840AAA
AA048AAAAAA4000000048A0000040AAAAA048A0AAAA4000000048A0000040AA0
44448A0AAAA4000040488A000004000044888A0AA0A4444448888A0000A0A888
88888A0000AA888888888AAAAAA8888888888888888888888888}
ParentShowHint = False
ShowHint = True
OnClick = tbbCopyClick
end
object tbbPaste: TSpeedButton
Left = 112
Top = 2
Width = 21
Height = 22
Hint = 'Paste from Clipboard'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000FFFFFF000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF000000000000FFFF00FF000000FF00FF00FFFF000000666600888888888888
888888888844444444448AAAAA4000000004A7373740AAAAAA04A37373400000
0004A7373740AAA04444A373734000004048A737374000004488A37373444444
4A88A737373737373A88A30AAAAAAAA77A88A77A888888A73A88A373ABAABA73
7A888AAAAABBAAAAA88888888AAAA88888888888888888888888}
ParentShowHint = False
ShowHint = True
OnClick = tbbPasteClick
end
object ToolButton2: TToolButton
Left = 133
Top = 2
Width = 6
Caption = 'ToolButton2'
ImageIndex = 1
Style = tbsDivider
end
object tbbSQL: TSpeedButton
Left = 139
Top = 2
Width = 20
Height = 22
Hint = 'Read edited SQL text into graphical editor'
Flat = True
Glyph.Data = {
4E010000424D4E01000000000000760000002800000012000000120000000100
040000000000D800000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEEEEEEEE
EEEEEE000000E0000000000000000E000000E0FFF0FFFFF0FFFF0E000000E0FF
F0FFFFF0FFFF0E000000E0F4F0F444F0F44F0E000000E0FFF8FFFFF8FFFF0E00
0000E0F991FF9998999F0E000000E0FFF1F9F9F89FFF0E000000E0FF98F9FF98
9FFF0E000000E0F9F8F9FF989FFF0E000000E0F191FF99F89FFF0E000000E0FF
F8FFFFF8FFFF0E000000E0F4F0F444F0F44F0E000000E0FFF0FFFFF0FFFF0E00
0000E0000000000000000E000000E0666666666666660E000000E00000000000
00000E000000EEEEEEEEEEEEEEEEEE000000}
ParentShowHint = False
ShowHint = True
OnClick = tbbSQLClick
end
object tbbRun: TSpeedButton
Left = 159
Top = 2
Width = 22
Height = 22
Hint = 'Execute Query'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEE0EEEEEE
EEEEEEEEE70EEEEEEEEEEEEEEE00EEEEEEEEEEEEEE0B0EEEEEEEEEEE0000B0EE
EEEEEEEE0BBBBB0EEEEEEEEEE0FB0000EEEEEEEEE0BBB0EEEEEEEE00000BFB0E
EEEEEE0FBBBFBBB0EEEEEEE0FBFB00000EEEEEE0BFBFB0EEEEEEEEEE0BFBFB0E
EEEEEEEE0FFFFFF0EEEEEEEEE0FBFFBF0EEEEEEEE000000000EE}
ParentShowHint = False
ShowHint = True
OnClick = tbbRunClick
end
object ToolButton3: TToolButton
Left = 181
Top = 2
Width = 6
Caption = 'ToolButton3'
ImageIndex = 2
Style = tbsDivider
end
object Label1: TLabel
Left = 187
Top = 2
Width = 49
Height = 22
Alignment = taCenter
Caption = '&Database '
FocusControl = comboDatabase
Layout = tlCenter
end
object ToolButton4: TToolButton
Left = 236
Top = 2
Width = 8
Caption = 'ToolButton4'
ImageIndex = 3
Style = tbsSeparator
end
object comboDatabase: TComboBox
Left = 244
Top = 2
Width = 126
Height = 21
Hint = 'Select a Database'
ItemHeight = 13
Sorted = True
TabOrder = 0
OnClick = comboDatabaseClick
OnEnter = comboDatabaseEnter
OnExit = comboDatabaseExit
OnKeyPress = comboDatabaseKeyPress
end
end
object MainMenu1: TMainMenu
Left = 479
Top = 39
object File1: TMenuItem
Caption = '&File'
object New1: TMenuItem
Caption = '&New'
ShortCut = 16462
OnClick = New1Click
end
object Open1: TMenuItem
Caption = '&Import from File...'
ShortCut = 16457
OnClick = Open1Click
end
object Save1: TMenuItem
Caption = '&Export to File...'
ShortCut = 16453
OnClick = Save1Click
end
end
object Edit1: TMenuItem
Caption = '&Edit'
object Undo1: TMenuItem
Caption = '&Undo'
ShortCut = 16474
OnClick = Undo1Click
end
object N3: TMenuItem
Caption = '-'
end
object Cut1: TMenuItem
Caption = 'Cu&t'
ShortCut = 16472
OnClick = Cut1Click
end
object Copy1: TMenuItem
Caption = '&Copy'
ShortCut = 16451
OnClick = Copy1Click
end
object Paste1: TMenuItem
Caption = '&Paste'
ShortCut = 16470
OnClick = Paste1Click
end
end
object mnuQuery: TMenuItem
Caption = '&Query'
object RnQuery1: TMenuItem
Caption = '&Run Query'
ShortCut = 120
OnClick = RnQuery1Click
end
object ShowSQL1: TMenuItem
Caption = '&Show as Graphical'
ShortCut = 118
OnClick = ShowSQL1Click
end
end
object Help1: TMenuItem
Caption = '&Help'
object Contents1: TMenuItem
Caption = '&Contents'
ShortCut = 112
OnClick = Contents1Click
end
end
end
object ImageList1: TImageList
Left = 199
Top = 59
end
end