cjxxpas.~dfm

来自「本软件是一套功能完整成熟的固定资产管理系统,具有固定资产管理系统的相应全部功能」· ~DFM 代码 · 共 492 行

~DFM
492 行
字号 
object w_zccjxx: Tw_zccjxx
  Left = 158
  Top = 109
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #22266#23450#36164#20135#20986#20511#31383#21475
  ClientHeight = 250
  ClientWidth = 565
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 565
    Height = 97
    Align = alTop
    Caption = #22266#23450#36164#20135#22522#26412#20449#24687
    Enabled = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clRed
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label2: TLabel
      Left = 8
      Top = 20
      Width = 48
      Height = 12
      Caption = #36164#20135#31867#21035
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 192
      Top = 20
      Width = 48
      Height = 12
      Caption = #21517'    '#31216
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 376
      Top = 23
      Width = 48
      Height = 12
      Caption = #22411'    '#21495
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 8
      Top = 47
      Width = 48
      Height = 12
      Caption = #29992'    '#36884
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 192
      Top = 47
      Width = 48
      Height = 12
      Caption = #20379' '#24212' '#21830
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 192
      Top = 68
      Width = 48
      Height = 12
      Caption = #24207' '#21015' '#21495
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 376
      Top = 73
      Width = 48
      Height = 12
      Caption = #37197'    '#32622
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 8
      Top = 68
      Width = 48
      Height = 12
      Caption = #36141#20080#26085#26399
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label10: TLabel
      Left = 376
      Top = 44
      Width = 48
      Height = 12
      Caption = #20351' '#29992' '#32773
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object DBEdit1: TDBEdit
      Left = 64
      Top = 16
      Width = 121
      Height = 20
      DataField = 'zclb'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 248
      Top = 16
      Width = 121
      Height = 20
      DataField = 'zcmc'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 432
      Top = 16
      Width = 121
      Height = 20
      DataField = 'zcxh'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
    end
    object DBEdit4: TDBEdit
      Left = 432
      Top = 40
      Width = 121
      Height = 20
      DataField = 'zyxm'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 3
    end
    object DBEdit5: TDBEdit
      Left = 432
      Top = 64
      Width = 121
      Height = 20
      DataField = #37197#32622
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 4
    end
    object DBEdit6: TDBEdit
      Left = 248
      Top = 40
      Width = 121
      Height = 20
      DataField = 'gys'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
    end
    object DBEdit7: TDBEdit
      Left = 248
      Top = 64
      Width = 121
      Height = 20
      DataField = #24207#21015#21495
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 6
    end
    object DBEdit8: TDBEdit
      Left = 64
      Top = 40
      Width = 121
      Height = 20
      DataField = 'zcyt'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 7
    end
    object DBEdit9: TDBEdit
      Left = 64
      Top = 64
      Width = 121
      Height = 20
      DataField = #36141#20080#26085#26399
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 8
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 97
    Width = 565
    Height = 104
    Align = alTop
    Caption = #22266#23450#36164#20135#20986#20511#20449#24687
    Font.Charset = ANSI_CHARSET
    Font.Color = clRed
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Label9: TLabel
      Left = 8
      Top = 22
      Width = 48
      Height = 12
      Caption = #32463' '#25163' '#20154
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 192
      Top = 22
      Width = 48
      Height = 12
      Caption = #20511' '#29992' '#20154
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label12: TLabel
      Left = 376
      Top = 22
      Width = 48
      Height = 12
      Caption = #20511#29992#26085#26399
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label13: TLabel
      Left = 8
      Top = 47
      Width = 48
      Height = 12
      Caption = #24402#36824#26085#26399
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label14: TLabel
      Left = 192
      Top = 47
      Width = 48
      Height = 12
      Caption = #20511#29992#22320#28857
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label16: TLabel
      Left = 8
      Top = 77
      Width = 48
      Height = 12
      Caption = #22791'    '#27880
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object jyrq: TDateTimePicker
      Left = 432
      Top = 16
      Width = 121
      Height = 20
      CalAlignment = dtaLeft
      Date = 37335.5584421644
      Time = 37335.5584421644
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 2
    end
    object lhrq: TDateTimePicker
      Left = 64
      Top = 40
      Width = 121
      Height = 20
      CalAlignment = dtaLeft
      Date = 37335.5584421644
      Time = 37335.5584421644
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 3
    end
    object jyr: TEdit
      Left = 248
      Top = 16
      Width = 121
      Height = 20
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object jydd: TEdit
      Left = 248
      Top = 40
      Width = 305
      Height = 20
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 4
    end
    object bz: TMemo
      Left = 64
      Top = 72
      Width = 489
      Height = 20
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
    end
    object jsr: TComboBox
      Left = 64
      Top = 16
      Width = 121
      Height = 20
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 0
      OnKeyPress = jsrKeyPress
    end
  end
  object Button1: TButton
    Left = 168
    Top = 216
    Width = 75
    Height = 25
    Caption = #30830#35748'(&Y)'
    TabOrder = 2
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 328
    Top = 216
    Width = 75
    Height = 25
    Caption = #21462#28040'(&C)'
    ModalResult = 2
    TabOrder = 3
  end
  object DataSource1: TDataSource
    DataSet = hjzcdata.wcjzccx
    Left = 192
    Top = 16
  end
  object lscx: TADOQuery
    Connection = hjzcdata.hjzcdatabase
    Parameters = <>
    Left = 56
    Top = 208
  end
end

cjxxpas.~dfm - 源码说明

本页面展示了「本软件是一套功能完整成熟的固定资产管理系统,具有固定资产管理系统的相应全部功能」中的 cjxxpas.~dfm 源码文件，采用 ~DFM 编程语言编写，共 492 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与管理系统相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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