SuperHack

home *** CD-ROM | disk | FTP | other *** search

/ SuperHack / SuperHack CD.bin / CODING / DELPHI / SQLBUILD.ZIP / SQL14_D2.ZIP / SQLBLD00.DFM / SQLBLD00.txt

Wrap

Text File | 1996-09-26 | 35.6 KB | 946 lines

object frmSQLBuilder: TfrmSQLBuilder Left = -1 Top = 1 HelpContext = 2002 BorderStyle = bsDialog Caption = 'SQL Builder' ClientHeight = 415 ClientWidth = 629 Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnPaint = FormPaint OnShow = FormShow PixelsPerInch = 96 TextHeight = 16 object pnlSQLText: TPanel Left = 0 Top = 27 Width = 629 Height = 359 Align = alClient Caption = 'pnlSQLText' TabOrder = 3 Visible = False object Label1: TLabel Left = 248 Top = 8 Width = 100 Height = 16 Caption = 'SQL Text Panel' Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold, fsUnderline] ParentFont = False end object Memo1: TMemo Left = 10 Top = 30 Width = 608 Height = 314 Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [] ParentFont = False ScrollBars = ssBoth TabOrder = 0 end end object pnlResult: TPanel Left = 0 Top = 27 Width = 629 Height = 359 Align = alClient TabOrder = 4 object Label3: TLabel Left = 237 Top = 6 Width = 122 Height = 16 Caption = 'Query Result Panel' Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsBold, fsUnderline] ParentFont = False end object sbSaveResultTable: TSpeedButton Left = 12 Top = 2 Width = 160 Height = 24 Hint = 'Save the result table'#13'to a disk file.' Caption = '&Save Result Table' Enabled = False Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330080 8800333333338888888833333333007077003333333388F83388333333330077 77003333333388FFFF8833333333000000003FFFFFFF88888888000000000000 000088888888888888880EFCCEFE0FFFFFF08F3333338F3333380FECCFEF0FFF FFF08F3333338FFFFFF80EFEFEFE0CCC9CC08F333333888888880FECCFEFE039 99338F333333F8F888F30EFCCEFEF09999938F3333333888888F0FECCCEFE999 99998F3333FFF88888880EFEC000003999338F333888883888F30CCFC0EF0339 99338F33F8F3833888F30CCCC0F0338999338F33F8F83F8888330ECCC0039999 93338FFFF8838888833300000033333333338888883333333333} NumGlyphs = 2 ParentShowHint = False ShowHint = True Spacing = -1 OnClick = sbSaveResultTableClick end object lblRowsFound: TLabel Left = 465 Top = 6 Width = 111 Height = 16 Caption = 'Rows found = 1111' end object DBGrid1: TDBGrid Left = 10 Top = 30 Width = 608 Height = 314 DataSource = DataSource1 Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit] ParentFont = False TabOrder = 0 TitleFont.Color = clBlack TitleFont.Height = -11 TitleFont.Name = 'Arial' TitleFont.Style = [fsBold] end end object pnlBuilder: TPanel Left = 0 Top = 27 Width = 629 Height = 359 Align = alClient TabOrder = 1 object Bevel1: TBevel Left = 1 Top = 178 Width = 627 Height = 4 Align = alTop Style = bsRaised end object ScrollBox1: TScrollBox Left = 1 Top = 1 Width = 627 Height = 177 HelpContext = 2004 Align = alTop BorderStyle = bsNone TabOrder = 1 TabStop = True object lblNoTables: TLabel Left = 187 Top = 72 Width = 220 Height = 29 Caption = 'No tables selected' Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end end object pnlSelectedFields: TPanel Left = 1 Top = 182 Width = 627 Height = 176 Align = alClient BevelOuter = bvLowered Caption = 'pnlSelectedFields' Color = clGray TabOrder = 0 object lblNoFields: TLabel Left = 206 Top = 81 Width = 179 Height = 24 Caption = 'No Fields Selected' Font.Color = clBlack Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object dgSelectedFields: TDrawGrid Left = 1 Top = 1 Width = 625 Height = 174 HelpContext = 2005 Align = alClient ColCount = 1 DefaultColWidth = 110 DefaultRowHeight = 18 DefaultDrawing = False FixedCols = 0 RowCount = 9 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goColMoving] ParentFont = False TabOrder = 3 Visible = False OnColumnMoved = dgSelectedFieldsColumnMoved OnDragDrop = dgSelectedFieldsDragDrop OnDragOver = dgSelectedFieldsDragOver OnDrawCell = dgSelectedFieldsDrawCell OnSelectCell = sgSelectedFieldsSelectCell OnTopLeftChanged = dgSelectedFieldsTopLeftChanged end object ComboGroupField: TComboBox Left = 1 Top = 136 Width = 113 Height = 21 TabStop = False Style = csDropDownList Color = clBtnFace Ctl3D = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentCtl3D = False ParentFont = False TabOrder = 0 Visible = False OnChange = ComboGroupFieldChange OnExit = CurrFieldEditorExit end object comboSortType: TComboBox Left = 1 Top = 77 Width = 113 Height = 21 TabStop = False Style = csDropDownList Color = clBtnFace Ctl3D = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentCtl3D = False ParentFont = False TabOrder = 1 Visible = False OnExit = CurrFieldEditorExit end object comboShowField: TComboBox Left = 1 Top = 58 Width = 113 Height = 21 TabStop = False Style = csDropDownList Color = clBtnFace Ctl3D = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentCtl3D = False ParentFont = False TabOrder = 2 Visible = False OnExit = CurrFieldEditorExit end object EditWhere: TBtnEdit Left = 1 Top = 96 Width = 113 Height = 20 AutoSize = False Color = clBtnFace Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Glyph.Data = { DE000000424DDE00000000000000360000002800000009000000060000000100 180000000000A800000000000000000000000000000000000000007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F00007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F00000000000000007F7F0000000000 00007F7F000000000000007F7F00000000000000007F7F000000000000007F7F 000000000000007F7F00007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F00007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F00} ParentFont = False TabOrder = 4 Visible = False OnBtnClick = EditWhereButtonClick OnExit = CurrFieldEditorExit end object EditOrWhere: TBtnEdit Left = 1 Top = 116 Width = 113 Height = 20 AutoSize = False Color = clBtnFace Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Glyph.Data = { DE000000424DDE00000000000000360000002800000009000000060000000100 180000000000A800000000000000000000000000000000000000007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F00007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F00000000000000007F7F0000000000 00007F7F000000000000007F7F00000000000000007F7F000000000000007F7F 000000000000007F7F00007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F00007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F00} ParentFont = False TabOrder = 5 Visible = False OnBtnClick = EditWhereButtonClick OnExit = CurrFieldEditorExit end object EditGrpHaveOrNew: TBtnEdit Left = 1 Top = 154 Width = 113 Height = 20 AutoSize = False Color = clBtnFace Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Glyph.Data = { DE000000424DDE00000000000000360000002800000009000000060000000100 180000000000A800000000000000000000000000000000000000007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F00007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F80000000000000007F7F0000000000 00007F7F000000000000007F7FFF000000000000007F7F000000000000007F7F 000000000000007F7F00007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F00007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F00} ParentFont = False TabOrder = 6 Visible = False OnBtnClick = EditWhereButtonClick OnExit = CurrFieldEditorExit end end end object pnlButtonBar: TPanel Left = 0 Top = 0 Width = 629 Height = 27 Align = alTop BevelInner = bvLowered BevelOuter = bvNone TabOrder = 0 object sbAddTable: TSpeedButton Left = 107 Top = 1 Width = 27 Height = 25 Hint = 'Add a new table '#13'to the query' Glyph.Data = { 80010000424D8001000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00800000000000 00008888000080FFF0FFFFF0FFF08888000080F4F0F444F0F4F08888000080FF F0FFFFF0FFF08888000080F4F0F444F0F4F08888000080FFF0FFFFF0FFF08888 000080F4F0F444F0F4F08888000080FFF0FFFFF0FFF08888000080F4F0F444F0 F4F08888000080FFF0FFFFF0FFF08888000080000000000000008888000080EE EEEEEEEEEEE088880000800000000000000000880000888888888888880AA088 0000888888888888000AA00000008888888888880AAAAAA00000888888888888 000AA0000000888888888888880AA08800008888888888888800008800008888 8888888888888888000000000000000000000000000000000000000000000000 00000000} ParentShowHint = False ShowHint = True OnClick = sbAddTableClick end object sbRemoveTable: TSpeedButton Left = 134 Top = 1 Width = 25 Height = 25 Hint = 'Remove the selected'#13'table from the query' Glyph.Data = { 80010000424D8001000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00800000000000 00008888000080FFF0FFFFF0FFF08888000080F4F0F444F0F4F08888000080FF F0FFFFF0FFF08888000080F4F0F444F0F4F08888000080FFF0FFFFF0FFF08888 000080F4F0F444F0F4F08888000080FFF0FFFFF0FFF08888000080F4F0F444F0 F4F08888000080FFF0FFFFF0FFF08888000080000000000000008888000080EE EEEEEEEEEEE08888000080000000000000008888000088888888888888888888 0000888888888880000000000000888888888880999999900000888888888880 9999999000008888888888800000000000008888888888888888888800008888 8888888888888888000000000000000000000000000000000000000000000000 00000000} ParentShowHint = False ShowHint = True OnClick = sbRemoveTableClick end object Label2: TLabel Left = 295 Top = 5 Width = 64 Height = 16 Caption = '&Query type' FocusControl = comboQueryType end object sbEditTableJoins: TSpeedButton Left = 159 Top = 1 Width = 25 Height = 25 Hint = 'Edit table joins' Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300033300000 00003777FF377777777707070330FFFFFFF077777F37F3FF3FF707370330F00F 00F077F77F37F773773707370330FFFFFFF077F77F37F3FFFF3707070330F000 0FF077777337F777733730003330FFFFFFF037773337F3FF3FF733033330F00F 0000337FFF37F773777733000330FFFF0FF033777FF7F3FF7F3733007030F08F 0F03337777F7F7737F7330703700FFFF003337773777FFFF7733307333700000 0333377FF37777777FFF33073070333000033377F777FF37777F333077000307 7770333777777F7777773333003300003300333377337777FF77333333333307 7770333333333377777733333333333000033333333333377773} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = sbEditTableJoinsClick end object sbShowSQL: TSpeedButton Left = 237 Top = 1 Width = 25 Height = 25 Hint = 'Show SQL text' GroupIndex = 1 Glyph.Data = { 90010000424D9001000000000000760000002800000020000000100000000100 0400000000000001000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 777777777777777777777FFFF8FFFF8FFFF777777877778777777FFFF8FFFF8C CFF777777877778887777FFFF8FFFFCCFFF777777877788877777CCCC8CCCCCF CCCC78888878888788887CCFC8CFCCCFCCCC78888888888788887FFFC8CFCFCF CCF777788887878788777CCCC8CFFFCFCCF778888887778788777CFFF8CFFFCF CCF778777887778788777CFCC8CFFFCFCCF778888887778788777CCCC8CCCCCF CCF778888888888788777FFFF8FFFF8FFFF777777877778777777FFFF8FFFF8F FFF777777877778777777EEEEEEEEEEEEEE778888888888888877EEEEEEEEEEE EEE7788888888888888777777777777777777777777777777777000000000000 0000000000000000000000000000000000000000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = sbShowSQLClick end object sbShowBuilder: TSpeedButton Left = 212 Top = 1 Width = 25 Height = 25 Hint = 'Show query builder' GroupIndex = 1 Down = True Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555550FF0559 1950555FF75F7557F7F757000FF055591903557775F75557F77570FFFF055559 1933575FF57F5557F7FF0F00FF05555919337F775F7F5557F7F700550F055559 193577557F7F55F7577F07550F0555999995755575755F7FFF7F5570F0755011 11155557F755F777777555000755033305555577755F75F77F55555555503335 0555555FF5F75F757F5555005503335505555577FF75F7557F55505050333555 05555757F75F75557F5505000333555505557F777FF755557F55000000355557 07557777777F55557F5555000005555707555577777FF5557F55553000075557 0755557F7777FFF57555553350000055555555775777775555550000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = sbShowSQLClick end object sbRemoveAllTables: TSpeedButton Left = 80 Top = 1 Width = 25 Height = 25 Hint = 'Remove all tables' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555 555557777F777555F55500000000555055557777777755F75555005500055055 555577F5777F57555555005550055555555577FF577F5FF55555500550050055 5555577FF77577FF555555005050110555555577F757777FF555555505099910 555555FF75777777FF555005550999910555577F5F77777775F5500505509990 3055577F75F77777575F55005055090B030555775755777575755555555550B0 B03055555F555757575755550555550B0B335555755555757555555555555550 BBB35555F55555575F555550555555550BBB55575555555575F5555555555555 50BB555555555555575F555555555555550B55555555555555750000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = sbRemoveAllTablesClick end object sbDefineField: TSpeedButton Left = 184 Top = 1 Width = 25 Height = 25 Hint = 'Add a SQL defined field' Enabled = False Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333333333333333333333333333 33333F3F3F3F3F3F3F3F03030303030303037373737373737373333333333333 33333F3FFFFFFFFFFF3F03000000000003037377777777777F73330800808080 03333F7F77F7F7F77F3F0308008080800303737F77F737F77F73330080080008 03333F77F77F777F7F3F03000000000003037377777777777373333333333333 33333F3F3F3F3F3F3F3F03030303030303037373737373737373333333333333 3333333333333333333333333333333333333333333333333333333333333333 33333333333333333333333333333333333333333333333333330000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = sbDefineFieldClick end object sbOpenQuery: TSpeedButton Left = 1 Top = 1 Width = 25 Height = 25 Hint = 'Load a saved '#13'query from a file.' Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555555555555555555555555555555555555555555555555555555555 555555555555555555555555555555555555555FFFFFFFFFF555550000000000 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8 B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555 55555575FFF75555555555700007555555555557777555555555555555555555 55555555555555555555555555555555555555555555555555550000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = sbOpenQueryClick end object sbSaveQuery: TSpeedButton Left = 26 Top = 1 Width = 25 Height = 25 Hint = 'Save the current '#13'query to a file' Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070 7700333333337777777733333333008088003333333377F73377333333330088 88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000 000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039 99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999 93337FFFF7737777733300000033333333337777773333333333} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = sbSaveQueryClick end object sbShowresult: TSpeedButton Left = 262 Top = 1 Width = 25 Height = 25 Hint = 'Show result table' GroupIndex = 1 Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333FFFFFFFFFFFFFFF000000000000000077777777777777770FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF FFF07FFFFFFFFFFFFFF70CCCCCCCCCCCCCC07777777777777777088CCCCCCCCC C8807FF7777777777FF700000000000000007777777777777777333333333333 33333333333333333333333333333333333333333333333333330000} NumGlyphs = 2 ParentShowHint = False ShowHint = True OnClick = sbShowSQLClick end object sbQryWizard: TSpeedButton Left = 53 Top = 1 Width = 25 Height = 25 Hint = 'Use the table wizard to select '#13'tables and fields for the query' Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000 00000090000C44400000009100C444440000009100C444444000000900044444 44000009100C4444400000091000CC4440000000900004440000000091000044 0000000091D000C440000000DD0B000440000000DD1EDF0C40FF00BB9000B000 0440000D0BBBE000000000BDBFB9FB000000000EBFD00D000000} ParentShowHint = False ShowHint = True OnClick = sbQryWizardClick end object comboQueryType: TComboBox Left = 361 Top = 3 Width = 85 Height = 21 HelpContext = 2003 Style = csDropDownList Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 Items.Strings = ( 'Select' 'Update' 'Delete') ParentFont = False TabOrder = 0 OnChange = comboQueryTypeChange end object cbDistinct: TCheckBox Left = 452 Top = 5 Width = 90 Height = 17 Hint = 'Removes duplicate rows from result' Caption = 'Ignore &Dups' ParentShowHint = False ShowHint = True State = cbChecked TabOrder = 1 end object cboxAutogroup: TCheckBox Left = 547 Top = 5 Width = 78 Height = 17 Hint = 'Automatically groups fields as required' HelpContext = 2023 Caption = '&Autogroup' ParentShowHint = False ShowHint = True State = cbChecked TabOrder = 2 OnClick = cboxAutogroupClick end end object pnlBtns: TPanel Left = 0 Top = 386 Width = 629 Height = 29 Align = alBottom BevelOuter = bvNone TabOrder = 2 object btnOK: TBitBtn Left = 167 Top = 1 Width = 89 Height = 28 Hint = 'Build SQL text'#13'and exit|Build SQL text and exit' Caption = 'OK' Default = True ModalResult = 1 TabOrder = 0 OnClick = btnOKClick Glyph.Data = { CE070000424DCE07000000000000360000002800000024000000120000000100 1800000000009807000000000000000000000000000000000000008080008080 0080800080800080800080800080800080800080800080800080800080800080 8000808000808000808000808000808000808000808000808000808000808000 8080008080008080008080008080008080008080008080008080008080008080 0080800080800080800080800080800080800080800080800080800080800080 8000808000808000808000808000808000808000808000808000808000808000 8080008080008080008080008080F8FCF8008080008080008080008080008080 0080800080800080800080800080800080800080800080800080800080800080 8080000080000000808000808000808000808000808000808000808000808000 8080008080008080008080008080008080008080008080808080808080F8FCF8 0080800080800080800080800080800080800080800080800080800080800080 8000808000808000808080000000800000800080000000808000808000808000 8080008080008080008080008080008080008080008080008080008080008080 808080008080008080808080F8FCF80080800080800080800080800080800080 8000808000808000808000808000808000808080000000800000800000800000 8000800000008080008080008080008080008080008080008080008080008080 008080008080008080808080008080008080008080008080808080F8FCF80080 8000808000808000808000808000808000808000808000808000808080000000 8000008000008000008000008000008000800000008080008080008080008080 0080800080800080800080800080800080808080800080800080800080800080 80008080008080808080F8FCF800808000808000808000808000808000808000 808000808080000000800000800000800000FC00008000008000008000008000 800000008080008080008080008080008080008080008080008080808080F8FC F8008080008080808080F8FCF8008080008080008080808080F8FCF800808000 808000808000808000808000808000808000800000800000800000FC00008080 00FC000080000080000080008000000080800080800080800080800080800080 80008080008080808080F8FCF8008080808080008080808080F8FCF800808000 8080808080F8FCF800808000808000808000808000808000808000808000FC00 00800000FC0000808000808000808000FC000080000080000080008000000080 80008080008080008080008080008080008080808080F8FCF880808000808000 8080008080808080F8FCF8008080008080808080F8FCF8008080008080008080 00808000808000808000808000FC0000808000808000808000808000808000FC 0000800000800000800080000000808000808000808000808000808000808000 8080808080008080008080008080008080008080808080F8FCF8008080008080 808080F8FCF80080800080800080800080800080800080800080800080800080 8000808000808000808000808000FC0000800000800000800080000000808000 8080008080008080008080008080008080008080008080008080008080008080 008080808080F8FCF8008080008080808080F8FCF80080800080800080800080 8000808000808000808000808000808000808000808000808000808000FC0000 8000008000008000800000008080008080008080008080008080008080008080 008080008080008080008080008080008080808080F8FCF80080800080808080 80F8FCF800808000808000808000808000808000808000808000808000808000 808000808000808000808000FC00008000008000008000800000008080008080 0080800080800080800080800080800080800080800080800080800080800080 80808080F8FCF8008080008080808080F8FCF800808000808000808000808000 808000808000808000808000808000808000808000808000808000FC00008000 0080000080008000000080800080800080800080800080800080800080800080 80008080008080008080008080008080808080F8FCF8008080008080808080F8 FCF8008080008080008080008080008080008080008080008080008080008080 00808000808000808000FC000080000080008000000080800080800080800080 8000808000808000808000808000808000808000808000808000808000808080 8080F8FCF8008080808080F8FCF8008080008080008080008080008080008080 00808000808000808000808000808000808000808000808000FC000080000080 0000808000808000808000808000808000808000808000808000808000808000 8080008080008080008080008080808080F8FCF8808080008080008080008080 0080800080800080800080800080800080800080800080800080800080800080 8000808000808000FC0000808000808000808000808000808000808000808000 8080008080008080008080008080008080008080008080008080008080808080 0080800080800080800080800080800080800080800080800080800080800080 8000808000808000808000808000808000808000808000808000808000808000 8080008080008080008080008080008080008080008080008080008080008080 008080008080008080008080008080008080} NumGlyphs = 2 Style = bsNew end object btnCancel: TBitBtn Left = 270 Top = 1 Width = 89 Height = 28 Hint = 'Abandon changes'#13'and exit' TabOrder = 1 OnClick = btnCancelClick Kind = bkCancel Style = bsNew end object btnHelp: TBitBtn Left = 373 Top = 1 Width = 89 Height = 28 Hint = 'Show help' Caption = '&Help' TabOrder = 2 OnClick = btnHelpClick Glyph.Data = { CE070000424DCE07000000000000360000002800000024000000120000000100 1800000000009807000000000000000000000000000000000000007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F7F7F007F7F00007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7FFFFFFFFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F007F00 007F00007F7F00007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F7F7F7F7F7F7FFFFFFF007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7FFFFF007F7F007F7F007F0000007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F7FFFFFFF 007F7F7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFF007F7F007F7F0000 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F7F7F7FFFFFFFFFFFFF7F7F7FFFFFFF007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F7F7F7F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F7F00007F00007F7F00007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7FFFFFFFFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F007F7F007F7F00 7F0000007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F7F7F7F7F7F7F7F7F7FFFFFFF007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7FFFFF007F7F007F7F007F0000007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F7FFFFFFF007F7F7F 7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7FFFFF007F7F007F7F007F7F007F0000007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F7F7F7FFFFFFF007F7F7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFF 007F7F007F7F007F7F007F0000007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F7F7F7FFFFFFF007F7F007F7F7F7F7FFFFFFF 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7FFFFF007F7F007F7F007F7F007F0000007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F7F FFFFFF007F7F007F7F7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F7F00007F0000007F7F007F7F007F7FFFFF007F 7F007F7F007F7F007F0000007F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7FFFFFFF007F7F007F7F7F7F7FFFFFFF007F7F007F7F7F7F7FFFFFFF007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F007F7F007F7F007F 0000007F7F007F7F007F7FFFFF007F7F007F7F007F0000007F7F007F7F007F7F 007F7F007F7F007F7F007F7F7F7F7F7F7F7FFFFFFF007F7F007F7F7F7F7FFFFF FF007F7F007F7F7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F00 7F7FFFFF007F7F007F7F007F7F007F00007F00007F00007F7F007F7F007F7F00 7F0000007F7F007F7F007F7F007F7F007F7F007F7F7F7F7FFFFFFF007F7F7F7F 7FFFFFFFFFFFFFFFFFFF7F7F7F007F7F007F7F7F7F7FFFFFFF007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7FFFFF007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F00007F7F007F7F007F7F007F7F007F7F007F 7F7F7F7FFFFFFF007F7F007F7F7F7F7F7F7F7F7F7F7F007F7F007F7F007F7F7F 7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F FFFF00FFFF007F7F007F7F007F7F007F7F007F7F007F7F00007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F7F7F7FFFFFFFFFFFFF007F7F007F7F00 7F7F007F7F007F7F007F7F7F7F7F007F7F007F7F007F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7FFFFF00FFFF00FFFF00FFFF00FFFF 00007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F7F 7F7F7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7F7F7F007F7F007F7F007F7F 007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F 7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00 7F7F007F7F007F7F007F7F007F7F007F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F 007F7F007F7F007F7F007F7F007F7F007F7F} NumGlyphs = 2 Style = bsNew end end object pmTableGrid: TPopupMenu Left = 99 Top = 72 object AddTable1: TMenuItem Caption = '&Add Table' ShortCut = 0 OnClick = sbAddTableClick end object RemoveTable1: TMenuItem Caption = '&Remove Table' ShortCut = 0 OnClick = sbRemoveTableClick end object EditJoins1: TMenuItem Caption = '&Edit Table Joins' ShortCut = 0 OnClick = sbEditTableJoinsClick end end object pmDefinedGrid: TPopupMenu Left = 72 Top = 72 object MenuItem1: TMenuItem Caption = '&Table Add' ShortCut = 0 OnClick = sbAddTableClick end object MenuItem2: TMenuItem Caption = '&Remove Table' ShortCut = 0 OnClick = sbRemoveTableClick end object MenuItem3: TMenuItem Caption = '&Joins Editor' ShortCut = 0 OnClick = sbEditTableJoinsClick end object N1: TMenuItem Caption = '-' ShortCut = 0 end object Adddefinedfield1: TMenuItem Caption = '&Add defined field' ShortCut = 0 OnClick = Adddefinedfield1Click end object Editdefinedfield1: TMenuItem Caption = '&Edit defined field' ShortCut = 0 OnClick = EditDefinedField1Click end object Deletedefinedfield1: TMenuItem Caption = '&Delete defined field' ShortCut = 0 OnClick = DeleteDefinedField1Click end end object OpenDialog1: TOpenDialog DefaultExt = 'stm' FileEditStyle = fsEdit Filter = 'SqlBuilder Stream Files|*.STM' Options = [ofPathMustExist, ofFileMustExist] Title = 'Open SqlBuilder Query' Left = 16 Top = 64 end object SaveDialog1: TSaveDialog DefaultExt = 'ST1' FileEditStyle = fsEdit Filter = 'SqlBuilder Query Files|*.STM' Options = [ofOverwritePrompt] Title = 'Save Query to File' Left = 42 Top = 72 end object Query1: TQuery DatabaseName = 'DBDEMOS' Left = 136 Top = 80 end object DataSource1: TDataSource DataSet = Query1 Left = 152 Top = 96 end end