fusrgrpright.dfm

一套BCB６开发的电话管理系统

object FrmUsrGrpRight: TFrmUsrGrpRight
  Left = 250
  Top = 126
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = #29992#25142#32068#27402#38480#35373#32622
  ClientHeight = 497
  ClientWidth = 582
  Color = clInfoBk
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 66
    Top = 43
    Width = 410
    Height = 123
    Caption = #29992#25142#32068
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 13
      Top = 16
      Width = 382
      Height = 94
      DataSource = DataSource1
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'GroupID'
          Title.Alignment = taCenter
          Title.Caption = #29992#25142#32068#27161#35672
          Width = 123
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'GroupName'
          Title.Alignment = taCenter
          Title.Caption = #29992#25142#32068#21517#31281
          Width = 198
          Visible = True
        end>
    end
  end
  object GroupBox2: TGroupBox
    Left = 5
    Top = 166
    Width = 569
    Height = 312
    Caption = #29992#25142#32068#27402#38480
    TabOrder = 1
    object wwDBGrid1: TwwDBGrid
      Left = 8
      Top = 15
      Width = 553
      Height = 288
      ControlType.Strings = (
        'Read;CheckBox;Yes;No'
        'Write;CheckBox;Yes;No')
      Selected.Strings = (
        'FormID'#9'20'#9#31383#21475#27161#35672#9'F'
        'FormName'#9'50'#9#31383#21475#21517#31281#9'F'
        'Read'#9'3'#9#35712#27402#38480#9'F'
        'Write'#9'3'#9#23531#27402#38480#9'F')
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      DataSource = DataSource2
      ReadOnly = True
      TabOrder = 0
      TitleAlignment = taLeftJustify
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      TitleLines = 1
      TitleButtons = False
      UseTFields = False
    end
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 582
    Height = 41
    ButtonHeight = 36
    ButtonWidth = 31
    Color = clInactiveCaptionText
    EdgeBorders = [ebLeft, ebTop, ebRight]
    EdgeInner = esLowered
    Images = ImageList2
    ParentColor = False
    ShowCaptions = True
    TabOrder = 2
    object ToolButton6: TToolButton
      Left = 0
      Top = 2
      Width = 8
      Caption = 'ToolButton6'
      ImageIndex = 12
      Style = tbsSeparator
    end
    object ModifyToolButton: TToolButton
      Left = 8
      Top = 2
      Caption = #20462#25913
      ImageIndex = 3
      OnClick = ModifyToolButtonClick
    end
    object SaveToolButton: TToolButton
      Left = 39
      Top = 2
      Caption = #20445#23384
      ImageIndex = 10
      OnClick = SaveToolButtonClick
    end
    object GiveUpToolButton: TToolButton
      Left = 70
      Top = 2
      Caption = #21462#28040
      ImageIndex = 11
      OnClick = GiveUpToolButtonClick
    end
    object ToolButton7: TToolButton
      Left = 101
      Top = 2
      Width = 10
      Caption = 'ToolButton7'
      ImageIndex = 12
      Style = tbsDivider
    end
    object FirstPageToolButton: TToolButton
      Left = 111
      Top = 2
      Caption = #39318#24373
      ImageIndex = 16
      OnClick = FirstPageToolButtonClick
    end
    object PrevPageToolButton: TToolButton
      Left = 142
      Top = 2
      Caption = #19978#24373
      ImageIndex = 14
      OnClick = PrevPageToolButtonClick
    end
    object NextPageToolButton: TToolButton
      Left = 173
      Top = 2
      Caption = #19979#24373
      ImageIndex = 13
      OnClick = NextPageToolButtonClick
    end
    object LastPageToolButton: TToolButton
      Left = 204
      Top = 2
      Caption = #26411#24373
      ImageIndex = 15
      OnClick = LastPageToolButtonClick
    end
    object ToolButton14: TToolButton
      Left = 235
      Top = 2
      Width = 8
      Caption = 'ToolButton14'
      ImageIndex = 18
      Style = tbsSeparator
    end
    object ExitToolButton: TToolButton
      Left = 243
      Top = 2
      Caption = #36864#20986
      ImageIndex = 18
      OnClick = ExitToolButtonClick
    end
    object ToolButton12: TToolButton
      Left = 274
      Top = 2
      Width = 8
      Caption = 'ToolButton12'
      ImageIndex = 18
      Style = tbsSeparator
    end
    object PrintToolButton: TToolButton
      Left = 282
      Top = 2
      Caption = #25171#21360
      ImageIndex = 17
      Visible = False
    end
    object ToolButton1: TToolButton
      Left = 313
      Top = 2
      Width = 8
      Caption = 'ToolButton1'
      ImageIndex = 19
      Style = tbsSeparator
    end
    object FindToolButton: TToolButton
      Left = 321
      Top = 2
      Caption = #26597#35426
      ImageIndex = 22
      Visible = False
    end
  end
  object UsrGrpRightQuery: TADOQuery
    Connection = DMTelSys.TelSysADOConnection