wsalary_set.~dfm

很经典的数据库代码

inherited F_Set: TF_Set
  Left = 204
  Top = 109
  Width = 574
  Height = 392
  Caption = #32771#21220#24037#36164#21442#25968#35774#32622
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label9: TLabel [0]
    Left = 255
    Top = 120
    Width = 305
    Height = 20
    Caption = #65288#20803'/'#27599#23567#26102#65289#215' '#32047#35745#27491#24120#24037#20316#26102#38388'                '
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label14: TLabel [1]
    Left = 180
    Top = 125
    Width = 22
    Height = 20
    Caption = '--   '
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label20: TLabel [2]
    Left = 247
    Top = 125
    Width = 245
    Height = 20
    Caption = #65288#20803'/'#27599#27425#65289#215' '#36831#21040#26089#36864#27425#25968'             '
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  inherited ToolBar1: TToolBar
    Width = 566
    inherited ToolButton1: TToolButton
      Caption = #28155#21152
      OnClick = ToolButton1Click
    end
    inherited ToolButton13: TToolButton
      Visible = False
    end
    inherited ToolButton2: TToolButton
      OnClick = ToolButton2Click
    end
    inherited ToolButton3: TToolButton
      OnClick = ToolButton3Click
    end
    inherited ToolButton4: TToolButton
      OnClick = ToolButton4Click
    end
    inherited ToolButton6: TToolButton
      OnClick = ToolButton6Click
    end
    inherited ToolButton10: TToolButton
      OnClick = ToolButton10Click
    end
    inherited ToolButton12: TToolButton
      OnClick = ToolButton12Click
    end
  end
  object PageControl1: TPageControl [4]
    Left = 0
    Top = 37
    Width = 566
    Height = 328
    ActivePage = TabSheet1
    Align = alClient
    TabIndex = 0
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = #24212#21040#32771#21220#26085#35774#32622
      object Label2: TLabel
        Left = 8
        Top = 0
        Width = 60
        Height = 13
        Caption = #28155#21152#26085#26399#65306
      end
      object Label1: TLabel
        Left = 102
        Top = 4
        Width = 60
        Height = 13
        Caption = #28155#21152#24180#26376#65306
      end
      object DBGrid2: TDBGrid
        Left = 0
        Top = 48
        Width = 209
        Height = 252
        Align = alCustom
        DataSource = DM.DS_WSet
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Expanded = False
            FieldName = 'WSet_ID'
            Title.Alignment = taCenter
            Title.Caption = #26085#26399#32534#21495
            Title.Color = clInactiveCaptionText
            Width = 78
            Visible = True
          end
          item
            Color = clInfoBk
            Expanded = False
            FieldName = 'WSet_Date'
            Title.Alignment = taCenter
            Title.Caption = #27491#24120#20241#24687#26085#26399
            Title.Color = clAqua
            Width = 102
            Visible = True
          end>
      end
      object DateTimePicker1: TDateTimePicker
        Left = 5
        Top = 20
        Width = 89
        Height = 21
        CalAlignment = dtaLeft
        Date = 37694.9059555787
        Time = 37694.9059555787
        DateFormat = dfShort
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 1
      end
      object CheckBox1: TCheckBox
        Left = 102
        Top = 25
        Width = 105
        Height = 17
        Caption = #26143#26399#20845#21644#26143#26399#22825'   '
        TabOrder = 2
        OnClick = CheckBox1Click
      end
      object Panel1: TPanel
        Left = 264
        Top = 48
        Width = 235
        Height = 163
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 3
        object Label3: TLabel
          Left = 21
          Top = 28
          Width = 84
          Height = 13
          Caption = #19978#21320#19978#29677#26102#38388#65306
        end
        object Label4: TLabel
          Left = 21
          Top = 60
          Width = 84
          Height = 13
          Caption = #19978#21320#19979#29677#26102#38388#65306
        end
        object Label5: TLabel
          Left = 21
          Top = 92
          Width = 84
          Height = 13
          Caption = #19979#21320#19978#29677#26102#38388#65306
        end
        object Label6: TLabel
          Left = 21
          Top = 124
          Width = 84
          Height = 13
          Caption = #19979#21320#19979#29677#26102#38388#65306
        end
        object MaskEdit2: TMaskEdit
          Left = 112
          Top = 23
          Width = 97
          Height = 21
          EditMask = '!90:00:00;1;_'
          MaxLength = 8
          TabOrder = 0
          Text = '  :  :  '
        end
        object MaskEdit3: TMaskEdit
          Left = 112
          Top = 55
          Width = 97
          Height = 21
          EditMask = '!90:00:00;1;_'
          MaxLength = 8
          TabOrder = 1
          Text = '  :  :  '
        end
        object MaskEdit4: TMaskEdit
          Left = 112
          Top = 87
          Width = 97
          Height = 21
          EditMask = '!90:00:00;1;_'
          MaxLength = 8
          TabOrder = 2
          Text = '  :  :  '
        end
        object MaskEdit5: TMaskEdit
          Left = 112
          Top = 119
          Width = 97
          Height = 21
          EditMask = '!90:00:00;1;_'
          MaxLength = 8
          TabOrder = 3
          Text = '  :  :  '
        end
      end
      object BitBtn1: TBitBtn
        Left = 280
        Top = 232
        Width = 75
        Height = 25
        Caption = #20462#25913
        TabOrder = 4
        OnClick = BitBtn1Click
        Kind = bkOK
        Layout = blGlyphRight
      end
      object BitBtn2: TBitBtn
        Left = 408
        Top = 232
        Width = 89
        Height = 25
        Caption = #24674#22797#40664#35748#20540
        TabOrder = 5
        OnClick = BitBtn2Click
        Kind = bkRetry
        Layout = blGlyphRight
      end
      object MaskEdit1: TMaskEdit
        Left = 159
        Top = 0
        Width = 49
        Height = 21
        EditMask = '!0000-!90;1;_'
        MaxLength = 7
        TabOrder = 6
        Text = '    -  '
      end
    end
    object TabSheet2: TTabSheet
      Caption = #24037#36164#35745#31639#21442#25968#35774#32622
      ImageIndex = 1
      object Label7: TLabel
        Left = 14
        Top = 24
        Width = 189
        Height = 20
        Caption = #23454#21457#24037#36164' =  '#22522#26412#24037#36164'          '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label8: TLabel
        Left = 247
        Top = 24
        Width = 305
        Height = 20
        Caption = #65288#20803'/'#27599#23567#26102#65289#215' '#32047#35745#27491#24120#24037#20316#26102#38388'                '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label18: TLabel
        Left = 106
        Top = 56
        Width = 89
        Height = 20
        Caption = '+'#21152#29677#24037#36164'    '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label10: TLabel
        Left = 246
        Top = 56
        Width = 305
        Height = 20
        Caption = #65288#20803'/'#27599#23567#26102#65289#215' '#32047#35745#21152#29677#24037#20316#26102#38388'                '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label11: TLabel
        Left = 246
        Top = 89
        Width = 201
        Height = 20
        Caption = #65288#20803'/'#27599#22825#65289#215' '#20986#24046#22825#25968'          '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label12: TLabel
        Left = 180
        Top = 88
        Width = 25
        Height = 20
        Caption = '+    '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label13: TLabel
        Left = 180
        Top = 121
        Width = 22
        Height = 20
        Caption = '--   '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label19: TLabel
        Left = 247
        Top = 121
        Width = 245
        Height = 20
        Caption = #65288#20803'/'#27599#27425#65289#215' '#36831#21040#26089#36864#27425#25968'             '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label21: TLabel
        Left = 180
        Top = 153
        Width = 22
        Height = 20
        Caption = '--   '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label22: TLabel
        Left = 247
        Top = 153
        Width = 213
        Height = 20
        Caption = #65288#20803'/'#27599#27425#65289#215' '#26103#24037#27425#25968'             '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label15: TLabel
        Left = 179
        Top = 185
        Width = 311
        Height = 20
        Caption = '+ '#22870#37329#37329#39069'+'#31119#21033#37329#39069'+'#27941#36148#37329#39069'                      '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label23: TLabel
        Left = 178
        Top = 211
        Width = 162
        Height = 20
        Caption = '-- '#25187#21457' '#37329#39069'                    '
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object CSpinEdit1: TCSpinEdit
        Left = 203
        Top = 21
        Width = 49
        Height = 26
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        Value = 10
      end
      object BitBtn3: TBitBtn
        Left = 128
        Top = 248
        Width = 75
        Height = 25
        Caption = #20462#25913
        TabOrder = 1
        OnClick = BitBtn3Click
        Kind = bkOK
      end
      object BitBtn4: TBitBtn
        Left = 336
        Top = 248
        Width = 89
        Height = 25
        Caption = #24674#22797#40664#35748#20540
        TabOrder = 2
        OnClick = BitBtn4Click
        Kind = bkRetry
      end
      object CSpinEdit6: TCSpinEdit
        Left = 203
        Top = 53
        Width = 50
        Height = 26
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        Value = 20
      end
      object CSpinEdit2: TCSpinEdit
        Left = 202
        Top = 85
        Width = 50
        Height = 26
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        Value = 100
      end
      object CSpinEdit3: TCSpinEdit
        Left = 202
        Top = 117
        Width = 50
        Height = 26
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        Value = 50
      end
      object CSpinEdit4: TCSpinEdit
        Left = 202
        Top = 149
        Width = 50
        Height = 26
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 6
        Value = 100
      end
    end
  end
  inherited ImageList1: TImageList
    Left = 360
    Top = 40
  end
end