home *** CD-ROM | disk | FTP | other *** search
/ PC Format Collection 48 / SENT14D.ISO / tech / delphi / disk15 / dbtools.pak / DBMAIN.DFM / DBMAIN.txt
Encoding:
Text File  |  1995-08-24  |  16.1 KB  |  417 lines
  1. object DbMainForm: TDbMainForm
  2.   Left = 210
  3.   Top = 187
  4.   Width = 615
  5.   Height = 300
  6.   ActiveControl = StatusLine
  7.   Caption = 'Database Browser'
  8.   Ctl3D = False
  9.   Color = clAppWorkSpace
  10.   Font.Color = clWindowText
  11.   Font.Height = -13
  12.   Font.Name = 'System'
  13.   Font.Style = []
  14.   FormStyle = fsMDIForm
  15.   Menu = MainMenu
  16.   PixelsPerInch = 96
  17.   Position = poDefault
  18.   WindowMenu = Window1
  19.   OnCreate = FormCreate
  20.   TextHeight = 16
  21.   object Panel1: TPanel
  22.     Left = 0
  23.     Top = 228
  24.     Width = 607
  25.     Height = 26
  26.     Align = alBottom
  27.     BorderWidth = 1
  28.     TabOrder = 0
  29.     object StatusLine: TPanel
  30.       Left = 2
  31.       Top = 2
  32.       Width = 542
  33.       Height = 22
  34.       Align = alClient
  35.       Alignment = taLeftJustify
  36.       BevelOuter = bvLowered
  37.       BorderWidth = 1
  38.       Font.Color = clBlack
  39.       Font.Height = -11
  40.       Font.Name = 'MS Sans Serif'
  41.       Font.Style = []
  42.       ParentFont = False
  43.       TabOrder = 0
  44.     end
  45.     object Panel2: TPanel
  46.       Left = 544
  47.       Top = 2
  48.       Width = 61
  49.       Height = 22
  50.       Align = alRight
  51.       Alignment = taLeftJustify
  52.       BevelOuter = bvLowered
  53.       TabOrder = 1
  54.     end
  55.   end
  56.   object SpeedPanel: TPanel
  57.     Left = 0
  58.     Top = 0
  59.     Width = 607
  60.     Height = 30
  61.     Align = alTop
  62.     ParentShowHint = False
  63.     ShowHint = True
  64.     TabOrder = 1
  65.     object SBOpen: TSpeedButton
  66.       Left = 7
  67.       Top = 2
  68.       Width = 26
  69.       Height = 25
  70.       Hint = 'Browse Db|Select and browse a database'
  71.       Glyph.Data = {
  72.         06020000424D0602000000000000760000002800000028000000140000000100
  73.         0400000000009001000000000000000000000000000000000000000000000000
  74.         8000008000000080800080000000800080008080000080808000C0C0C0000000
  75.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333333FFFFF
  76.         FFF00000333333333333333777773333333BFBFBFBF0FFF03333333333333337
  77.         FFF73333333FFFFFFF000000333333333333337777773333333BFBFBF0FBFBFB
  78.         333333333FFFF733FFFF3333333F00000FF000003333333377777FF777773333
  79.         333B0FFF0000FFF0333333337FFF7777FFF73333333F00000FF000003333333F
  80.         777773F777773333330BFBFBF0FBFBFB3333337FF333373FFFFF33333010FFFF
  81.         FF00000033333777FF3333777777333330170BFBFBF0FFF0333337777FF33337
  82.         FFF73333301170FFFFF0000033333777778F3337777333330711190BFBFBFBFB
  83.         333377777378F3333333333308819990FFFFFFFF3333733733378F3333333330
  84.         88FF9999033333333337333333FF7333333333088FFFF0003333333333733333
  85.         F777333333333088FFF003333333333337333337733333333333088FFF033333
  86.         333333337F33337333333333333308FFF09333333333333378F3373333333333
  87.         333330FF0933333333333333378F733333333333333333003333333333333333
  88.         33773333333333333333}
  89.       NumGlyphs = 2
  90.       OnClick = OpenDbClick
  91.     end
  92.     object SBClose: TSpeedButton
  93.       Left = 80
  94.       Top = 2
  95.       Width = 25
  96.       Height = 25
  97.       Hint = 'Close window|Close the current window'
  98.       Enabled = False
  99.       Glyph.Data = {
  100.         06020000424D0602000000000000760000002800000028000000140000000100
  101.         0400000000009001000000000000000000000000000000000000000000000000
  102.         8000008000000080800080000000800080008080000080808000C0C0C0000000
  103.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  104.         33D33333333333F33333333333333333303333D333E333D3333337FF33333333
  105.         333333333003333E33E33E33333FF77FF33333333333337000003333E3F3E333
  106.         33777777F333333333333700000033333EFE3333377777773333333333333007
  107.         30033DEEFFFFFEE3377737733333333333333003303333333EFE3333377F3733
  108.         333333333333300333333333E3F3E333377F333333333333333330033333333E
  109.         33E33E33377333333333333333333333333333D333E333D3333FFFFFFFFF3333
  110.         333333000000000333D33333337777777773F333333330FBFBFBFBF033333333
  111.         37F333333337F333333330BFBFBFBFB03333333337F333333337F333333330FB
  112.         FBFBFBF03333333337F333333337F333333330BFBFBFBFB03333333337F33333
  113.         3337F333333330FBFBFBFBF03333333337FFFFF33337F3333333300000BFBFB0
  114.         333333333777773FFFF73333333330FBFB00000333333333373FFF7777733333
  115.         3333330000333333333333333377773333333333333333333333333333333333
  116.         33333333333333333333}
  117.       NumGlyphs = 2
  118.       OnClick = CloseWindowClick
  119.     end
  120.     object SBCut: TSpeedButton
  121.       Left = 138
  122.       Top = 2
  123.       Width = 25
  124.       Height = 25
  125.       Hint = 'Cut|Cut the selected text to the clipboard'
  126.       Enabled = False
  127.       Glyph.Data = {
  128.         06020000424D0602000000000000760000002800000028000000140000000100
  129.         0400000000009001000000000000000000001000000000000000000000000000
  130.         80000080000000808000800000008000800080800000C0C0C000808080000000
  131.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  132.         3333333333333333333333333333333333333333333333333333FFFF333333FF
  133.         FF33333844833333384483333338888FF33338888FF333843348333384334833
  134.         3388F388F333883388F3338433343333433348333388F338F3338F3388F33384
  135.         33343333433348333388FF38FF338F3388333338433483384334833333388FF8
  136.         8FF88FF883333333844448844448333333338888888888883333333333444444
  137.         4433333333333388888888333333333333346FF6433333333333333883F88F33
  138.         333333333330F00F0333333333333338388383F333333333330FFFF0F0333333
  139.         3333338333F8383F3333333330FFF00FFF033333333338333883F383F3333333
  140.         0FFF0330FFF033333333833383383F383F333330FFF033330FFF033333383338
  141.         333383F383F3330FFF03333330FFF033338F33833333383F38F3330FF0333333
  142.         330FF033338F383333333383F8F3330F033333333330F033338F833333333338
  143.         38F3330033333333333300333388333333333333883333333333333333333333
  144.         33333333333333333333}
  145.       NumGlyphs = 2
  146.     end
  147.     object SBCopy: TSpeedButton
  148.       Left = 162
  149.       Top = 2
  150.       Width = 25
  151.       Height = 25
  152.       Hint = 'Copy|Copy the selected text to the clipboard'
  153.       Enabled = False
  154.       Glyph.Data = {
  155.         06020000424D0602000000000000760000002800000028000000140000000100
  156.         0400000000009001000000000000000000001000000000000000000000000000
  157.         80000080000000808000800000008000800080800000C0C0C000808080000000
  158.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  159.         3333333333333333FFFFFFFFFF33333333300000000003333333333888888888
  160.         8F3333333330FFFFFFFF033333333338F33333338F3333333330BFBFBFBF0333
  161.         33333338F3FFFFFF8F3333333330F888888F033333333338F88888838F333333
  162.         3330BFBFBFBF0333333FFFF8F3FFFFFF8F3333000000F888888F033333888888
  163.         F88888838F33330FFFF0BFBFBFBF0333338F3338F3FFFFFF8F33330FFFF0F888
  164.         888F0333338F3338F88888838F33330F7770BFBFBFBF0333338F3338F333333F
  165.         8F33330FFFF0FFFFFF000333338F3338F33333888333330F7770BFBFBF003333
  166.         338F3338FFFFFF883333330FFFF0000000033333338F3338888888833333330F
  167.         777777F033333333338F33333338F3333333330FFFFFFFF033333333338F3333
  168.         33F8F3333333330FFFFFF00033333333338F3333388833333333330FFFFFF003
  169.         33333333338FFFFFF88333333333330000000033333333333388888888333333
  170.         3333333333333333333333333333333333333333333333333333333333333333
  171.         33333333333333333333}
  172.       NumGlyphs = 2
  173.     end
  174.     object SBPaste: TSpeedButton
  175.       Left = 186
  176.       Top = 2
  177.       Width = 25
  178.       Height = 25
  179.       Hint = 'Paste|Paste the text on the clipboard at the current location'
  180.       Enabled = False
  181.       Glyph.Data = {
  182.         06020000424D0602000000000000760000002800000028000000140000000100
  183.         0400000000009001000000000000000000001000000000000000000000000000
  184.         80000080000000808000800000008000800080800000C0C0C000808080000000
  185.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  186.         3333333333333333333FFFFFFFFF333333333300000000033333333333888888
  187.         888F33333333330BFBFBFB03333FFFFFFF8F3FFFFF8F33000000000F88888F03
  188.         33888888888F8888838F307F7F7F7F0BFBFBFB0338F33333338F333FFF8F30F7
  189.         F7F7F70F77888F0338F33333338FFF88838F307F7F7F74444BFBFB0338F33333
  190.         38888F3FFF8F30F7F7F7F7C447888F0338F3333333888F88838F307F7F7F744C
  191.         4BFBFB0338F3333338888F333F8F30F7F7F7444F4FFF880338F33333888F8333
  192.         8883307F7F74440BFBFB803338F33338888FFFFF883330F7F744470000000333
  193.         38F33388838888888333307F7F747F7F0333333338F3333833338F33333330F7
  194.         F7F7F7F70333333338F3333333338F333333307F7F7F7F7F0333333338F33FFF
  195.         FFF38F33333330F7444444F703333333383F888888FF833333333300ECCCC400
  196.         33333333338838888888333333333333ECCCC433333333333333388888333333
  197.         333333333EEEE333333333333333333333333333333333333333333333333333
  198.         33333333333333333333}
  199.       NumGlyphs = 2
  200.     end
  201.     object SBExitApp: TSpeedButton
  202.       Left = 220
  203.       Top = 2
  204.       Width = 25
  205.       Height = 25
  206.       Hint = 'Exit|Close all connections and exit the application'
  207.       Glyph.Data = {
  208.         06020000424D0602000000000000760000002800000028000000140000000100
  209.         0400000000009001000000000000000000001000000000000000000000000000
  210.         80000080000000808000800000008000800080800000C0C0C000808080000000
  211.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00377777777777
  212.         777777773FFFFFFFFFFFF333333F888888888888F7F7F7888888888888883333
  213.         33888888888888877F7F788888888888888F333FF88844444400888FFF444444
  214.         88888888888333888883333334D5007FFF433333333338F888F3338F33333333
  215.         345D50FFFF4333333333388788F3338F3333333334D5D0FFFF433333333338F8
  216.         78F3338F33333333345D50FEFE4333333333388788F3338F3333333334D5D0FF
  217.         FF433333333338F878F3338F33333333345D50FEFE4333333333388788F3338F
  218.         3333333334D5D0FFFF433333333338F878F3338F33333333345D50FEFE433333
  219.         3333388788F3338F3333333334D5D0EFEF433333333338F878F3338F33333333
  220.         345D50FEFE4333333333388788F3338F3333333334D5D0EFEF433333333338F8
  221.         F8FFFF8F33333333344444444443333333333888888888833333333333333333
  222.         3333333333333333FFFFFF333333333333300000033333333333333888888F33
  223.         333333333330AAAA0333333333333338FFFF8F33333333333330000003333333
  224.         33333338888883333333}
  225.       NumGlyphs = 2
  226.       OnClick = ExitAppClick
  227.     end
  228.     object SBViewTable: TSpeedButton
  229.       Left = 32
  230.       Top = 2
  231.       Width = 25
  232.       Height = 25
  233.       Hint = 'View table|View the selected table'
  234.       Enabled = False
  235.       Glyph.Data = {
  236.         06020000424D0602000000000000760000002800000028000000140000000100
  237.         0400000000009001000000000000000000000000000000000000000000000000
  238.         8000008000000080800080000000800080008080000080808000C0C0C0000000
  239.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  240.         3333333333FFFFFFFFF333333333300000000033333333333777777777F33333
  241.         333330F8888880333333333337F3333337F33333333330F88888803333333333
  242.         37F3333337F33333333330F8888880333333333337F3333337F33333333330FF
  243.         FFFFF0333333333337FFFFFFF7F33333333330CCCCCCC0333333333337777777
  244.         77F33333333330000000003333333333377777777733333FFFFF333333333333
  245.         330000033333333333333377777F333333333333330FFF03333333333333337F
  246.         FF7F333333333333300000033333333333333777777333333333333303333333
  247.         33333333FFFF733FFFFF33333330000033000003333333377777FF77777F3333
  248.         3330FFF0000FFF0333333337FFF7777FFF7F3333333000003300000333333337
  249.         77773F7777733333333333330333333333333333333373FFFFFF333333333333
  250.         300000033333333333333777777F333333333333330FFF03333333333333337F
  251.         FF7F333333333333330000033333333333333377777333333333333333333333
  252.         33333333333333333333}
  253.       NumGlyphs = 2
  254.       OnClick = ViewTableClick
  255.     end
  256.     object SBEnterSQL: TSpeedButton
  257.       Left = 56
  258.       Top = 2
  259.       Width = 25
  260.       Height = 25
  261.       Hint = 'Enter SQL|Enter a SQL query'
  262.       Enabled = False
  263.       Glyph.Data = {
  264.         F6000000424DF60000000000000076000000280000000A000000100000000100
  265.         0400000000008000000000000000000000001000000000000000000000000000
  266.         80000080000000808000800000008000800080800000C0C0C000808080000000
  267.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333300
  268.         0000333300333300000033330033330000003333333333000000333333333300
  269.         0000333300333300000033330033330000003333800333000000333338003300
  270.         0000333333800300000033333330030000003003333003000000300833800300
  271.         0000330000008300000033300008330000003333333333000000}
  272.       OnClick = EnterSQLClick
  273.     end
  274.     object SBExecSQL: TSpeedButton
  275.       Left = 114
  276.       Top = 2
  277.       Width = 25
  278.       Height = 25
  279.       Hint = 'Execute SQL|Execute the SQL query'
  280.       Enabled = False
  281.       Glyph.Data = {
  282.         66010000424D6601000000000000760000002800000014000000140000000100
  283.         040000000000F000000000000000000000001000000000000000000000000000
  284.         80000080000000808000800000008000800080800000C0C0C000808080000000
  285.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  286.         3333333300003333333333333333333300003333333083333333333300003333
  287.         33380833333333330000333333330083333333330000333333330B0833333333
  288.         00003333330000B08333333300003333330BBFBB08333333000033333330FB00
  289.         00333333000033333330BFB0833333330000333300000BFB0833333300003333
  290.         0FBFBFBFB08333330000333330FBFB00003333330000333330BFBFB083333333
  291.         00003333330BFBFB0833333300003333330FFFBFF0833333000033333330FBFF
  292.         BF08333300003333333000000000333300003333333333333333333300003333
  293.         33333333333333330000}
  294.       OnClick = ExecuteSQLClick
  295.     end
  296.     object ReadNavigator: TDBNavigator
  297.       Left = 253
  298.       Top = 2
  299.       Width = 121
  300.       Height = 25
  301.       VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh]
  302.       Enabled = False
  303.       TabOrder = 0
  304.     end
  305.     object WriteNavigator: TDBNavigator
  306.       Left = 376
  307.       Top = 2
  308.       Width = 121
  309.       Height = 25
  310.       VisibleButtons = [nbInsert, nbDelete, nbEdit, nbPost, nbCancel]
  311.       Enabled = False
  312.       TabOrder = 1
  313.     end
  314.   end
  315.   object MainMenu: TMainMenu
  316.     Left = 4
  317.     Top = 196
  318.     object Db: TMenuItem
  319.       Caption = '&Database'
  320.       Hint = 'Database related commands'
  321.       object MOpenDb: TMenuItem
  322.         Caption = '&Open...'
  323.         Hint = 'Open an existing database'
  324.         OnClick = OpenDbClick
  325.         ShortCutText = 'Ctrl+O'
  326.       end
  327.       object MViewTable: TMenuItem
  328.         Caption = '&View Table'
  329.         Enabled = False
  330.         OnClick = ViewTableClick
  331.         ShortCutText = 'Ctrl+V'
  332.       end
  333.       object MEnterSQL: TMenuItem
  334.         Caption = '&Enter SQL'
  335.         Enabled = False
  336.         OnClick = EnterSQLClick
  337.         ShortCutText = 'Ctrl+Q'
  338.       end
  339.       object MExecSQL: TMenuItem
  340.         Caption = 'Execute &SQL'
  341.         Enabled = False
  342.         OnClick = ExecuteSQLClick
  343.         ShortCutText = 'Ctrl+E'
  344.       end
  345.       object MClose: TMenuItem
  346.         Caption = '&Close'
  347.         Enabled = False
  348.         Hint = 'Close window'
  349.         OnClick = CloseWindowClick
  350.       end
  351.       object N1: TMenuItem
  352.         Caption = '-'
  353.       end
  354.       object MExitApp: TMenuItem
  355.         Caption = 'E&xit'
  356.         Hint = 'Exit the application'
  357.         OnClick = ExitAppClick
  358.         ShortCutText = 'Ctrl+X'
  359.       end
  360.     end
  361.     object Edit1: TMenuItem
  362.       Caption = '&Edit'
  363.       object CutItem: TMenuItem
  364.         Caption = 'Cu&t'
  365.         Enabled = False
  366.         Hint = 'Cut to clipboard'
  367.         OnClick = CutItemClick
  368.       end
  369.       object CopyItem: TMenuItem
  370.         Caption = '&Copy'
  371.         Enabled = False
  372.         Hint = 'Copy to clipboard'
  373.         OnClick = CopyItemClick
  374.       end
  375.       object PasteItem: TMenuItem
  376.         Caption = '&Paste'
  377.         Enabled = False
  378.         Hint = 'Paste from clipboard'
  379.         OnClick = PasteItemClick
  380.       end
  381.     end
  382.     object Window1: TMenuItem
  383.       Caption = '&Window'
  384.       Hint = 'Window related commands such as Tile and Cascade'
  385.       OnClick = WindowDropDown
  386.       object WindowCascadeItem: TMenuItem
  387.         Caption = '&Cascade'
  388.         Hint = 'Arrange windows to overlap'
  389.         OnClick = WindowCascadeItemClick
  390.       end
  391.       object WindowTileItem: TMenuItem
  392.         Caption = '&Tile'
  393.         Hint = 'Arrange windows without overlap'
  394.         OnClick = WindowTileItemClick
  395.       end
  396.       object WindowArrangeItem: TMenuItem
  397.         Caption = '&Arrange Icons'
  398.         Hint = 'Arrange window icons at bottom of main window'
  399.         OnClick = WindowArrangeItemClick
  400.       end
  401.       object WindowMinimizeItem: TMenuItem
  402.         Caption = '&Minimize All'
  403.         Hint = 'Minimize all windows'
  404.         OnClick = WindowMinimizeItemClick
  405.       end
  406.     end
  407.     object Help1: TMenuItem
  408.       Caption = '&Help'
  409.       Hint = 'Help topics'
  410.       object HelpAboutItem: TMenuItem
  411.         Caption = '&About'
  412.         OnClick = HelpAboutItemClick
  413.       end
  414.     end
  415.   end
  416. end
  417.