rgtfunctionmaintainfrmmain.~dfm

delphi开发的中国移动大客户管理系统,后台数据库为oracle

        Top = 10
        Width = 132
        Height = 22
        Color = clScrollBar
        ReadOnly = True
        TabOrder = 0
      end
      object EdtFuncNameEditing: TEdit
        Left = 65
        Top = 40
        Width = 339
        Height = 22
        TabOrder = 2
      end
      object CmbControlTypeEditing: TComboBox
        Left = 272
        Top = 10
        Width = 132
        Height = 22
        Style = csDropDownList
        ItemHeight = 14
        TabOrder = 1
        Items.Strings = (
          '看不见'
          '不可编辑')
      end
      object EdtExtraEditing: TEdit
        Left = 64
        Top = 122
        Width = 340
        Height = 22
        TabOrder = 4
      end
      object GroupBox1: TGroupBox
        Left = 13
        Top = 66
        Width = 393
        Height = 46
        TabOrder = 3
        object Label2: TLabel
          Left = 30
          Top = 20
          Width = 56
          Height = 14
          Caption = '窗体标题'
        end
        object Label4: TLabel
          Left = 212
          Top = 20
          Width = 56
          Height = 14
          Caption = '控件含义'
        end
        object EdtFormCaptionEditing: TEdit
          Left = 88
          Top = 16
          Width = 121
          Height = 22
          Color = clBtnFace
          ReadOnly = True
          TabOrder = 1
        end
        object EdtControlCaptionEditing: TEdit
          Left = 267
          Top = 16
          Width = 121
          Height = 22
          Color = clBtnFace
          ReadOnly = True
          TabOrder = 2
        end
        object SbSysFormCtrlListEditing: TBitBtn
          Left = 6
          Top = 17
          Width = 20
          Height = 20
          Caption = '>>'
          TabOrder = 0
          OnClick = SbSysFormCtrlListEditingClick
        end
      end
    end
    object Pal_button: TPanel
      Left = 0
      Top = 397
      Width = 434
      Height = 36
      Align = alBottom
      BevelInner = bvLowered
      TabOrder = 2
      object BitBtnAdd: TFlatButton
        Left = 8
        Top = 5
        Width = 73
        Height = 25
        Hint = '增加记录'
        Caption = '增加'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          0400000000000001000000000000000000001000000010000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333FF33333333FF333993333333300033377F3333333777333993333333
          300033F77FFF3333377739999993333333333777777F3333333F399999933333
          33003777777333333377333993333333330033377F3333333377333993333333
          3333333773333333333F333333333333330033333333F33333773333333C3333
          330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
          993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
          333333333337733333FF3333333C333330003333333733333777333333333333
          3000333333333333377733333333333333333333333333333333}
        Layout = blGlyphLeft
        NumGlyphs = 2
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnClick = BitBtnAddClick
      end
      object BitBtnAlter: TFlatButton
        Left = 81
        Top = 5
        Width = 73
        Height = 25
        Hint = '修改记录'
        Caption = '修改'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          0400000000000001000000000000000000001000000010000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
          000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
          00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
          F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
          0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
          FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
          FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
          0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
          00333377737FFFFF773333303300000003333337337777777333}
        Layout = blGlyphLeft
        NumGlyphs = 2
        TabOrder = 1
        OnClick = BitBtnAlterClick
      end
      object BitBtnDel: TFlatButton
        Left = 154
        Top = 5
        Width = 73
        Height = 25
        Hint = '删除记录'
        Caption = '删除'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          0400000000000001000000000000000000001000000010000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333333333333333FF33333333333330003333333333333777333333333333
          300033FFFFFF3333377739999993333333333777777F3333333F399999933333
          3300377777733333337733333333333333003333333333333377333333333333
          3333333333333333333F333333333333330033333F33333333773333C3333333
          330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
          993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
          333333377F33333333FF3333C333333330003333733333333777333333333333
          3000333333333333377733333333333333333333333333333333}
        Layout = blGlyphLeft
        NumGlyphs = 2
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        OnClick = BitBtnDelClick
      end
      object BitBtnSave: TFlatButton
        Left = 227
        Top = 5
        Width = 73
        Height = 25
        Hint = '保存新增或修改的信息'
        Caption = '保存'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
          00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
          00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
          00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
          00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
          00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
          00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
          0003737FFFFFFFFF7F7330099999999900333777777777777733}
        Layout = blGlyphLeft
        NumGlyphs = 2
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        OnClick = BitBtnSaveClick
      end
      object BitBtnCancel: TFlatButton
        Left = 300
        Top = 5
        Width = 73
        Height = 25
        Hint = '取消新增或修改的信息'
        Caption = '取消'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF33339993707399933333773337F3777FF3399933000339
          9933377333777F3377F3399333707333993337733337333337FF993333333333
          399377F33333F333377F993333303333399377F33337FF333373993333707333
          333377F333777F333333993333101333333377F333777F3FFFFF993333000399
          999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
          99933773FF777F3F777F339993707399999333773F373F77777F333999999999
          3393333777333777337333333999993333333333377777333333}
        Layout = blGlyphLeft
        NumGlyphs = 2
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        OnClick = BitBtnCancelClick
      end
      object BitBtnClose: TFlatButton
        Left = 373
        Top = 5
        Width = 73
        Height = 25
        Hint = '返回主界面'
        Caption = '关闭'
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000010000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
          F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
          000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
          338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
          45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
          3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
          F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
          000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
          338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
          4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
          8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
          333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
          0000}
        Layout = blGlyphLeft
        NumGlyphs = 2
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
        OnClick = BitBtnCloseClick
      end
    end
  end
  object Query1: TQuery
    CachedUpdates = True
    AfterScroll = Query1AfterScroll
    DatabaseName = 'db_vipdl'
    SQL.Strings = (
      'select * from PRIVFUNCTION ')
    UpdateObject = UpdateSQL1
    Left = 234
    Top = 48
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 298
    Top = 56
  end
  object Qry_Edit: TQuery
    DatabaseName = 'db_vipdl'
    Left = 442
    Top = 56
  end
  object Query2: TQuery
    DatabaseName = 'db_vipdl'
    SQL.Strings = (
      '')
    Left = 386
    Top = 32
  end
  object UpdateSQL1: TUpdateSQL
    Left = 288
    Top = 16
  end
end