📄 unitobligatefm.dfm
字号:
object frmUnitObligate: TfrmUnitObligate
Left = 178
Top = 275
BorderIcons = []
BorderStyle = bsDialog
Caption = #21333#20803#39044#30041#20449#24687#32534#36753#31383#21475
ClientHeight = 372
ClientWidth = 748
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poMainFormCenter
Visible = True
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object AALabel1: TLabel
Left = 45
Top = 5
Width = 52
Height = 13
Caption = #20844#21496#32534#21495
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object DBText1: TDBText
Left = 109
Top = 5
Width = 166
Height = 19
DataField = #20844#21496#32534#21495
DataSource = frmViewUnit.DataSource1
Transparent = True
end
object AALabel2: TLabel
Left = 430
Top = 5
Width = 52
Height = 13
Caption = #20844#21496#21517#31216
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object DBText2: TDBText
Left = 493
Top = 5
Width = 216
Height = 19
DataField = #20844#21496#21517#31216
DataSource = frmViewUnit.DataSource1
Transparent = True
end
object AALabel31: TLabel
Left = 45
Top = 32
Width = 52
Height = 13
Caption = #39033#30446#32534#21495
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object DBText3: TDBText
Left = 109
Top = 32
Width = 166
Height = 19
DataField = #39033#30446#32534#21495
DataSource = frmViewUnit.DataSource2
Transparent = True
end
object AALabel32: TLabel
Left = 430
Top = 32
Width = 52
Height = 13
Caption = #39033#30446#21517#31216
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object DBText4: TDBText
Left = 493
Top = 32
Width = 216
Height = 19
DataField = #39033#30446#21517#31216
DataSource = frmViewUnit.DataSource2
Transparent = True
end
object AALabel3: TLabel
Left = 71
Top = 60
Width = 26
Height = 13
Caption = #24162#21495
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object DBText5: TDBText
Left = 109
Top = 60
Width = 166
Height = 19
DataField = #24162#21495
DataSource = frmViewUnit.DataSource3
Transparent = True
end
object Bevel1: TBevel
Left = 12
Top = 82
Width = 724
Height = 3
end
object AALabel4: TLabel
Left = 457
Top = 60
Width = 26
Height = 13
Caption = #25151#21495
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object DBText6: TDBText
Left = 493
Top = 60
Width = 166
Height = 19
DataField = #25151#21495
DataSource = frmViewUnit.DataSource4
Transparent = True
end
object AALabel9: TLabel
Left = 41
Top = 97
Width = 52
Height = 13
Caption = #39044#30041#21333#20215
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object AALabel5: TLabel
Left = 237
Top = 97
Width = 65
Height = 13
AutoSize = False
Caption = #21333#20301#65306#20803
end
object AALabel6: TLabel
Left = 41
Top = 131
Width = 52
Height = 13
Caption = #39044#30041#24635#20215
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object AALabel7: TLabel
Left = 237
Top = 131
Width = 65
Height = 13
AutoSize = False
Caption = #21333#20301#65306#20803
end
object AALabel23: TLabel
Left = 365
Top = 97
Width = 78
Height = 13
Caption = #39044#30041#36215#22987#26085#26399
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object AALabel24: TLabel
Left = 586
Top = 97
Width = 140
Height = 13
AutoSize = False
Caption = #26085#26399#26684#24335#65306'YYYY-MM-DD'
end
object AALabel8: TLabel
Left = 365
Top = 131
Width = 78
Height = 13
Caption = #39044#30041#25130#27490#26085#26399
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object AALabel10: TLabel
Left = 586
Top = 131
Width = 140
Height = 13
AutoSize = False
Caption = #26085#26399#26684#24335#65306'YYYY-MM-DD'
end
object AALabel11: TLabel
Left = 41
Top = 164
Width = 52
Height = 13
Caption = #23458#25143#32534#21495
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object AALabel12: TLabel
Left = 41
Top = 195
Width = 52
Height = 13
Caption = #23458#25143#20449#24687
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object LbButton4: TButton
Left = 521
Top = 306
Width = 97
Height = 49
Caption = #21462#28040
TabOrder = 0
OnClick = LbButton4Click
end
object LbButton2: TButton
Left = 631
Top = 306
Width = 97
Height = 49
Caption = #20445#23384
TabOrder = 1
OnClick = LbButton2Click
end
object DBGridEh1: TDBGridEh
Left = 13
Top = 215
Width = 716
Height = 82
DataSource = DataSource2
Flat = False
FooterColor = clWindow
FooterFont.Charset = ANSI_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -13
FooterFont.Name = #23435#20307
FooterFont.Style = []
ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 2
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
EditButtons = <>
FieldName = #22995#21517
Footers = <>
end
item
EditButtons = <>
FieldName = #23458#25143#31867#22411
Footers = <>
end
item
EditButtons = <>
FieldName = #24615#21035
Footers = <>
end
item
EditButtons = <>
FieldName = #20986#29983#26085#26399
Footers = <>
end
item
EditButtons = <>
FieldName = #36523#20221#35777#21495
Footers = <>
end
item
EditButtons = <>
FieldName = #32852#31995#30005#35805
Footers = <>
end
item
EditButtons = <>
FieldName = #32852#31995#22320#22336
Footers = <>
end
item
EditButtons = <>
FieldName = #37038#25919#32534#30721
Footers = <>
end
item
EditButtons = <>
FieldName = #20256#30495
Footers = <>
end
item
EditButtons = <>
FieldName = #30331#35760#26085#26399
Footers = <>
end>
end
object DBNumberEditEh1: TDBNumberEditEh
Left = 105
Top = 97
Width = 126
Height = 21
DataField = #39044#30041#21333#20215
DataSource = DataSource1
DisplayFormat = '#.##'
EditButtons = <>
ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
TabOrder = 3
Visible = True
OnChange = DBNumberEditEh1Change
end
object DBNumberEditEh2: TDBNumberEditEh
Left = 105
Top = 131
Width = 126
Height = 21
DataField = #39044#30041#24635#20215
DataSource = DataSource1
DisplayFormat = '#.##'
EditButtons = <>
ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
TabOrder = 4
Visible = True
end
object DBDateTimeEditEh1: TDBDateTimeEditEh
Left = 455
Top = 97
Width = 126
Height = 21
DataField = #39044#30041#36215#22987#26085#26399
DataSource = DataSource1
EditButtons = <>
ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
Kind = dtkDateEh
TabOrder = 5
Visible = True
OnExit = DBDateTimeEditEh1Exit
end
object DBDateTimeEditEh2: TDBDateTimeEditEh
Left = 455
Top = 131
Width = 126
Height = 21
DataField = #39044#30041#32456#27490#26085#26399
DataSource = DataSource1
EditButtons = <>
ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
Kind = dtkDateEh
TabOrder = 6
Visible = True
OnExit = DBDateTimeEditEh2Exit
end
object DBComboBox1: TDBComboBox
Left = 105
Top = 164
Width = 127
Height = 21
DataField = #23458#25143#32534#21495
DataSource = DataSource1
ImeName = #19975#33021#20116#31508'EXE'#22806#25346#29256
ItemHeight = 13
TabOrder = 7
OnChange = DBComboBox1Change
end
object ADOQuery1: TADOQuery
Connection = DMMain.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'SELECT * FROM '#21333#20803#39044#30041#34920)
Left = 609
Top = 44
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 647
Top = 49
end
object DataSource2: TDataSource
DataSet = ADOQuery2
Left = 382
Top = 274
end
object ADOQuery2: TADOQuery
Connection = DMMain.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#23458#25143#20449#24687#34920)
Left = 354
Top = 273
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -