📄 u_cashaccount.~dfm
字号:
object frmCashAccount: TfrmCashAccount
Left = 259
Top = 204
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = #29616#37329#24080#31807
ClientHeight = 414
ClientWidth = 656
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDesktopCenter
Visible = True
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object DBGrid1: TDBGrid
Left = 0
Top = 45
Width = 656
Height = 315
Align = alClient
DataSource = DataSource1
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'ID'
Title.Alignment = taCenter
Visible = False
end
item
Alignment = taCenter
Expanded = False
FieldName = 'SupCus'
Title.Alignment = taCenter
Title.Caption = #25688#35201#20869#23481
Width = 180
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'Operation'
Title.Alignment = taCenter
Title.Caption = #25688#35201#31867#22411
Width = 100
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'CashMon'
Title.Alignment = taCenter
Title.Caption = #36153#29992
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'CashDate'
Title.Alignment = taCenter
Title.Caption = #26085#26399
Width = 140
Visible = True
end>
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 656
Height = 45
Align = alTop
TabOrder = 1
object Label1: TLabel
Left = 60
Top = 20
Width = 60
Height = 13
Caption = #24320#22987#26085#26399#65306
end
object Label2: TLabel
Left = 408
Top = 20
Width = 60
Height = 13
Caption = #32467#26463#26085#26399#65306
end
object dtpStat: TDateTimePicker
Left = 128
Top = 16
Width = 150
Height = 21
Date = 38269.480178310190000000
Time = 38269.480178310190000000
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 0
OnChange = dtpStatChange
end
object dtpEnd: TDateTimePicker
Left = 480
Top = 16
Width = 150
Height = 21
Date = 38269.480222071760000000
Time = 38269.480222071760000000
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 1
OnChange = dtpEndChange
end
end
object Panel2: TPanel
Left = 0
Top = 360
Width = 656
Height = 54
Align = alBottom
TabOrder = 2
object edtIn: TLabeledEdit
Left = 16
Top = 24
Width = 121
Height = 21
EditLabel.Width = 60
EditLabel.Height = 13
EditLabel.Caption = #36827#36135#37329#39069#65306
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 0
Text = '0.0'
end
object edtOut: TLabeledEdit
Left = 184
Top = 24
Width = 121
Height = 21
EditLabel.Width = 60
EditLabel.Height = 13
EditLabel.Caption = #38144#21806#37329#39069#65306
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 1
Text = '0.0'
end
object edtOther: TLabeledEdit
Left = 344
Top = 24
Width = 121
Height = 21
EditLabel.Width = 60
EditLabel.Height = 13
EditLabel.Caption = #20854#20182#36153#29992#65306
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 2
Text = '0.0'
end
object edtMon: TLabeledEdit
Left = 512
Top = 22
Width = 121
Height = 21
EditLabel.Width = 60
EditLabel.Height = 13
EditLabel.Caption = #36194#21033#37329#39069#65306
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 3
Text = '0.0'
end
end
object CashAccountQry: TADOQuery
Connection = frmDataCtrl.ADOConn
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from tb_CashAccount')
Left = 240
Top = 248
end
object DataSource1: TDataSource
DataSet = CashAccountQry
Left = 288
Top = 248
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -