unit9.dfm
来自「停车厂管理系统 麻雀虽小 但是五脏齐全」· DFM 代码 · 共 194 行
DFM
194 行
object Form9: TForm9
Left = 225
Top = 168
Width = 421
Height = 223
Caption = #31995#32479#29992#25143
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = False
Position = poMainFormCenter
OnActivate = FormActivate
OnCanResize = FormCanResize
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 14
Top = 13
Width = 60
Height = 13
Caption = #29992#25143#12288#21517#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 14
Top = 53
Width = 60
Height = 13
Caption = #23494#12288#12288#30721#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 14
Top = 133
Width = 60
Height = 13
Caption = #31867#12288#12288#22411#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 14
Top = 93
Width = 60
Height = 13
Caption = #20877#27425#23494#30721#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 181
Top = 5
Width = 60
Height = 13
Caption = #29992#25143#21015#34920#65306
end
object Edit3: TEdit
Left = 78
Top = 85
Width = 75
Height = 21
MaxLength = 10
PasswordChar = '*'
TabOrder = 3
end
object DBGrid1: TDBGrid
Left = 180
Top = 24
Width = 217
Height = 121
DataSource = DataSource1
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'opname'
Title.Caption = #29992#25143#21517
Visible = True
end
item
Expanded = False
FieldName = 'oppw'
Title.Caption = #23494#30721
Visible = True
end
item
Expanded = False
FieldName = 'opcase'
Title.Caption = #29992#25143#31867#22411
Visible = True
end>
end
object Edit1: TEdit
Left = 78
Top = 5
Width = 75
Height = 21
MaxLength = 8
TabOrder = 1
end
object Edit2: TEdit
Left = 78
Top = 45
Width = 75
Height = 21
MaxLength = 10
PasswordChar = '*'
TabOrder = 2
end
object ComboBox1: TComboBox
Left = 79
Top = 122
Width = 74
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 4
Items.Strings = (
#26222#36890#29992#25143
#31649#29702#21592)
end
object BitBtn1: TBitBtn
Left = 16
Top = 152
Width = 75
Height = 25
Caption = #21019#24314
TabOrder = 5
OnClick = BitBtn1Click
Kind = bkOK
end
object BitBtn2: TBitBtn
Left = 312
Top = 152
Width = 75
Height = 25
Caption = #20851#38381
TabOrder = 6
Kind = bkClose
end
object BitBtn3: TBitBtn
Left = 168
Top = 152
Width = 75
Height = 25
Caption = #21024#38500
TabOrder = 7
OnClick = BitBtn3Click
Kind = bkAbort
end
object ADOTable1: TADOTable
Active = True
Connection = DataModule11.ccsj
CursorType = ctStatic
TableName = 'opration'
Left = 184
Top = 76
end
object DataSource1: TDataSource
DataSet = ADOTable1
Left = 32
Top = 44
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?