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

📄 applyfrm.dfm

📁 结合读卡器使用。程序中有按迟到时间长短自动开罚单功能
💻 DFM
字号:
object ApplyForm: TApplyForm
  Left = 376
  Top = 140
  Width = 370
  Height = 468
  Caption = 'ApplyForm'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 6
    Top = 8
    Width = 351
    Height = 398
    ActivePage = TabSheet1
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabIndex = 0
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #31508#35760#26412#20351#29992#30003#35831
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      OnShow = TabSheet1Show
      object Label1: TLabel
        Left = 24
        Top = 184
        Width = 56
        Height = 14
        Caption = #30003#35831#26085#26399
      end
      object Label2: TLabel
        Left = 24
        Top = 218
        Width = 84
        Height = 14
        Caption = #26381#21153#23458#25143#21517#31216
      end
      object Label3: TLabel
        Left = 24
        Top = 252
        Width = 42
        Height = 14
        Caption = #20511#29992#20154
      end
      object Label4: TLabel
        Left = 24
        Top = 286
        Width = 28
        Height = 14
        Caption = #37329#39069
      end
      object Label5: TLabel
        Left = 24
        Top = 320
        Width = 42
        Height = 14
        Caption = #20511#20986#20154
      end
      object Image1: TImage
        Left = 21
        Top = 16
        Width = 177
        Height = 163
        Transparent = True
      end
      object DateTimePicker1: TDateTimePicker
        Left = 139
        Top = 177
        Width = 180
        Height = 22
        CalAlignment = dtaLeft
        Date = 38241.4329493982
        Time = 38241.4329493982
        DateFormat = dfShort
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 0
      end
      object Edit1: TEdit
        Left = 139
        Top = 211
        Width = 180
        Height = 22
        TabOrder = 1
        Text = 'Edit1'
      end
      object ComboBox1: TComboBox
        Left = 139
        Top = 245
        Width = 180
        Height = 22
        Enabled = False
        ItemHeight = 14
        TabOrder = 2
        Text = 'ComboBox1'
      end
      object Edit2: TEdit
        Left = 139
        Top = 279
        Width = 180
        Height = 22
        TabOrder = 3
        Text = 'Edit2'
      end
      object ComboBox2: TComboBox
        Left = 139
        Top = 313
        Width = 180
        Height = 22
        ItemHeight = 14
        TabOrder = 4
        Text = 'ComboBox2'
      end
    end
    object TabSheet2: TTabSheet
      Caption = #21046#20316#35201#27714#30003#35831
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ImageIndex = 1
      ParentFont = False
      OnShow = TabSheet2Show
      object Label6: TLabel
        Left = 19
        Top = 142
        Width = 56
        Height = 14
        Caption = #30003#35831#26085#26399
      end
      object Label7: TLabel
        Left = 19
        Top = 176
        Width = 84
        Height = 14
        Caption = #26381#21153#23458#25143#21517#31216
      end
      object Label9: TLabel
        Left = 19
        Top = 211
        Width = 56
        Height = 14
        Caption = #25293#25668#36153#29992
      end
      object Label10: TLabel
        Left = 182
        Top = 246
        Width = 42
        Height = 14
        Caption = #25910#27454#20154
      end
      object Label8: TLabel
        Left = 19
        Top = 277
        Width = 56
        Height = 14
        Caption = #21046#20316#35201#27714
      end
      object Label21: TLabel
        Left = 182
        Top = 211
        Width = 56
        Height = 14
        Caption = #21046#20316#36153#29992
      end
      object Label22: TLabel
        Left = 19
        Top = 246
        Width = 42
        Height = 14
        Caption = #30003#35831#20154
      end
      object DateTimePicker2: TDateTimePicker
        Left = 136
        Top = 138
        Width = 194
        Height = 22
        CalAlignment = dtaLeft
        Date = 38241.4329493982
        Time = 38241.4329493982
        DateFormat = dfShort
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 0
      end
      object Edit3: TEdit
        Left = 137
        Top = 172
        Width = 193
        Height = 22
        TabOrder = 1
        Text = 'Edit3'
      end
      object Edit4: TEdit
        Left = 83
        Top = 207
        Width = 82
        Height = 22
        TabOrder = 2
        Text = 'Edit4'
      end
      object ComboBox4: TComboBox
        Left = 248
        Top = 242
        Width = 82
        Height = 22
        ItemHeight = 14
        TabOrder = 3
        Text = 'ComboBox2'
      end
      object Edit9: TEdit
        Left = 248
        Top = 207
        Width = 82
        Height = 22
        TabOrder = 4
        Text = 'Edit9'
      end
      object Memo1: TMemo
        Left = 16
        Top = 295
        Width = 313
        Height = 67
        TabOrder = 5
      end
      object ComboBox3: TComboBox
        Left = 83
        Top = 242
        Width = 82
        Height = 22
        Enabled = False
        ItemHeight = 14
        TabOrder = 6
        Text = 'ComboBox3'
      end
    end
    object TabSheet3: TTabSheet
      Caption = #21051#24405#20809#30424#30003#35831
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ImageIndex = 2
      ParentFont = False
      OnShow = TabSheet3Show
      object Label11: TLabel
        Left = 24
        Top = 184
        Width = 56
        Height = 14
        Caption = #30003#35831#26085#26399
      end
      object Label12: TLabel
        Left = 24
        Top = 218
        Width = 84
        Height = 14
        Caption = #26381#21153#23458#25143#21517#31216
      end
      object Label13: TLabel
        Left = 24
        Top = 252
        Width = 42
        Height = 14
        Caption = #30003#35831#20154
      end
      object Label14: TLabel
        Left = 24
        Top = 286
        Width = 28
        Height = 14
        Caption = #37329#39069
      end
      object Label15: TLabel
        Left = 24
        Top = 320
        Width = 42
        Height = 14
        Caption = #25910#27454#20154
      end
      object DateTimePicker3: TDateTimePicker
        Left = 139
        Top = 177
        Width = 180
        Height = 22
        CalAlignment = dtaLeft
        Date = 38241.4329493982
        Time = 38241.4329493982
        DateFormat = dfShort
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 0
      end
      object Edit5: TEdit
        Left = 139
        Top = 211
        Width = 180
        Height = 22
        TabOrder = 1
        Text = 'Edit5'
      end
      object ComboBox5: TComboBox
        Left = 139
        Top = 245
        Width = 180
        Height = 22
        Enabled = False
        ItemHeight = 14
        TabOrder = 2
        Text = 'ComboBox5'
      end
      object Edit6: TEdit
        Left = 139
        Top = 279
        Width = 180
        Height = 22
        TabOrder = 3
        Text = 'Edit6'
      end
      object ComboBox6: TComboBox
        Left = 139
        Top = 313
        Width = 180
        Height = 22
        ItemHeight = 14
        TabOrder = 4
        Text = 'ComboBox6'
      end
    end
    object TabSheet4: TTabSheet
      Caption = #31456#31614#20351#29992#30003#35831
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ImageIndex = 3
      ParentFont = False
      OnShow = TabSheet4Show
      object Label16: TLabel
        Left = 26
        Top = 189
        Width = 56
        Height = 14
        Caption = #30003#35831#26085#26399
      end
      object Label17: TLabel
        Left = 26
        Top = 221
        Width = 56
        Height = 14
        Caption = #31456#31614#21517#31216
      end
      object Label18: TLabel
        Left = 26
        Top = 254
        Width = 42
        Height = 14
        Caption = #20511#29992#20154
      end
      object Label19: TLabel
        Left = 26
        Top = 287
        Width = 28
        Height = 14
        Caption = #20107#30001
      end
      object Label20: TLabel
        Left = 26
        Top = 320
        Width = 42
        Height = 14
        Caption = #32463#21150#20154
      end
      object DateTimePicker4: TDateTimePicker
        Left = 139
        Top = 182
        Width = 180
        Height = 22
        CalAlignment = dtaLeft
        Date = 38241.4329493982
        Time = 38241.4329493982
        DateFormat = dfShort
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 0
      end
      object Edit7: TEdit
        Left = 139
        Top = 214
        Width = 180
        Height = 22
        TabOrder = 1
        Text = 'Edit7'
      end
      object ComboBox7: TComboBox
        Left = 139
        Top = 247
        Width = 180
        Height = 22
        Enabled = False
        ItemHeight = 14
        TabOrder = 2
        Text = 'ComboBox7'
      end
      object Edit8: TEdit
        Left = 139
        Top = 280
        Width = 180
        Height = 22
        TabOrder = 3
        Text = 'Edit8'
      end
      object ComboBox8: TComboBox
        Left = 139
        Top = 313
        Width = 180
        Height = 22
        ItemHeight = 14
        TabOrder = 4
        Text = 'ComboBox8'
      end
    end
  end
  object BitBtn5: TBitBtn
    Left = 257
    Top = 410
    Width = 84
    Height = 28
    Caption = #36820#22238
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ModalResult = 2
    ParentFont = False
    TabOrder = 1
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
      03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
      0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
      0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
      0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
      0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
      0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
      0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
      0333337F777FFFFF7F3333000000000003333377777777777333}
    NumGlyphs = 2
  end
  object BitBtn1: TBitBtn
    Left = 166
    Top = 410
    Width = 87
    Height = 28
    Caption = #30830#23450
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ModalResult = 1
    ParentFont = False
    TabOrder = 2
    OnClick = BitBtn1Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      555555555555555555555555555555555555555555FF55555555555559055555
      55555555577FF5555555555599905555555555557777F5555555555599905555
      555555557777FF5555555559999905555555555777777F555555559999990555
      5555557777777FF5555557990599905555555777757777F55555790555599055
      55557775555777FF5555555555599905555555555557777F5555555555559905
      555555555555777FF5555555555559905555555555555777FF55555555555579
      05555555555555777FF5555555555557905555555555555777FF555555555555
      5990555555555555577755555555555555555555555555555555}
    NumGlyphs = 2
  end
end

⌨️ 快捷键说明

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