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

📄 yxxx_view_pas.dfm

📁 delphi6.0电子寻更源程序,用来计算保安有无查抄
💻 DFM
📖 第 1 页 / 共 4 页
字号:
object yxxx_view: Tyxxx_view
  Left = 208
  Top = 105
  Width = 772
  Height = 450
  BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
  Caption = '有效資訊查詢'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 764
    Height = 80
    Align = alTop
    Color = clInactiveBorder
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label1: TLabel
      Left = 5
      Top = 28
      Width = 26
      Height = 13
      Caption = '線路'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 5
      Top = 57
      Width = 39
      Height = 13
      Caption = '巡更員'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 156
      Top = 28
      Width = 26
      Height = 13
      Caption = '班次'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 156
      Top = 57
      Width = 26
      Height = 13
      Caption = '筆號'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object DBLookupComboBox3: TDBLookupComboBox
      Left = 48
      Top = 49
      Width = 102
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ImeName = '中文 (简体) - 微软拼音'
      KeyField = 'CODE'
      ListField = 'code;number;NAME;'
      ListFieldIndex = 2
      ListSource = dm_yxxx_view.ds_worker
      ParentFont = False
      TabOrder = 1
    end
    object GroupBox1: TGroupBox
      Left = 259
      Top = 4
      Width = 148
      Height = 73
      Caption = '巡更點資訊'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      object Label5: TLabel
        Left = 8
        Top = 24
        Width = 39
        Height = 13
        Caption = '巡更點'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 8
        Top = 53
        Width = 33
        Height = 13
        Caption = '設 備'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object DBLookupComboBox2: TDBLookupComboBox
        Left = 52
        Top = 16
        Width = 93
        Height = 21
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        ImeName = '中文 (简体) - 微软拼音'
        KeyField = 'node'
        ListField = 'node;lseq'
        ListSource = dm_yxxx_view.ds_point
        ParentFont = False
        TabOrder = 0
      end
      object DBLookupComboBox4: TDBLookupComboBox
        Left = 52
        Top = 45
        Width = 93
        Height = 21
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        ImeName = '中文 (简体) - 微软拼音'
        KeyField = 'node'
        ListField = 'NAME;nodeplace'
        ListSource = dm_yxxx_view.ds_point
        ParentFont = False
        TabOrder = 1
      end
    end
    object GroupBox2: TGroupBox
      Left = 407
      Top = 4
      Width = 169
      Height = 73
      Caption = '日期範圍'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      object Label7: TLabel
        Left = 7
        Top = 22
        Width = 52
        Height = 13
        Caption = '起始日期'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label8: TLabel
        Left = 6
        Top = 52
        Width = 52
        Height = 13
        Caption = '截止日期'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object DateEdit1: TDateEdit
        Left = 64
        Top = 18
        Width = 101
        Height = 21
        DefaultToday = True
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        ButtonWidth = 20
        ImeName = '中文 (简体) - 微软拼音'
        NumGlyphs = 2
        ParentFont = False
        Weekends = [Sun, Sat]
        YearDigits = dyFour
        TabOrder = 0
        Text = '2001-09-13'
        OnExit = DateEdit1Exit
      end
      object DateEdit2: TDateEdit
        Left = 64
        Top = 48
        Width = 101
        Height = 21
        DefaultToday = True
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        ButtonWidth = 20
        ImeName = '中文 (简体) - 微软拼音'
        NumGlyphs = 2
        ParentFont = False
        Weekends = []
        TabOrder = 1
        Text = '2000-08-17'
        OnExit = DateEdit2Exit
      end
    end
    object GroupBox3: TGroupBox
      Left = 576
      Top = 4
      Width = 95
      Height = 73
      Caption = '巡更狀態'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      object RadioButton1: TRadioButton
        Left = 7
        Top = 16
        Width = 71
        Height = 17
        Caption = '正常'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
      end
      object RadioButton2: TRadioButton
        Left = 7
        Top = 52
        Width = 75
        Height = 17
        Caption = '異常'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
      end
      object RadioButton3: TRadioButton
        Left = 7
        Top = 34
        Width = 76
        Height = 17
        Caption = '不明'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
      end
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 48
      Top = 20
      Width = 103
      Height = 21
      DropDownWidth = 200
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ImeName = '中文 (简体) - 微软拼音'
      KeyField = 'linename'
      ListField = 'linename'
      ListSource = dm_yxxx_view.ds_line
      ParentFont = False
      TabOrder = 0
    end
    object DBLookupComboBox5: TDBLookupComboBox
      Left = 188
      Top = 20
      Width = 71
      Height = 21
      DropDownWidth = 200
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ImeName = '中文 (简体) - 微软拼音'
      KeyField = 'shifts'
      ListField = 'shifts'
      ListSource = dm_yxxx_view.ds_shifts
      ParentFont = False
      TabOrder = 2
    end
    object Edit1: TEdit
      Left = 188
      Top = 49
      Width = 71
      Height = 21
      CharCase = ecUpperCase
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ImeName = '中文 (简体) - 微软拼音'
      MaxLength = 2
      ParentFont = False
      TabOrder = 3
      Text = 'EDIT1'
    end
    object BitBtn12: TBitBtn
      Left = 675
      Top = 46
      Width = 84
      Height = 26
      Cursor = crHandPoint
      BiDiMode = bdLeftToRight
      Caption = '重置(&R)'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentBiDiMode = False
      ParentFont = False
      TabOrder = 8
      OnClick = BitBtn12Click
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
        33333333333F8888883F33330000324334222222443333388F3833333388F333
        000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
        F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
        223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
        3338888300003AAAAAAA33333333333888888833333333330000333333333333
        333333333333333333FFFFFF000033333333333344444433FFFF333333888888
        00003A444333333A22222438888F333338F3333800003A2243333333A2222438
        F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
        22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
        33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
        3333333333338888883333330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
      Spacing = 0
    end
    object BitBtn11: TBitBtn
      Left = 676
      Top = 11
      Width = 84
      Height = 26
      Cursor = crHandPoint
      BiDiMode = bdLeftToRight
      Caption = '查詢(&S)'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentBiDiMode = False
      ParentFont = False
      TabOrder = 7
      OnClick = BitBtn11Click

⌨️ 快捷键说明

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