xjyftjfrm.dfm
来自「本人编写的有关军队营房工作的管理系统」· DFM 代码 · 共 666 行 · 第 1/2 页
DFM
666 行
object xjyftj: Txjyftj
Left = 224
Top = 191
BorderIcons = []
BorderStyle = bsDialog
Caption = #28155#21152#26032#33829#25151
ClientHeight = 481
ClientWidth = 670
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
ShowHint = True
PixelsPerInch = 96
TextHeight = 12
object Panel1: TPanel
Left = 0
Top = 0
Width = 670
Height = 449
Align = alClient
BevelInner = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label3: TLabel
Left = 16
Top = 24
Width = 60
Height = 12
Caption = #21333#20301#20195#30721#65306
end
object Label4: TLabel
Left = 262
Top = 24
Width = 60
Height = 12
Caption = #20303#29992#21333#20301#65306
end
object Label1: TLabel
Left = 16
Top = 80
Width = 60
Height = 12
Caption = #22352' '#33853' '#21495#65306
end
object Label2: TLabel
Left = 262
Top = 80
Width = 60
Height = 12
Caption = #26635' '#21495#65306
end
object Label5: TLabel
Left = 471
Top = 80
Width = 60
Height = 12
Caption = #25151#23627#29992#36884#65306
end
object Label24: TLabel
Left = 16
Top = 418
Width = 60
Height = 12
Caption = #22791' '#27880#65306
end
object dxLookupTreeView1: TdxLookupTreeView
Left = 80
Top = 19
Width = 161
Height = 20
Cursor = crHandPoint
Hint = #21333#20987#36873#25321#21333#20301#20195#30721
CanSelectParents = True
Color = clMoneyGreen
Ctl3D = True
DropDownRows = 12
DropDownWidth = 180
ParentColor = False
ParentCtl3D = False
TabOrder = 0
TabStop = True
TreeViewColor = clMoneyGreen
TreeViewCursor = crHandPoint
TreeViewFont.Charset = GB2312_CHARSET
TreeViewFont.Color = clWindowText
TreeViewFont.Height = -12
TreeViewFont.Name = #23435#20307
TreeViewFont.Style = []
TreeViewImages = ImageList2
TreeViewIndent = 19
TreeViewReadOnly = True
TreeViewShowButtons = True
TreeViewShowHint = True
TreeViewShowLines = True
TreeViewShowRoot = True
TreeViewSortType = stNone
OnCloseUp = dxLookupTreeView1CloseUp
DisplayField = #21333#20301#21517#31216
DividedChar = '.'
ListSource = yfgldata.Ddwqk
KeyField = #21333#20301#20195#30721
ListField = #21333#20301#20195#30721
Options = [trDBConfirmDelete, trCanDBNavigate, trSmartRecordCopy, trCheckHasChildren]
ParentField = #19978#32423#21333#20301#20195#30721
TextStyle = tvtsShort
Alignment = taLeftJustify
end
object Edit2: TEdit
Left = 328
Top = 19
Width = 329
Height = 20
Color = clMoneyGreen
ImeMode = imClose
ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
MaxLength = 50
ReadOnly = True
TabOrder = 1
end
object ComboBox1: TComboBox
Left = 80
Top = 75
Width = 161
Height = 20
Cursor = crHandPoint
Style = csDropDownList
Color = clMoneyGreen
ItemHeight = 12
MaxLength = 30
TabOrder = 2
end
object Edit1: TEdit
Left = 328
Top = 75
Width = 121
Height = 20
Color = clMoneyGreen
MaxLength = 6
TabOrder = 3
end
object Edit3: TEdit
Left = 536
Top = 75
Width = 121
Height = 20
Color = clMoneyGreen
ImeMode = imOpen
ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
MaxLength = 10
TabOrder = 4
end
object Edit12: TEdit
Left = 80
Top = 413
Width = 577
Height = 20
Color = clMoneyGreen
ImeMode = imOpen
ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
MaxLength = 30
TabOrder = 9
end
object GroupBox1: TGroupBox
Left = 16
Top = 120
Width = 641
Height = 49
Caption = #26032#24314#38754#31215
TabOrder = 5
object Label6: TLabel
Left = 8
Top = 23
Width = 60
Height = 12
Caption = #21512' '#35745#65306
end
object Label7: TLabel
Left = 246
Top = 23
Width = 60
Height = 12
Caption = #26032' '#24314#65306
end
object Label8: TLabel
Left = 454
Top = 23
Width = 60
Height = 12
Caption = #32763' '#24314#65306
end
object DBNumberEditEh1: TDBNumberEditEh
Left = 72
Top = 18
Width = 153
Height = 20
Color = clMoneyGreen
EditButton.Style = ebsUpDownEh
EditButton.Visible = True
EditButtons = <>
MaxValue = 999999999.000000000000000000
ReadOnly = True
TabOrder = 0
Value = 0.000000000000000000
Visible = True
end
object DBNumberEditEh2: TDBNumberEditEh
Left = 312
Top = 18
Width = 121
Height = 20
Color = clMoneyGreen
EditButton.Style = ebsUpDownEh
EditButton.Visible = True
EditButtons = <>
MaxValue = 999999999.000000000000000000
TabOrder = 1
Value = 0.000000000000000000
Visible = True
OnChange = DBNumberEditEh2Change
end
object DBNumberEditEh4: TDBNumberEditEh
Left = 520
Top = 18
Width = 113
Height = 20
Color = clMoneyGreen
EditButton.Style = ebsUpDownEh
EditButton.Visible = True
EditButtons = <>
MaxValue = 999999999.000000000000000000
TabOrder = 2
Value = 0.000000000000000000
Visible = True
OnChange = DBNumberEditEh4Change
end
end
object GroupBox2: TGroupBox
Left = 16
Top = 192
Width = 641
Height = 49
Caption = #24314#25151#20381#25454
TabOrder = 6
object Label9: TLabel
Left = 8
Top = 23
Width = 84
Height = 12
Caption = #19979#36798#20219#21153#21333#20301#65306
end
object Label10: TLabel
Left = 256
Top = 23
Width = 84
Height = 12
Caption = #19979#36798#20219#21153#24180#24230#65306
end
object Label11: TLabel
Left = 408
Top = 23
Width = 96
Height = 12
Caption = #19979#36798#20219#21153#25991#20214#21495#65306
end
object Edit4: TEdit
Left = 96
Top = 18
Width = 153
Height = 20
Color = clMoneyGreen
ImeMode = imOpen
ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
MaxLength = 30
TabOrder = 0
end
object DBNumberEditEh3: TDBNumberEditEh
Left = 344
Top = 18
Width = 57
Height = 20
Color = clMoneyGreen
EditButton.Style = ebsUpDownEh
EditButton.Visible = True
EditButtons = <>
MaxValue = 9999.000000000000000000
TabOrder = 1
Value = 2000.000000000000000000
Visible = True
end
object Edit5: TEdit
Left = 512
Top = 18
Width = 121
Height = 20
Color = clMoneyGreen
ImeMode = imOpen
ImeName = #20013#25991#20043#26143#26234#33021#29378#25340#8545#26631#20934#29256
MaxLength = 20
TabOrder = 2
end
end
object GroupBox3: TGroupBox
Left = 16
Top = 264
Width = 641
Height = 49
Caption = #32463#36153#26469#28304
TabOrder = 7
object Label12: TLabel
Left = 8
Top = 22
Width = 36
Height = 12
Caption = #25320#27454#65306
end
object Label13: TLabel
Left = 136
Top = 22
Width = 36
Height = 12
Caption = #38598#36164#65306
end
object Label14: TLabel
Left = 264
Top = 22
Width = 36
Height = 12
Caption = #25442#24314#65306
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?