📄 accounts.dfm
字号:
object AccountsForm: TAccountsForm
Left = 23
Top = 70
Width = 740
Height = 471
Caption = #24080#21495#32500#25252
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poDesktopCenter
OnClose = FormClose
OnCreate = FormCreate
OnKeyPress = FormKeyPress
PixelsPerInch = 96
TextHeight = 12
object GroupBox1: TGroupBox
Left = 32
Top = 8
Width = 665
Height = 189
Caption = #20449#24687#26174#31034#19982#32534#36753
TabOrder = 0
object Label4: TLabel
Left = 40
Top = 119
Width = 48
Height = 12
Caption = #38134#34892#24080#21495
end
object Label2: TLabel
Left = 40
Top = 89
Width = 48
Height = 12
Caption = #26680#31639#24080#21495
end
object Label3: TLabel
Left = 40
Top = 59
Width = 48
Height = 12
Caption = #24080#25143#31867#21035
end
object Label1: TLabel
Left = 40
Top = 29
Width = 48
Height = 12
Caption = #24080#25143#21517#31216
end
object Label8: TLabel
Left = 40
Top = 150
Width = 48
Height = 12
Caption = #24080#25143#35828#26126
end
object Label6: TLabel
Left = 402
Top = 28
Width = 48
Height = 12
Caption = #24080#25143#24065#31181
end
object Label7: TLabel
Left = 402
Top = 60
Width = 48
Height = 12
Caption = #21021#22987#20313#39069
end
object btnNew: TButton
Left = 406
Top = 114
Width = 100
Height = 25
Caption = #26032#22686
TabOrder = 7
OnClick = btnNewClick
end
object btnDelete: TButton
Left = 519
Top = 114
Width = 100
Height = 25
Caption = #21024#38500
TabOrder = 8
OnClick = btnDeleteClick
end
object edt_AccountName: TDBEditEh
Left = 96
Top = 25
Width = 281
Height = 21
AlwaysShowBorder = True
EditButtons = <>
Enabled = False
Flat = True
MaxLength = 30
TabOrder = 0
Visible = True
end
object cmb_AccountType: TDBComboBoxEh
Left = 96
Top = 55
Width = 145
Height = 21
AlwaysShowBorder = True
Enabled = False
EditButtons = <>
Flat = True
Items.Strings = (
#29616#37329
#38134#34892#23384#27454
#25237#36164
#36151#27454
#20854#20182)
TabOrder = 1
Visible = True
OnChange = cmb_AccountTypeChange
end
object edt_Account: TDBEditEh
Left = 96
Top = 85
Width = 281
Height = 21
AlwaysShowBorder = True
EditButtons = <>
Enabled = False
Flat = True
MaxLength = 10
TabOrder = 2
Visible = True
end
object edt_BankAccount: TDBEditEh
Left = 96
Top = 115
Width = 281
Height = 21
AlwaysShowBorder = True
EditButtons = <>
Enabled = False
Flat = True
MaxLength = 30
TabOrder = 3
Visible = True
end
object edt_BankName: TDBEditEh
Left = 96
Top = 145
Width = 281
Height = 21
AlwaysShowBorder = True
EditButtons = <>
Enabled = False
Flat = True
MaxLength = 30
TabOrder = 4
Visible = True
end
object cmb_Currency: TDBComboBoxEh
Left = 456
Top = 24
Width = 161
Height = 21
AlwaysShowBorder = True
Enabled = False
EditButtons = <>
Flat = True
Items.Strings = (
#20154#27665#24065'(RMB)'
#32654#20803'(USD)')
TabOrder = 5
Visible = True
end
object edt_original: TDBNumberEditEh
Left = 456
Top = 56
Width = 161
Height = 21
AlwaysShowBorder = True
DisplayFormat = '#,##0.00'
Enabled = False
EditButtons = <>
Flat = True
TabOrder = 6
Visible = True
end
object btnExit: TButton
Left = 520
Top = 144
Width = 100
Height = 25
Caption = #36864#20986
ModalResult = 2
TabOrder = 9
end
object btnModify: TButton
Left = 406
Top = 144
Width = 100
Height = 25
Caption = #20462#25913
TabOrder = 10
OnClick = btnModifyClick
end
object cbx_Apply: TDBCheckBoxEh
Left = 403
Top = 86
Width = 97
Height = 17
AlwaysShowBorder = True
Caption = #21551#29992#24080#25143
Checked = True
Enabled = False
Flat = True
State = cbChecked
TabOrder = 11
ValueChecked = 'True'
ValueUnchecked = 'False'
OnClick = cbx_ApplyClick
end
end
object GroupBox2: TGroupBox
Left = 32
Top = 203
Width = 665
Height = 222
Caption = #36134#25143#21015#34920
TabOrder = 1
object DBGridEh: TDBGridEh
Left = 16
Top = 16
Width = 625
Height = 193
Flat = True
FooterColor = clWindow
FooterFont.Charset = GB2312_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -12
FooterFont.Name = #23435#20307
FooterFont.Style = []
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
RowHeight = 2
RowLines = 1
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
TitleHeight = 15
Columns = <
item
Alignment = taCenter
EditButtons = <>
FieldName = 'Apply'
Footers = <>
Layout = tlCenter
Title.Alignment = taCenter
Title.Caption = #21551#29992
end
item
Alignment = taCenter
EditButtons = <>
FieldName = 'AccountType'
Footers = <>
Layout = tlCenter
Title.Alignment = taCenter
Title.Caption = #31867#22411
Width = 45
end
item
Alignment = taCenter
EditButtons = <>
FieldName = 'Account'
Footers = <>
Layout = tlCenter
Title.Alignment = taCenter
Title.Caption = #26680#31639#24080#21495
Width = 69
end
item
EditButtons = <>
FieldName = 'AccountName'
Footers = <>
Layout = tlCenter
Title.Alignment = taCenter
Title.Caption = #24080#25143#21517#31216
end
item
EditButtons = <>
FieldName = 'BankAccount'
Footers = <>
Layout = tlCenter
Title.Alignment = taCenter
Title.Caption = #38134#34892#24080#21495
end
item
Alignment = taCenter
EditButtons = <>
FieldName = 'Currency'
Footers = <>
Layout = tlCenter
Title.Alignment = taCenter
Title.Caption = #24065#31181
Width = 39
end
item
EditButtons = <>
FieldName = 'BankName'
Footers = <>
Layout = tlCenter
Title.Alignment = taCenter
Title.Caption = #24080#25143#35828#26126
end
item
DisplayFormat = '#,##0.00'
EditButtons = <>
FieldName = 'Original'
Footers = <>
Layout = tlCenter
Title.Alignment = taCenter
Title.Caption = #21021#22987#20313#39069
end
item
DisplayFormat = '#,##0.00'
EditButtons = <>
FieldName = 'Present'
Footers = <>
Layout = tlCenter
Title.Alignment = taCenter
Title.Caption = #24403#21069#20313#39069
end>
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -