zjll.dfm

来自「pasa人力资源考勤管理系统」· DFM 代码 · 共 1,366 行 · 第 1/5 页

          TabOrder = 9
        end
        object ddid: TwwDBLookupCombo
          Left = 301
          Top = 7
          Width = 93
          Height = 21
          DropDownAlignment = taLeftJustify
          Selected.Strings = (
            'ddid'#9'20'#9'定单号'#9'F'
            'ddname'#9'30'#9'定单名称'#9'F')
          DataField = 'ddid'
          DataSource = DataMod.Dszjll
          LookupTable = adoddid
          LookupField = 'ddid'
          Options = [loColLines, loTitles]
          TabOrder = 2
          AutoDropDown = True
          ShowButton = True
          AllowClearKey = False
        end
        object DBEdit4: TDBEdit
          Left = 582
          Top = 7
          Width = 89
          Height = 21
          DataField = 'returnrq'
          DataSource = DataMod.Dszjll
          ImeName = '万能五笔2000a+'
          MaxLength = 10
          TabOrder = 4
        end
        object DBEdit5: TDBEdit
          Left = 200
          Top = 32
          Width = 56
          Height = 21
          Color = clSilver
          DataField = 'peaple'
          DataSource = DataMod.Dszjll
          ImeName = '万能五笔2000a+'
          ReadOnly = True
          TabOrder = 7
        end
        object DBEdit6: TDBEdit
          Left = 583
          Top = 32
          Width = 88
          Height = 21
          Color = clSilver
          DataField = 'money'
          DataSource = DataMod.Dszjll
          ImeName = '万能五笔2000a+'
          ReadOnly = True
          TabOrder = 10
        end
        object DBCheckBox1: TDBCheckBox
          Left = 676
          Top = 9
          Width = 113
          Height = 17
          Caption = '按工序系数分发'
          DataField = 'flat'
          DataSource = DataMod.Dszjll
          Font.Charset = GB2312_CHARSET
          Font.Color = clRed
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 5
          ValueChecked = 'True'
          ValueUnchecked = 'False'
        end
        object DBEdit7: TDBEdit
          Left = 318
          Top = 32
          Width = 75
          Height = 21
          DataField = 'number'
          DataSource = DataMod.Dszjll
          ImeName = '万能五笔2000a+'
          TabOrder = 8
        end
      end
      object DBGrid1: TDBGrid
        Left = 0
        Top = 33
        Width = 742
        Height = 247
        Align = alClient
        DataSource = DataMod.Dszjll
        ImeName = '万能五笔2000a+'
        ReadOnly = True
        TabOrder = 2
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'rq'
            Width = 80
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'id'
            Width = 73
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'goodsid'
            Width = 70
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'ddid'
            Width = 76
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'number'
            Width = 83
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'returnrq'
            Width = 74
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'redept'
            Width = 119
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'peaple'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'prices'
            Width = 63
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'money'
            Width = 75
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cdate'
            Width = 63
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'operator'
            Visible = True
          end>
      end
      object Panel2: TPanel
        Left = 0
        Top = 0
        Width = 742
        Height = 33
        Align = alTop
        BevelInner = bvLowered
        TabOrder = 3
        object Label18: TLabel
          Left = 24
          Top = 10
          Width = 118
          Height = 13
          Caption = '序号/工序名/建档人'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Edit1: TEdit
          Left = 149
          Top = 6
          Width = 148
          Height = 21
          ImeName = '万能五笔2000a+'
          TabOrder = 0
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = '计件汇总'
      ImageIndex = 1
      object Splitter2: TSplitter
        Left = 0
        Top = 321
        Width = 742
        Height = 2
        Cursor = crVSplit
        Align = alBottom
      end
      object DBGrid2: TDBGrid
        Left = 0
        Top = 323
        Width = 742
        Height = 162
        Align = alBottom
        DataSource = DataMod.Dspieday
        ImeName = '万能五笔2000a+'
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'rq'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'money'
            Width = 64
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'workno'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'name'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'prof'
            Width = 130
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'dept'
            Width = 146
            Visible = True
          end>
      end
      object Panel3: TPanel
        Left = 0
        Top = 0
        Width = 742
        Height = 33
        Align = alTop
        BevelInner = bvLowered
        TabOrder = 1
        object Label5: TLabel
          Left = 24