unit20.dfm
来自「停车厂管理系统 麻雀虽小 但是五脏齐全」· DFM 代码 · 共 263 行
DFM
263 行
object kclc: Tkclc
Left = 202
Top = 135
Width = 606
Height = 383
Caption = #24320#36710#31163#22330
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poMainFormCenter
Visible = True
OnActivate = FormActivate
OnClose = FormClose
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label9: TLabel
Left = 27
Top = 18
Width = 36
Height = 13
Caption = #21345#21495#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 252
Top = 16
Width = 36
Height = 13
Caption = #36710#29260#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 27
Top = 48
Width = 36
Height = 13
Caption = #29992#26102#65306
end
object Label12: TLabel
Left = 252
Top = 48
Width = 36
Height = 13
Caption = #25910#36153#65306
end
object Label13: TLabel
Left = 24
Top = 80
Width = 60
Height = 13
Caption = #20572#36710#20449#24687#65306
end
object card: TEdit
Left = 79
Top = 12
Width = 98
Height = 21
MaxLength = 8
TabOrder = 0
OnKeyPress = cardKeyPress
end
object car: TEdit
Left = 302
Top = 10
Width = 87
Height = 21
TabOrder = 1
end
object usetime: TEdit
Left = 80
Top = 42
Width = 97
Height = 21
ReadOnly = True
TabOrder = 2
end
object charge: TEdit
Left = 303
Top = 40
Width = 86
Height = 21
MaxLength = 5
ReadOnly = True
TabOrder = 3
end
object lingkai: TBitBtn
Left = 447
Top = 8
Width = 74
Height = 49
Caption = #31163#22330
ModalResult = 1
TabOrder = 4
OnClick = lingkaiClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object DBGrid3: TDBGrid
Left = 24
Top = 104
Width = 553
Height = 225
DataSource = ds_carstop
ReadOnly = True
TabOrder = 5
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnCellClick = DBGrid3CellClick
Columns = <
item
Expanded = False
FieldName = 'cardid'
Title.Caption = #20572#36710#21345#21495
Visible = True
end
item
Expanded = False
FieldName = 'carid'
Title.Caption = #36710#29260
Visible = True
end
item
Expanded = False
FieldName = 'carclass'
Title.Caption = #36710#31867#22411
Visible = True
end
item
Expanded = False
FieldName = 'addressid'
Title.Caption = #36710#20301#21495
Visible = True
end
item
Expanded = False
FieldName = 'address'
Title.Caption = #20301#32622
Visible = True
end
item
Expanded = False
FieldName = 'entime'
Title.Caption = #20837#22330#26102#38388
Visible = True
end
item
Expanded = False
FieldName = 'zhek'
Title.Caption = #25240#25187
Visible = True
end
item
Expanded = False
FieldName = 'shoufe'
Title.Caption = #20998#38047'/'#20803
Visible = True
end>
end
object adot_carstop: TADOTable
Active = True
Connection = DataModule11.ccsj
CursorType = ctStatic
TableName = 'carstop'
Left = 188
Top = 227
end
object ds_carstop: TDataSource
DataSet = ADOQuery1
Left = 132
Top = 211
end
object adoq_car: TADOQuery
Connection = DataModule11.ccsj
Parameters = <>
Left = 252
Top = 147
end
object adot_card: TADOTable
Active = True
Connection = DataModule11.ccsj
CursorType = ctStatic
TableName = 'stopcard'
Left = 228
Top = 227
end
object adot_history: TADOTable
Active = True
Connection = DataModule11.ccsj
CursorType = ctStatic
TableName = 'history'
Left = 316
Top = 219
end
object adoq_address: TADOQuery
Connection = DataModule11.ccsj
Parameters = <>
Left = 316
Top = 179
end
object adoq_recharge: TADOQuery
Connection = DataModule11.ccsj
Parameters = <>
Left = 212
Top = 153
end
object adot_stopcar_view: TADOTable
Active = True
Connection = DataModule11.ccsj
CursorType = ctStatic
TableName = 'stopcar_view'
Left = 276
Top = 225
end
object aqshoufe: TADOQuery
Connection = DataModule11.ccsj
Parameters = <>
Left = 144
Top = 152
end
object ADOQuery1: TADOQuery
Connection = DataModule11.ccsj
Parameters = <>
Left = 400
Top = 120
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?