fsetgrpmember.dfm

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

object FrmSetGrpMember: TFrmSetGrpMember
  Left = 258
  Top = 174
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = #35373#32622#29992#25142#32068#25104#21729
  ClientHeight = 446
  ClientWidth = 639
  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 SBNew: TSpeedButton
    Left = 298
    Top = 228
    Width = 41
    Height = 22
    Caption = ' '
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333FF3333333333333003333
      3333333333773FF3333333333309003333333333337F773FF333333333099900
      33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
      99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
      33333333337F3F77333333333309003333333333337F77333333333333003333
      3333333333773333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
    OnClick = SBNewClick
  end
  object SBDelete: TSpeedButton
    Left = 298
    Top = 316
    Width = 41
    Height = 22
    Caption = ' '
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333FF3333333333333003333333333333F77F33333333333009033
      333333333F7737F333333333009990333333333F773337FFFFFF330099999000
      00003F773333377777770099999999999990773FF33333FFFFF7330099999000
      000033773FF33777777733330099903333333333773FF7F33333333333009033
      33333333337737F3333333333333003333333333333377333333333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
    OnClick = SBDeleteClick
  end
  object GroupBox1: TGroupBox
    Left = 342
    Top = 48
    Width = 287
    Height = 121
    Caption = #29992#25142#32068#20449#24687
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 13
      Top = 18
      Width = 265
      Height = 97
      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'ID'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'GroupName'
          Title.Alignment = taCenter
          Title.Caption = #29992#25142#32068#21517#31281
          Width = 122
          Visible = True
        end>
    end
  end
  object GroupBox2: TGroupBox
    Left = 343
    Top = 174
    Width = 289
    Height = 265
    Caption = #29992#25142#32068#25104#21729
    TabOrder = 1
    object DBGrid3: TDBGrid
      Left = 11
      Top = 20
      Width = 268
      Height = 239
      DataSource = DataSource3
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'UsrID'
          Title.Alignment = taCenter
          Title.Caption = #29992#25142'ID'
          Width = 87
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'USERNAME'
          Title.Alignment = taCenter
          Title.Caption = #29992#25142#21517#31281
          Width = 137
          Visible = True
        end>
    end
  end
  object GroupBox3: TGroupBox
    Left = 16
    Top = 46
    Width = 281
    Height = 393
    Caption = #29992#25142
    TabOrder = 2
    object DBGrid2: TDBGrid
      Left = 6
      Top = 17
      Width = 268
      Height = 369
      DataSource = DataSource2
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'USERID'
          Title.Alignment = taCenter
          Title.Caption = #29992#25142'ID'
          Width = 87
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'USERNAME'
          Title.Alignment = taCenter
          Title.Caption = #29992#25142#21517#31281
          Width = 137
          Visible = True
        end>
    end
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 639
    Height = 41
    ButtonHeight = 36
    ButtonWidth = 31
    Color = clInactiveCaptionText
    EdgeBorders = [ebLeft, ebTop, ebRight]
    EdgeInner = esLowered
    Images = ImageList2
    ParentColor = False
    ShowCaptions = True
    TabOrder = 3
    object ToolButton7: TToolButton
      Left = 0
      Top = 2
      Width = 10
      Caption = 'ToolButton7'
      ImageIndex = 12
      Style = tbsDivider
    end
    object ExitToolButton: TToolButton
      Left = 10
      Top = 2
      Caption = #36864#20986
      ImageIndex = 18
      OnClick = ExitToolButtonClick
    end
    object ToolButton12: TToolButton
      Left = 41
      Top = 2
      Width = 8
      Caption = 'ToolButton12'
      ImageIndex = 18
      Style = tbsSeparator
    end
    object PrintToolButton: TToolButton
      Left = 49
      Top = 2
      Caption = #25171#21360