zulingfrm.dfm
来自「该系统实现了对DVD租赁过程的管理,功能完善,方便实用.」· DFM 代码 · 共 858 行 · 第 1/3 页
DFM
858 行
BorderStyle = bsSingle
Ctl3D = False
ParentCtl3D = False
TabOrder = 2
object Image2: TImage
Left = 0
Top = 0
Width = 131
Height = 175
Align = alClient
Stretch = True
end
end
end
object Panel4: TPanel
Left = 36
Top = 104
Width = 533
Height = 205
BevelOuter = bvNone
BorderStyle = bsSingle
Ctl3D = False
ParentCtl3D = False
TabOrder = 2
object Label4: TLabel
Left = 170
Top = 20
Width = 36
Height = 12
Caption = #29255#21517#65306
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 148
Top = 52
Width = 60
Height = 12
Caption = #31199#20511#26102#38388#65306
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 148
Top = 84
Width = 60
Height = 12
Caption = #24403#21069#26102#38388#65306
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 148
Top = 116
Width = 60
Height = 12
Caption = #24212#20184#31199#37329#65306
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 170
Top = 160
Width = 36
Height = 12
Caption = #23454#25910#65306
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 344
Top = 160
Width = 36
Height = 12
Caption = #25214#38646#65306
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 332
Top = 116
Width = 12
Height = 12
Caption = #20803
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Panel3: TPanel
Left = 4
Top = 4
Width = 133
Height = 177
BevelOuter = bvNone
BorderStyle = bsSingle
Ctl3D = False
ParentCtl3D = False
TabOrder = 0
object Image3: TImage
Left = 0
Top = 0
Width = 131
Height = 175
Align = alClient
Stretch = True
end
end
object StaticText2: TStaticText
Left = 208
Top = 12
Width = 4
Height = 4
Alignment = taCenter
BorderStyle = sbsSunken
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object StaticText3: TStaticText
Left = 208
Top = 44
Width = 253
Height = 25
Alignment = taCenter
AutoSize = False
BorderStyle = sbsSunken
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object StaticText4: TStaticText
Left = 208
Top = 76
Width = 253
Height = 25
Alignment = taCenter
AutoSize = False
BorderStyle = sbsSunken
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
end
object StaticText5: TStaticText
Left = 208
Top = 108
Width = 117
Height = 29
Alignment = taCenter
AutoSize = False
BorderStyle = sbsSunken
Font.Charset = ANSI_CHARSET
Font.Color = clMaroon
Font.Height = -24
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
end
object edIncome: TEdit
Left = 208
Top = 148
Width = 121
Height = 33
Ctl3D = True
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
TabOrder = 5
OnKeyPress = edIncomeKeyPress
end
object StaticText6: TStaticText
Left = 380
Top = 148
Width = 117
Height = 29
Alignment = taCenter
AutoSize = False
BorderStyle = sbsSunken
Font.Charset = ANSI_CHARSET
Font.Color = clMaroon
Font.Height = -24
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
end
end
object Panel1: TPanel
Left = 36
Top = 52
Width = 533
Height = 53
BevelOuter = bvLowered
BorderStyle = bsSingle
Ctl3D = False
ParentCtl3D = False
TabOrder = 0
object Label1: TLabel
Left = 100
Top = 19
Width = 140
Height = 20
Caption = #20809#30424#24215#20869#32534#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
end
object edStore_ID: TEdit
Left = 244
Top = 11
Width = 157
Height = 33
CharCase = ecUpperCase
Ctl3D = True
Font.Charset = ANSI_CHARSET
Font.Color = clMaroon
Font.Height = -21
Font.Name = 'Tahoma'
Font.Style = [fsBold]
MaxLength = 10
ParentCtl3D = False
ParentFont = False
TabOrder = 0
OnKeyPress = edStore_IDKeyPress
end
end
object ADOQuery1: TADOQuery
Connection = FrmMain.ADOConnection1
Parameters = <>
Left = 36
Top = 16
end
object ADOQuery2: TADOQuery
Connection = FrmMain.ADOConnection1
Parameters = <>
Left = 72
Top = 16
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?