qxgl_form.dfm

一个小的Delphi的权限控制工具

object QXGL_F: TQXGL_F
  Left = 278
  Top = 108
  Width = 593
  Height = 373
  BorderIcons = [biSystemMenu]
  Caption = #29992#25143#31649#29702
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  Icon.Data = {
    0000010001002020000001000800A80800001600000028000000200000004000
    0000010008000000000000000000000000000000000000000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C000C0DC
    C000F0CAA60004040400080808000C0C0C0011111100161616001C1C1C002222
    220029292900555555004D4D4D004242420039393900807CFF005050FF009300
    D600FFECCC00C6D6EF00D6E7E70090A9AD000000330000006600000099000000
    CC00003300000033330000336600003399000033CC000033FF00006600000066
    330000666600006699000066CC000066FF000099000000993300009966000099
    99000099CC000099FF0000CC000000CC330000CC660000CC990000CCCC0000CC
    FF0000FF660000FF990000FFCC00330000003300330033006600330099003300
    CC003300FF00333300003333330033336600333399003333CC003333FF003366
    00003366330033666600336699003366CC003366FF0033990000339933003399
    6600339999003399CC003399FF0033CC000033CC330033CC660033CC990033CC
    CC0033CCFF0033FF330033FF660033FF990033FFCC0033FFFF00660000006600
    330066006600660099006600CC006600FF006633000066333300663366006633
    99006633CC006633FF00666600006666330066666600666699006666CC006699
    00006699330066996600669999006699CC006699FF0066CC000066CC330066CC
    990066CCCC0066CCFF0066FF000066FF330066FF990066FFCC00CC00FF00FF00
    CC009999000099339900990099009900CC009900000099333300990066009933
    CC009900FF00996600009966330099336600996699009966CC009933FF009999
    330099996600999999009999CC009999FF0099CC000099CC330066CC660099CC
    990099CCCC0099CCFF0099FF000099FF330099CC660099FF990099FFCC0099FF
    FF00CC00000099003300CC006600CC009900CC00CC0099330000CC333300CC33
    6600CC339900CC33CC00CC33FF00CC660000CC66330099666600CC669900CC66
    CC009966FF00CC990000CC993300CC996600CC999900CC99CC00CC99FF00CCCC
    0000CCCC3300CCCC6600CCCC9900CCCCCC00CCCCFF00CCFF0000CCFF330099FF
    6600CCFF9900CCFFCC00CCFFFF00CC003300FF006600FF009900CC330000FF33
    3300FF336600FF339900FF33CC00FF33FF00FF660000FF663300CC666600FF66
    9900FF66CC00CC66FF00FF990000FF993300FF996600FF999900FF99CC00FF99
    FF00FFCC0000FFCC3300FFCC6600FFCC9900FFCCCC00FFCCFF00FFFF3300CCFF
    6600FFFF9900FFFFCC006666FF0066FF660066FFFF00FF666600FF66FF00FFFF
    66002100A5005F5F5F00777777008686860096969600CBCBCB00B2B2B200D7D7
    D700DDDDDD00E3E3E300EAEAEA00F1F1F100F8F8F800F0FBFF00A4A0A0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    00000000000000000000000000000000000000000000000014CD00CD00000000
    0000000000535353535353535300000000000000000014CDCDCD00CD00000000
    00000000009A9A9A9A9A9A00000000000000000014CDD5DCDCCD00CD00000000
    00000000000000009A9A005353000000000014CDD5DCDCDCDCCD00CD00000000
    161616161616161600539A9A5300000014CDD5DCDCDCDCDCDCCD00CD00000000
    939A9A9A9A9A000000539A9A000000CDD5DCDCDCDCDCDCDCDCCD00CD00000000
    939A9A9A9300161600539A9A535300DCDCDCDCDCDCDCDCDCDCCD00CD00000000
    939A9A9A939A9A1600539A9A9A5300DCDCDCDCDCDCDCDCDCDCCD00CD00000000
    939A9A9A9A9A16000000539A9A5300DCDCDCDCDCDCDCDCDCDCCD00CD00000000
    939A9A9A9A9A9316160053009A5300DCDCDCDCDCDCDCDCDCDCCD00CD00000000
    939A9A9A9A9A9A9A160053009A5300DCDCDCDCDCDCDCDCDCDCCD00CD00000000
    939A9A9A9A9A9A9A1600539A9A5300DCDCDCDCDCDCDCDCDCDCCD00CD00000000
    939A9A9A9A93009A160000000000DCDCDCDCDCDCDCDCDCDCDCCD00CD00000000
    939A9A9A9A93009A1600DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCCD00CD00000000
    93939393939393931600DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCCD00CD00000000
    000000000000000000DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCCD00CD00000000
    0000000000DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCCD00CD00000000
    0000000000DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCFF00D500000000
    0000000000DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCFFDCDCFFD500D5D500000000
    0000000000DCDCDCDCDCDCDCDCDCDCDCDCDCFFD51414D51414D5D5DC00000000
    0000000000DCDCDCDCDCDCDCDCDCDCDCFFD51414D51414D5D5D5D50000000000
    0000000000DCDCDCDCDCDCDCDCDCDCDC1414D5D5D5D5D5D5D5D5000000000000
    0000000000DCDCDCDCDCDCDCDCDCDCFF14D5D5D5D5D5D5D5D5CD140000000000
    0000000000DCDCDCDCDCDCDCDCFFD51414D5D5D5D5D5D5D5DC00000000000000
    0000000000DCDCDCDCDCDCFFD50F14D5D5DCD5D5D5D5DCD51414000000000000
    0000000000DCDCDCDCFFD5140FD5D5DCD51400D5DCD514000000000000000000
    0000000000DCDCFFD51414D5D5DCD51400000000000000000000000000000000
    0000000000FFD51414D5D5DCD514000000000000000000000000000000000000
    00000000000014D5D5DCD5140000000000000000000000000000000000000000
    00000000000000DCD51400000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000FFFF
    FFE3FE01FF81FC00FE01FC00F801C000E0018000800180000001800000018000
    000180000001800000018000000180000001800000018000000180000001C000
    0001FC000001FC000001FC000001FC000001FC000003FC000007FC000007FC00
    000FFC00000FFC00003FFC0018FFFC007FFFFC01FFFFFF07FFFFFF1FFFFF}
  OldCreateOrder = False
  Position = poDesktopCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object YHGL_PC: TPageControl
    Left = 8
    Top = 8
    Width = 569
    Height = 329
    ActivePage = ZHGL_TS
    TabOrder = 0
    object ZHGL_TS: TTabSheet
      Caption = #24080#25143#31649#29702
      object FlatButton1: TFlatButton
        Left = 464
        Top = 269
        Width = 73
        Height = 25
        ColorFocused = clSkyBlue
        ColorBorder = clOlive
        Caption = #20851#38381
        TabOrder = 0
        OnClick = FlatButton1Click
      end
      object QXZX_FBtn: TFlatButton
        Left = 360
        Top = 269
        Width = 73
        Height = 25
        ColorFocused = clSkyBlue
        ColorBorder = clOlive
        Caption = #25191#34892
        TabOrder = 1
        OnClick = QXZX_FBtnClick
      end
      object FlatGroupBox8: TFlatGroupBox
        Left = 296
        Top = 64
        Width = 249
        Height = 193
        Caption = #20449#24687#65306
        TabOrder = 2
        ColorBorder = clGreen
        object Label18: TLabel
          Left = 24
          Top = 27
          Width = 36
          Height = 12
          Caption = #32534#21495#65306
        end
        object Label19: TLabel
          Left = 24
          Top = 60
          Width = 36
          Height = 12
          Caption = #22995#21517#65306
        end
        object Label1: TLabel
          Left = 24
          Top = 94
          Width = 36
          Height = 12
          Caption = #32452#21517#65306
        end
        object Label3: TLabel
          Left = 24
          Top = 129
          Width = 36
          Height = 12
          Caption = #23494#30721#65306
        end
        object Label4: TLabel
          Left = 24
          Top = 163
          Width = 36
          Height = 12
          Caption = #30830#35748#65306
        end
        object QXBH_FE: TFlatEdit
          Left = 80
          Top = 24
          Width = 153
          Height = 18
          ColorFlat = clBtnFace
          ParentColor = True
          TabOrder = 0
        end
        object QXXM_FE: TFlatEdit
          Left = 80
          Top = 57
          Width = 153
          Height = 18
          ColorFlat = clBtnFace
          ParentColor = True
          TabOrder = 1
        end
        object ZM_FCB: TFlatComboBox
          Left = 80
          Top = 91
          Width = 153
          Height = 20
          Style = csDropDownList
          Color = clWindow
          ItemHeight = 12
          TabOrder = 2
          ItemIndex = -1
        end
        object XMM_FE: TFlatEdit
          Left = 80
          Top = 126
          Width = 153
          Height = 18
          ColorFlat = clBtnFace
          ParentColor = True
          PasswordChar = '*'
          TabOrder = 3
        end
        object QR_FE: TFlatEdit
          Left = 80
          Top = 160
          Width = 153
          Height = 18
          ColorFlat = clBtnFace
          ParentColor = True
          PasswordChar = '*'
          TabOrder = 4
          OnKeyUp = QR_FEKeyUp
        end
      end
      object FlatGroupBox7: TFlatGroupBox
        Left = 296
        Top = 8
        Width = 249
        Height = 49
        Caption = #26041#24335#65306
        TabOrder = 3
        ColorBorder = clGreen
        object QXXG_FRBtn: TFlatRadioButton
          Left = 40
          Top = 20
          Width = 73
          Height = 17
          Caption = #20462#25913
          TabOrder = 0
          OnClick = QXXG_FRBtnClick
        end
        object QXTJ_FRBtn: TFlatRadioButton
          Left = 152
          Top = 20
          Width = 65
          Height = 17
          Caption = #28155#21152
          TabOrder = 1
          OnClick = QXTJ_FRBtnClick
        end
      end
      object FlatGroupBox5: TFlatGroupBox
        Left = 8
        Top = 8
        Width = 273
        Height = 249
        Caption = #24050#26377#24080#25143#65306
        TabOrder = 4
        ColorBorder = clGreen
        object QX_DG: TDBGrid
          Left = 8
          Top = 16
          Width = 249
          Height = 185
          DataSource = QX_DS
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          ReadOnly = True
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          OnMouseUp = QX_DGMouseUp
          Columns = <
            item
              Expanded = False
              Title.Caption = #32534#21495
              Width = 73
              Visible = True
            end
            item
              Expanded = False
              Title.Caption = #22995#21517
              Width = 65
              Visible = True
            end
            item
              Expanded = False
              Title.Caption = #26435#38480
              Width = 75
              Visible = True
            end>
        end
        object QXDel_FBtn: TFlatButton
          Left = 184
          Top = 216
          Width = 73
          Height = 25
          ColorFocused = clSkyBlue
          ColorBorder = clOlive
          Caption = #21024#38500
          TabOrder = 1
          OnClick = QXDel_FBtnClick
        end
      end
    end
    object QXGL_TS: TTabSheet
      Caption = #26435#38480#31649#29702
      ImageIndex = 1
      object FlatGroupBox1: TFlatGroupBox
        Left = 8
        Top = 8
        Width = 313
        Height = 49
        Caption = #36755#20837#24080#21495#65306
        TabOrder = 0
        ColorBorder = clGreen
        object ZH_FE: TFlatEdit
          Left = 16
          Top = 19
          Width = 169
          Height = 18
          ColorFlat = clBtnFace
          ParentColor = True
          TabOrder = 0
          OnKeyUp = ZH_FEKeyUp
        end
        object CZ_FB: TFlatButton
          Left = 216
          Top = 16
          Width = 73
          Height = 25
          ColorFocused = clSkyBlue
          ColorBorder = clOlive
          Caption = #26597#25214
          TabOrder = 1
          OnClick = CZ_FBClick
        end
      end
      object FlatGroupBox2: TFlatGroupBox
        Left = 8
        Top = 64
        Width = 313
        Height = 201
        Caption = #24050#26377#26435#38480#65306
        TabOrder = 1
        ColorBorder = clGreen
        object QX_DG1: TDBGrid
          Left = 16
          Top = 16
          Width = 169
          Height = 161
          DataSource = QX_DS1
          ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
          Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
          ReadOnly = True
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -12
          TitleFont.Name = #23435#20307
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              Title.Caption = #21151#33021#21517
              Width = 120
              Visible = True
            end>
        end
        object FlatButton2: TFlatButton
          Left = 216
          Top = 120
          Width = 73
          Height = 25
          ColorFocused = clSkyBlue
          ColorBorder = clOlive
          Caption = #21024#38500
          TabOrder = 1
          OnClick = FlatButton2Click
        end
        object TJ_FB: TFlatButton
          Left = 216
          Top = 32
          Width = 73
          Height = 25
          ColorFocused = clSkyBlue
          ColorBorder = clOlive
          Caption = #28155#21152
          TabOrder = 2
          OnClick = TJ_FBClick
        end
      end
    end
  end
  object Edit1: TEdit
    Left = 88
    Top = 384
    Width = 97
    Height = 20
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 1
    Text = 'Edit1'
    Visible = False
  end
  object QX_DS: TDataSource
    Left = 24
    Top = 312
  end
  object QX_DS1: TDataSource
    Left = 120
    Top = 304
  end
end