pfibdsgnviewsqls.dfm

FIBPlus is a component suite intended for work with InterBase. It is direct, fast and flexible Inter

object frmSaveSQLs: TfrmSaveSQLs
  Left = 43
  Top = 203
  Width = 519
  Height = 484
  Caption = 'FIBPlus  SQLNavigator'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  ShowHint = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter3: TSplitter
    Left = 0
    Top = 194
    Width = 511
    Height = 3
    Cursor = crVSplit
    Align = alTop
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 511
    Height = 194
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object ToolBar1: TToolBar
      Left = 0
      Top = 0
      Width = 511
      Height = 28
      AutoSize = True
      ButtonHeight = 24
      ButtonWidth = 25
      EdgeBorders = [ebTop, ebBottom]
      Flat = True
      Images = ImageList1
      TabOrder = 0
      Wrapable = False
      object btnGetForms: TToolButton
        Left = 0
        Top = 0
        Hint = 'Scan all forms from active project'
        Caption = 'btnGetForms'
        ImageIndex = 7
        OnClick = btnGetFormsClick
      end
      object ToolButton5: TToolButton
        Left = 25
        Top = 0
        Hint = 'Close forms opened from SQLnavigator'
        Caption = 'ToolButton5'
        ImageIndex = 8
        OnClick = ToolButton5Click
      end
      object ToolButton6: TToolButton
        Left = 50
        Top = 0
        Width = 8
        Caption = 'ToolButton6'
        ImageIndex = 4
        Style = tbsSeparator
      end
      object ToolButton1: TToolButton
        Left = 58
        Top = 0
        Hint = 'Save selected SQLs'
        Caption = 'ToolButton1'
        DropdownMenu = PopupMenu3
        ImageIndex = 0
        OnClick = miSaveallSQLs1Click
      end
      object ToolButton3: TToolButton
        Left = 83
        Top = 0
        Hint = 'Find in SQLs'
        Caption = 'ToolButton3'
        ImageIndex = 2
        OnClick = SpeedButton1Click
      end
      object ToolButton2: TToolButton
        Left = 108
        Top = 0
        Hint = 'Check selected SQLs '
        Caption = 'ToolButton2'
        ImageIndex = 4
        OnClick = SpeedButton2Click
      end
      object ToolButton8: TToolButton
        Left = 133
        Top = 0
        Hint = 'Save project calls to descriptions'
        Caption = 'ToolButton8'
        ImageIndex = 6
        OnClick = ToolButton8Click
      end
      object ToolButton4: TToolButton
        Left = 158
        Top = 0
        Hint = 'Hide Search Result'
        Caption = 'ToolButton4'
        Enabled = False
        ImageIndex = 3
        OnClick = HideSearchResult1Click
      end
      object ToolButton9: TToolButton
        Left = 183
        Top = 0
        Width = 8
        Caption = 'ToolButton9'
        ImageIndex = 8
        Style = tbsSeparator
      end
      object ToolButton7: TToolButton
        Left = 191
        Top = 0
        Hint = 'Show object inspector'
        Caption = 'ToolButton7'
        ImageIndex = 5
        OnClick = ToolButton7Click
      end
      object ToolButton10: TToolButton
        Left = 216
        Top = 0
        Hint = 'Show SQL Editor'
        Caption = 'ToolButton10'
        ImageIndex = 1
        OnClick = ToolButton10Click
      end
    end
    object Panel4: TPanel
      Left = 0
      Top = 28
      Width = 511
      Height = 166
      Align = alClient
      BevelOuter = bvNone
      BorderWidth = 8
      TabOrder = 1
      object Splitter2: TSplitter
        Left = 264
        Top = 8
        Width = 3
        Height = 150
        Cursor = crHSplit
      end
      object lstForms: TCheckListBox
        Left = 8
        Top = 8
        Width = 256
        Height = 150
        OnClickCheck = lstFormsClickCheck
        Align = alLeft
        Color = clBtnFace
        Font.Charset = RUSSIAN_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ItemHeight = 13
        ParentFont = False
        PopupMenu = PopupMenu1
        TabOrder = 0
        OnClick = lstFormsEnter
        OnEnter = lstFormsEnter
      end
      object lstQueries: TCheckListBox
        Left = 267
        Top = 8
        Width = 236
        Height = 150
        OnClickCheck = lstQueriesClickCheck
        Align = alClient
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ItemHeight = 13
        ParentFont = False
        PopupMenu = PopupMenu1
        TabOrder = 1
        OnClick = lstQueriesEnter
        OnDblClick = lstQueriesDblClick
      end
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 435
    Width = 511
    Height = 22
    Panels = <
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 197
    Width = 511
    Height = 238
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 8
    Caption = 'Panel1'
    TabOrder = 2
    object Splitter1: TSplitter
      Left = 8
      Top = 124
      Width = 495
      Height = 8
      Cursor = crVSplit
      Align = alBottom
    end
    object GrSearch: TGroupBox
      Left = 8
      Top = 132
      Width = 495
      Height = 98
      Align = alBottom
      Caption = 'Search Result for ""'
      TabOrder = 0
      Visible = False
      object Panel3: TPanel
        Left = 2
        Top = 15
        Width = 491
        Height = 81
        Align = alClient
        BevelOuter = bvNone
        BorderWidth = 4
        TabOrder = 0
        object Splitter4: TSplitter
          Left = 299
          Top = 4
          Width = 3
          Height = 73
          Cursor = crHSplit
          Align = alRight
        end
        object ListBox1: TListBox
          Left = 4
          Top = 4
          Width = 295
          Height = 73
          Align = alClient
          ItemHeight = 13
          PopupMenu = PopupMenu2
          TabOrder = 0
          OnClick = ListBox1Click
          OnDblClick = ListBox1DblClick
        end
        object MemErrMess: TMemo
          Left = 302
          Top = 4
          Width = 185
          Height = 73
          Align = alRight
          ReadOnly = True
          TabOrder = 1
          Visible = False
        end
      end
    end
    object PageControl1: TPageControl
      Left = 8
      Top = 8
      Width = 495
      Height = 116
      ActivePage = TabSQL
      Align = alClient
      TabOrder = 1
      object TabSQL: TTabSheet
        Caption = 'SelectSQL'
      end
      object TabInsertSQL: TTabSheet
        Caption = 'InsertSQL'
      end
      object TabUpdateSQL: TTabSheet
        Caption = 'UpdateSQL'
      end