📄 u_handexception.dfm

📁 小型劳资管理系统,用visual basic+access编写
💻 DFM
📖 第 1 页 / 共 2 页
字号:
上一页 12
    end
  end
  object GroupBox3: TGroupBox
    Left = 392
    Top = 32
    Width = 193
    Height = 129
    Caption = #21152#29677
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -15
    Font.Name = #20223#23435'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    object GroupBox8: TGroupBox
      Left = 8
      Top = 16
      Width = 81
      Height = 105
      Caption = #19978#29677
      TabOrder = 0
      object Label13: TLabel
        Left = 16
        Top = 16
        Width = 28
        Height = 13
        Caption = #26102#38388
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = #26999#20307'_GB2312'
        Font.Style = []
        ParentFont = False
      end
      object Label14: TLabel
        Left = 16
        Top = 56
        Width = 28
        Height = 13
        Caption = #26631#35782
        Font.Charset = GB2312_CHARSET
        Font.Color = clPurple
        Font.Height = -13
        Font.Name = #26999#20307'_GB2312'
        Font.Style = []
        ParentFont = False
      end
      object DBEdit9: TDBEdit
        Left = 8
        Top = 32
        Width = 57
        Height = 23
        DataField = 'eveningup'
        DataSource = DataSource1
        TabOrder = 0
        OnExit = DBEdit9Exit
      end
      object DBEdit10: TDBEdit
        Left = 16
        Top = 72
        Width = 49
        Height = 23
        DataField = 'char5'
        DataSource = DataSource1
        TabOrder = 1
      end
    end
    object GroupBox9: TGroupBox
      Left = 96
      Top = 16
      Width = 89
      Height = 105
      Caption = #19979#29677
      TabOrder = 1
      object Label15: TLabel
        Left = 24
        Top = 16
        Width = 28
        Height = 13
        Caption = #26102#38388
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = #26999#20307'_GB2312'
        Font.Style = []
        ParentFont = False
      end
      object Label16: TLabel
        Left = 16
        Top = 56
        Width = 35
        Height = 13
        Caption = ' '#26631#35782
        Font.Charset = GB2312_CHARSET
        Font.Color = clPurple
        Font.Height = -13
        Font.Name = #26999#20307'_GB2312'
        Font.Style = []
        ParentFont = False
      end
      object DBEdit11: TDBEdit
        Left = 8
        Top = 32
        Width = 65
        Height = 23
        DataField = 'eveningdown'
        DataSource = DataSource1
        TabOrder = 0
        OnExit = DBEdit11Exit
      end
      object DBEdit12: TDBEdit
        Left = 16
        Top = 72
        Width = 49
        Height = 23
        DataField = 'char6'
        DataSource = DataSource1
        TabOrder = 1
      end
    end
  end
  object GroupBox10: TGroupBox
    Left = 16
    Top = 160
    Width = 569
    Height = 41
    TabOrder = 4
    object button1: TSpeedButton
      Left = 16
      Top = 8
      Width = 97
      Height = 25
      Caption = #19978#31227#25968#25454
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -13
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777777777777777777777777777777777777700000777777777770666077
        7777777770666077777777777066607777777700006660000777777066666660
        7777777706666607777777777066607777777777770607777777777777707777
        7777777777777777777777777777777777777777777777777777}
      ParentFont = False
      OnClick = Button1Click
    end
    object button2: TSpeedButton
      Left = 144
      Top = 8
      Width = 105
      Height = 25
      Caption = #19979#31227#25968#25454
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -13
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777777777777777777777777777777777777777777777777777777707777
        7777777777060777777777777066607777777777066666077777777066666660
        7777770000666000077777777066607777777777706660777777777770666077
        7777777770000077777777777777777777777777777777777777}
      ParentFont = False
      OnClick = Button2Click
    end
    object bitbtn2: TSpeedButton
      Left = 448
      Top = 8
      Width = 105
      Height = 25
      Caption = #19979#19968#26465
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -15
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777777777777777777777777777777777777777077777777777777700777
        7777777777706077777777700000660777777770666666607777777066666666
        0777777066666660777777700000660777777777777060777777777777700777
        7777777777707777777777777777777777777777777777777777}
      ParentFont = False
      OnClick = BitBtn2Click
    end
    object bitbtn1: TSpeedButton
      Left = 296
      Top = 8
      Width = 105
      Height = 25
      Caption = #19978#19968#26465
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -15
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
        7777777777777777777777777777777777777777777707777777777777700777
        7777777777060777777777777066000007777777066666660777777066666666
        0777777706666666077777777066000007777777770607777777777777700777
        7777777777770777777777777777777777777777777777777777}
      ParentFont = False
      OnClick = BitBtn1Click
    end
  end
  object BitBtn4: TBitBtn
    Left = 40
    Top = 288
    Width = 89
    Height = 33
    Caption = #30830#23450
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -15
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnClick = BitBtn4Click
    Kind = bkOK
  end
  object BitBtn5: TBitBtn
    Left = 40
    Top = 336
    Width = 89
    Height = 33
    Caption = #21462#28040
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -15
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnClick = BitBtn5Click
    Kind = bkCancel
  end
  object BitBtn3: TBitBtn
    Left = 40
    Top = 240
    Width = 89
    Height = 33
    Caption = #25163#21160#28155#21152
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -15
    Font.Name = #26999#20307'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    OnClick = BitBtn3Click
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      04000000000080000000120B0000120B00001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777777777777777777777777777777777777777777777777777777777700077
      7777777777706077777777777770607777777777000060000777777706666666
      0777777700006000077777777770607777777777777060777777777777700077
      7777777777777777777777777777777777777777777777777777}
  end
  object button3: TBitBtn
    Left = 440
    Top = 240
    Width = 75
    Height = 25
    Caption = #21069#19968#22825
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -15
    Font.Name = #20223#23435'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 8
    OnClick = Button3Click
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      04000000000080000000120B0000120B00001000000010000000000000000000
      BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
      DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD8888
      DDDDDDDDDDD0000DDDDDDDDDDD0000DDDDDDDDDDD000DDDDDDDDDDDD000888DD
      DDDDDDDDD000888DDDDDDDDDDD000088DDDDDDDDDDD0000DDDDDDDDDDDDDDDDD
      DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
  end
  object button4: TBitBtn
    Left = 440
    Top = 280
    Width = 75
    Height = 25
    Caption = #21518#19968#22825
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -15
    Font.Name = #20223#23435'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 9
    OnClick = Button4Click
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      04000000000080000000120B0000120B00001000000010000000000000000000
      BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
      DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD8888DD
      DDDDDDDDD000888DDDDDDDDDDD000088DDDDDDDDDDD000088DDDDDDDDDDD0000
      DDDDDDDDDDD0000DDDDDDDDDDD0000DDDDDDDDDDD000DDDDDDDDDDDDDDDDDDDD
      DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
  end
  object button5: TBitBtn
    Left = 440
    Top = 328
    Width = 75
    Height = 25
    Caption = #36864#20986
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -15
    Font.Name = #20223#23435'_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 10
    OnClick = Button5Click
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 200
    Top = 280
  end
  object Ds_kqdata: TDataSource
    DataSet = DM.QV_lookupkqdata
    Left = 272
    Top = 272
  end
  object Query1: TQuery
    CachedUpdates = True
    AfterPost = Query1AfterPost
    DatabaseName = 'person_DB'
    RequestLive = True
    SQL.Strings = (
      'select * from bktimestable')
    Left = 248
    Top = 272
    object Query1cardnum: TStringField
      FieldName = 'cardnum'
      Origin = 'PERSON_DB.bktimestable.cardnum'
      FixedChar = True
      Size = 10
    end
    object Query1workday: TDateTimeField
      FieldName = 'workday'
      Origin = 'PERSON_DB.bktimestable.workday'
    end
    object Query1moringup: TIntegerField
      FieldName = 'moringup'
      Origin = 'PERSON_DB.bktimestable.moringup'
      DisplayFormat = '00:00'
    end
    object Query1char1: TStringField
      FieldName = 'char1'
      Origin = 'PERSON_DB.bktimestable.char1'
      FixedChar = True
      Size = 1
    end
    object Query1moringdown: TIntegerField
      FieldName = 'moringdown'
      Origin = 'PERSON_DB.bktimestable.moringdown'
      DisplayFormat = '00:00'
    end
    object Query1char2: TStringField
      FieldName = 'char2'
      Origin = 'PERSON_DB.bktimestable.char2'
      FixedChar = True
      Size = 1
    end
    object Query1afternoonup: TIntegerField
      FieldName = 'afternoonup'
      Origin = 'PERSON_DB.bktimestable.afternoonup'
      DisplayFormat = '00:00'
    end
    object Query1char3: TStringField
      FieldName = 'char3'
      Origin = 'PERSON_DB.bktimestable.char3'
      FixedChar = True
      Size = 1
    end
    object Query1afternoondown: TIntegerField
      FieldName = 'afternoondown'
      Origin = 'PERSON_DB.bktimestable.afternoondown'
      DisplayFormat = '00:00'
    end
    object Query1char4: TStringField
      FieldName = 'char4'
      Origin = 'PERSON_DB.bktimestable.char4'
      FixedChar = True
      Size = 1
    end
    object Query1eveningup: TIntegerField
      FieldName = 'eveningup'
      Origin = 'PERSON_DB.bktimestable.eveningup'
      DisplayFormat = '00:00'
    end
    object Query1char5: TStringField
      FieldName = 'char5'
      Origin = 'PERSON_DB.bktimestable.char5'
      FixedChar = True
      Size = 1
    end
    object Query1eveningdown: TIntegerField
      FieldName = 'eveningdown'
      Origin = 'PERSON_DB.bktimestable.eveningdown'
      DisplayFormat = '00:00'
    end
    object Query1char6: TStringField
      FieldName = 'char6'
      Origin = 'PERSON_DB.bktimestable.char6'
      FixedChar = True
      Size = 1
    end
    object Query1exceptionclass: TStringField
      FieldName = 'exceptionclass'
      Origin = 'PERSON_DB.bktimestable.exceptionclass'
      FixedChar = True
    end
    object Query1teamsid: TIntegerField
      FieldName = 'teamsid'
      Origin = 'PERSON_DB.bktimestable.teamsid'
    end
    object Query1empid: TIntegerField
      FieldName = 'empid'
      Origin = 'PERSON_DB.bktimestable.empid'
    end
  end
end
上一页 12
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -