📄 u_otherchargeqry.~dfm
字号:
object frmOtherChargeQry: TfrmOtherChargeQry
Left = 282
Top = 187
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = #20854#23427#36153#29992#26597#35810
ClientHeight = 286
ClientWidth = 542
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDesktopCenter
Visible = True
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Panel1: TPanel
Left = 0
Top = 0
Width = 542
Height = 286
Align = alClient
BevelOuter = bvLowered
TabOrder = 0
object Label1: TLabel
Left = 374
Top = 12
Width = 60
Height = 12
Caption = #33457#36153#26085#26399#65306
end
object edtName: TLabeledEdit
Left = 205
Top = 26
Width = 121
Height = 21
BevelKind = bkFlat
BorderStyle = bsNone
EditLabel.Width = 60
EditLabel.Height = 12
EditLabel.Caption = #36153#29992#21517#31216#65306
ImeName = #20108#31508#36755#20837#27861'2003'
TabOrder = 0
OnChange = edtNameChange
end
object edtUser: TLabeledEdit
Left = 42
Top = 26
Width = 121
Height = 21
BevelKind = bkFlat
BorderStyle = bsNone
EditLabel.Width = 48
EditLabel.Height = 12
EditLabel.Caption = #32463#25163#20154#65306
ImeName = #20108#31508#36755#20837#27861'2003'
TabOrder = 1
OnChange = edtUserChange
end
object dtpDate: TDateTimePicker
Left = 373
Top = 26
Width = 121
Height = 20
Date = 38254.660314479170000000
Time = 38254.660314479170000000
ImeName = #20108#31508#36755#20837#27861'2003'
TabOrder = 2
OnChange = dtpDateChange
end
object DBGrid1: TDBGrid
Left = 1
Top = 67
Width = 540
Height = 218
Align = alBottom
DataSource = DataSource1
ImeName = #20108#31508#36755#20837#27861'2003'
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 3
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'ChargeDate'
Title.Alignment = taCenter
Title.Caption = #26085#26399
Width = 130
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'ChargeUser'
Title.Alignment = taCenter
Title.Caption = #32463#25163#20154
Width = 120
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'ChargeName'
Title.Alignment = taCenter
Title.Caption = #36153#29992#21517#31216
Width = 130
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'ChargeMon'
Title.Alignment = taCenter
Title.Caption = #36153#29992#37329#39069
Width = 100
Visible = True
end>
end
end
object qry: TADOQuery
Connection = frmDataCtrl.ADOConn
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from tb_OtherCharge')
Left = 240
Top = 176
end
object DataSource1: TDataSource
DataSet = qry
Left = 272
Top = 176
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -