bzwh.dfm

企业员工考勤和工资管理系统

object FormBzWh: TFormBzWh
  Left = 171
  Top = 104
  Width = 567
  Height = 468
  Caption = '班组管理'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object PageControl1: TPageControl
    Left = 3
    Top = 1
    Width = 553
    Height = 440
    ActivePage = TabSheet1
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = '班组管理'
      object GroupBox1: TGroupBox
        Left = 4
        Top = 6
        Width = 538
        Height = 78
        Caption = '编辑区'
        Enabled = False
        TabOrder = 0
        object Label2: TLabel
          Left = 9
          Top = 53
          Width = 66
          Height = 12
          Caption = '班组编号(&B)'
          FocusControl = DBEditBh
        end
        object Label3: TLabel
          Left = 264
          Top = 52
          Width = 66
          Height = 12
          Caption = '班组名称(&W)'
          FocusControl = DBEditMc
        end
        object Label1: TLabel
          Left = 10
          Top = 23
          Width = 66
          Height = 12
          Caption = '所属部门(A)'
          FocusControl = DBLookupComboBox1
        end
        object Label4: TLabel
          Left = 265
          Top = 21
          Width = 48
          Height = 12
          Caption = '部门编号'
        end
        object DBEditBh: TDBEdit
          Left = 76
          Top = 49
          Width = 168
          Height = 20
          DataField = 'groupno'
          DataSource = DataSource1
          TabOrder = 0
        end
        object DBEditMc: TDBEdit
          Left = 335
          Top = 48
          Width = 196
          Height = 20
          DataField = 'groupname'
          DataSource = DataSource1
          TabOrder = 1
        end
        object DBLookupComboBox1: TDBLookupComboBox
          Left = 77
          Top = 18
          Width = 168
          Height = 20
          DataField = 'depname'
          DataSource = DataSource1
          KeyField = 'describe'
          ListField = 'describe'
          ListSource = DataSource2
          TabOrder = 2
          OnClick = DBLookupComboBox1Click
        end
        object DBEdit1: TDBEdit
          Left = 336
          Top = 17
          Width = 195
          Height = 20
          DataField = 'depno'
          DataSource = DataSource1
          ReadOnly = True
          TabOrder = 3
        end
      end
      object DBGrid1: TDBGrid
        Left = 3
        Top = 88
        Width = 539
        Height = 262
        DataSource = DataSource1
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        TabOrder = 1
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clBtnFace
        TitleFont.Height = -12
        TitleFont.Name = '宋体'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'groupno'
            Title.Caption = '班组编号'
            Title.Font.Charset = ANSI_CHARSET
            Title.Font.Color = clHighlight
            Title.Font.Height = -12
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'groupname'
            Title.Caption = '班组名称'
            Title.Font.Charset = ANSI_CHARSET
            Title.Font.Color = clHighlight
            Title.Font.Height = -12
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'depno'
            Title.Alignment = taCenter
            Title.Caption = '部门编号'
            Title.Font.Charset = ANSI_CHARSET
            Title.Font.Color = clHighlight
            Title.Font.Height = -12
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'depname'
            Title.Alignment = taCenter
            Title.Caption = '部门名称'
            Title.Font.Charset = ANSI_CHARSET
            Title.Font.Color = clHighlight
            Title.Font.Height = -12
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Visible = True
          end>
      end
      object BitBtnAdd: TBitBtn
        Left = 75
        Top = 356
        Width = 73
        Height = 25
        Caption = '增加(&A)'
        TabOrder = 2
        OnClick = BitBtnAddClick
        Glyph.Data = {
          DE000000424DDE0000000000000076000000280000000D0000000D0000000100
          0400000000006800000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
          F000FFFFFFFFFFFFF000FFFFF000FFFFF000FFFFF0F0FFFFF000FFFFF0F0FFFF
          F000FF0000F0000FF000FF0FFFFFFF0FF000FF0000F0000FF000FFFFF0F0FFFF
          F000FFFFF0F0FFFFF000FFFFF000FFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFF
          F000}
      end
      object BitBtnDelete: TBitBtn
        Left = 155
        Top = 356
        Width = 75
        Height = 25
        Caption = '删除(&D)'
        TabOrder = 3
        OnClick = BitBtnDeleteClick
        Glyph.Data = {
          DE000000424DDE0000000000000076000000280000000D0000000D0000000100
          0400000000006800000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
          F000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFF
          F000FF000000000FF000FF0FFFFFFF0FF000FF000000000FF000FFFFFFFFFFFF
          F000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFF
          F000}
      end
      object BitBtnEdit: TBitBtn
        Left = 235
        Top = 356