⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mc_pbcx.~dfm

📁 1、系统环境要求:所有程序均在Windows98/XP操作系统下测试运行。 2、建议用户在系统上安装DELPHI7.0企业版。 3、如果数据库为SQL Server数据库
💻 ~DFM
📖 第 1 页 / 共 2 页
字号:
      Caption = '执勤目的:'
      FocusControl = DBEdit3
    end
    object Label6: TLabel
      Left = 7
      Top = 67
      Width = 60
      Height = 12
      Caption = '执勤岗位:'
      FocusControl = DBEdit4
    end
    object Label7: TLabel
      Left = 7
      Top = 139
      Width = 60
      Height = 12
      Caption = '巡逻路线:'
      FocusControl = DBEdit7
    end
    object Label8: TLabel
      Left = 251
      Top = 19
      Width = 60
      Height = 12
      Caption = '当发生事:'
      FocusControl = DBMemo1
    end
    object Label9: TLabel
      Left = 7
      Top = 115
      Width = 84
      Height = 12
      Caption = '事故处理情况:'
      FocusControl = DBEdit8
    end
    object Label10: TLabel
      Left = 7
      Top = 91
      Width = 36
      Height = 12
      Caption = '日期:'
      FocusControl = DBEdit9
    end
    object DBEdit1: TDBEdit
      Left = 65
      Top = 15
      Width = 55
      Height = 20
      DataField = '编号'
      DataSource = DataSource1
      TabOrder = 0
      OnEnter = DBEdit1Enter
      OnExit = DBEdit1Exit
      OnKeyPress = DBEdit1KeyPress
    end
    object DBEdit2: TDBEdit
      Left = 171
      Top = 15
      Width = 64
      Height = 20
      DataField = '执勤人'
      DataSource = DataSource1
      ImeName = '王码五笔型'
      TabOrder = 1
      OnEnter = DBEdit1Enter
      OnExit = DBEdit1Exit
      OnKeyPress = DBEdit1KeyPress
    end
    object DBEdit3: TDBEdit
      Left = 65
      Top = 39
      Width = 259
      Height = 20
      DataField = '执勤目的'
      DataSource = DataSource1
      ImeName = '王码五笔型'
      TabOrder = 2
      OnEnter = DBEdit1Enter
      OnExit = DBEdit1Exit
      OnKeyPress = DBEdit1KeyPress
    end
    object DBEdit4: TDBEdit
      Left = 65
      Top = 63
      Width = 259
      Height = 20
      DataField = '执勤岗位'
      DataSource = DataSource1
      ImeName = '王码五笔型'
      TabOrder = 3
      OnEnter = DBEdit1Enter
      OnExit = DBEdit1Exit
      OnKeyPress = DBEdit1KeyPress
    end
    object DBEdit7: TDBEdit
      Left = 65
      Top = 135
      Width = 259
      Height = 20
      DataField = '巡逻路线'
      DataSource = DataSource1
      ImeName = '王码五笔型'
      TabOrder = 6
      OnEnter = DBEdit1Enter
      OnExit = DBEdit1Exit
      OnKeyPress = DBEdit1KeyPress
    end
    object DBMemo1: TDBMemo
      Left = 332
      Top = 16
      Width = 201
      Height = 140
      DataField = '当发生事'
      DataSource = DataSource1
      ImeName = '王码五笔型'
      TabOrder = 7
      OnEnter = DBMemo1Enter
      OnExit = DBMemo1Exit
    end
    object DBEdit8: TDBEdit
      Left = 89
      Top = 111
      Width = 115
      Height = 20
      DataField = '事故处理情况'
      DataSource = DataSource1
      ImeName = '王码五笔型'
      TabOrder = 5
      OnEnter = DBEdit1Enter
      OnExit = DBEdit1Exit
      OnKeyPress = DBEdit1KeyPress
    end
    object DBEdit9: TDBEdit
      Left = 65
      Top = 87
      Width = 112
      Height = 20
      DataField = '日期'
      DataSource = DataSource1
      MaxLength = 10
      TabOrder = 4
      OnEnter = DBEdit1Enter
      OnExit = DBEdit1Exit
      OnKeyPress = DBEdit1KeyPress
    end
    object BitBtn5: TBitBtn
      Left = 180
      Top = 85
      Width = 75
      Height = 25
      Caption = '保存[&S]'
      TabOrder = 8
      OnClick = BitBtn5Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333330000333333333333333333333333F33333333333
        00003333344333333333333333388F3333333333000033334224333333333333
        338338F3333333330000333422224333333333333833338F3333333300003342
        222224333333333383333338F3333333000034222A22224333333338F338F333
        8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
        33333338F83338F338F33333000033A33333A222433333338333338F338F3333
        0000333333333A222433333333333338F338F33300003333333333A222433333
        333333338F338F33000033333333333A222433333333333338F338F300003333
        33333333A222433333333333338F338F00003333333333333A22433333333333
        3338F38F000033333333333333A223333333333333338F830000333333333333
        333A333333333333333338330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
    object BitBtn6: TBitBtn
      Left = 255
      Top = 85
      Width = 75
      Height = 25
      Caption = '取消[&Q]'
      TabOrder = 9
      OnClick = BitBtn6Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333FFFFF333333000033333388888833333333333F888888FFF333
        000033338811111188333333338833FFF388FF33000033381119999111833333
        38F338888F338FF30000339119933331111833338F388333383338F300003391
        13333381111833338F8F3333833F38F3000039118333381119118338F38F3338
        33F8F38F000039183333811193918338F8F333833F838F8F0000391833381119
        33918338F8F33833F8338F8F000039183381119333918338F8F3833F83338F8F
        000039183811193333918338F8F833F83333838F000039118111933339118338
        F3833F83333833830000339111193333391833338F33F8333FF838F300003391
        11833338111833338F338FFFF883F83300003339111888811183333338FF3888
        83FF83330000333399111111993333333388FFFFFF8833330000333333999999
        3333333333338888883333330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 381
    Top = 110
  end
  object Query1: TQuery
    Active = True
    DatabaseName = 'WYGL'
    RequestLive = True
    SQL.Strings = (
      'Select * from 排班表')
    Left = 381
    Top = 142
    object Query1BDEDesigner: TIntegerField
      FieldName = '编号'
      Origin = 'WYGL.排班表.编号'
    end
    object Query1BDEDesigner2: TStringField
      FieldName = '执勤人'
      Origin = 'WYGL.排班表.执勤人'
      FixedChar = True
      Size = 10
    end
    object Query1BDEDesigner3: TStringField
      FieldName = '执勤目的'
      Origin = 'WYGL.排班表.执勤目的'
      FixedChar = True
      Size = 50
    end
    object Query1BDEDesigner4: TStringField
      FieldName = '执勤岗位'
      Origin = 'WYGL.排班表.执勤岗位'
      FixedChar = True
      Size = 50
    end
    object Query1BDEDesigner5: TStringField
      FieldName = '巡逻路线'
      Origin = 'WYGL.排班表.巡逻路线'
      FixedChar = True
      Size = 50
    end
    object Query1BDEDesigner6: TMemoField
      FieldName = '当发生事'
      Origin = 'WYGL.排班表.当发生事'
      BlobType = ftMemo
      Size = 1
    end
    object Query1BDEDesigner7: TStringField
      FieldName = '事故处理情况'
      Origin = 'WYGL.排班表.事故处理情况'
      FixedChar = True
    end
    object Query1BDEDesigner8: TDateTimeField
      FieldName = '日期'
      Origin = 'WYGL.排班表.日期'
    end
  end
end

⌨️ 快捷键说明

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