📄 group.dfm
字号:
object GroupForm: TGroupForm
Left = 127
Top = 123
Width = 641
Height = 464
Caption = '团体管理'
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
OldCreateOrder = False
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 15
object Panel1: TPanel
Left = 0
Top = 0
Width = 633
Height = 437
Align = alClient
Caption = 'Panel1'
TabOrder = 0
object PageControl1: TPageControl
Left = 1
Top = 1
Width = 631
Height = 435
ActivePage = TabSheet2
Align = alClient
TabOrder = 0
object TabSheet1: TTabSheet
Caption = '团体入住'
object Label3: TLabel
Left = 13
Top = 16
Width = 60
Height = 15
Caption = '定单编号'
end
object Label4: TLabel
Left = 13
Top = 56
Width = 60
Height = 15
Caption = '团队名称'
end
object Label14: TLabel
Left = 13
Top = 112
Width = 60
Height = 15
Caption = '证件类型'
end
object Label8: TLabel
Left = 224
Top = 120
Width = 60
Height = 15
Caption = '证件号码'
end
object Label13: TLabel
Left = 280
Top = 16
Width = 75
Height = 15
Caption = '操作员姓名'
end
object LabelOper: TLabel
Left = 384
Top = 16
Width = 72
Height = 15
Caption = 'LabelOper'
end
object Label19: TLabel
Left = 280
Top = 56
Width = 90
Height = 15
Caption = '联系电话号码'
end
object Label20: TLabel
Left = 510
Top = 120
Width = 30
Height = 15
Caption = '折扣'
end
object Label18: TLabel
Left = 13
Top = 200
Width = 60
Height = 15
Caption = '房间级别'
end
object Label2: TLabel
Left = 13
Top = 248
Width = 60
Height = 15
Caption = '预交押金'
end
object Label11: TLabel
Left = 13
Top = 152
Width = 60
Height = 15
Caption = '住入时间'
end
object Label12: TLabel
Left = 224
Top = 164
Width = 90
Height = 15
Caption = '计划离开日期'
end
object Label1: TLabel
Left = 232
Top = 200
Width = 45
Height = 15
Caption = '房间号'
end
object Label5: TLabel
Left = 13
Top = 88
Width = 60
Height = 15
Caption = '法人姓名'
end
object Label6: TLabel
Left = 480
Top = 168
Width = 75
Height = 15
Caption = '定用房间号'
end
object Label7: TLabel
Left = 280
Top = 80
Width = 30
Height = 15
Caption = '性别'
end
object EdtTheOrderNumber: TEdit
Left = 88
Top = 16
Width = 121
Height = 23
MaxLength = 10
TabOrder = 0
end
object EdtName: TEdit
Left = 88
Top = 80
Width = 97
Height = 23
MaxLength = 8
TabOrder = 1
end
object EdtTellphone: TEdit
Left = 381
Top = 48
Width = 121
Height = 23
MaxLength = 11
TabOrder = 2
end
object EdtPassNo: TEdit
Left = 296
Top = 120
Width = 193
Height = 23
MaxLength = 19
TabOrder = 3
end
object EditZeKou: TEdit
Left = 541
Top = 120
Width = 57
Height = 23
TabOrder = 4
end
object CBRoomRevel: TComboBox
Left = 88
Top = 200
Width = 113
Height = 23
ItemHeight = 15
MaxLength = 10
TabOrder = 5
OnChange = CBRoomRevelChange
end
object CBRoomNumber: TComboBox
Left = 288
Top = 200
Width = 73
Height = 23
ItemHeight = 15
MaxLength = 5
TabOrder = 6
OnChange = CBRoomNumberChange
end
object EdtDeposit: TEdit
Left = 88
Top = 240
Width = 57
Height = 23
TabOrder = 7
end
object DTPOut: TDateTimePicker
Left = 328
Top = 152
Width = 121
Height = 24
CalAlignment = dtaLeft
Date = 37713.4993604167
Time = 37713.4993604167
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 8
end
object DTPIn: TDateTimePicker
Left = 88
Top = 152
Width = 113
Height = 24
CalAlignment = dtaLeft
Date = 37713.4992974537
Time = 37713.4992974537
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 9
end
object CBPassTypeName: TComboBox
Left = 88
Top = 112
Width = 113
Height = 23
ItemHeight = 15
MaxLength = 10
TabOrder = 10
end
object EditGroupName: TEdit
Left = 88
Top = 48
Width = 97
Height = 23
TabOrder = 11
Text = 'EditName'
end
object ListBox1: TListBox
Left = 488
Top = 200
Width = 73
Height = 89
ItemHeight = 15
TabOrder = 12
OnDblClick = ListBox1DblClick
end
object ListBox2: TListBox
Left = 432
Top = 200
Width = 57
Height = 89
ItemHeight = 15
TabOrder = 13
end
object GroupBox1: TGroupBox
Left = 0
Top = 291
Width = 623
Height = 114
Align = alBottom
TabOrder = 14
object DBGrid1: TDBGrid
Left = 2
Top = 17
Width = 527
Height = 95
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -15
TitleFont.Name = '宋体'
TitleFont.Style = []
end
object BitBtnDel: TBitBtn
Left = 540
Top = 64
Width = 75
Height = 25
Caption = '删除'
TabOrder = 1
end
object BitBtnAdd: TBitBtn
Left = 540
Top = 24
Width = 75
Height = 25
Caption = '增加'
TabOrder = 2
OnClick = BitBtnAddClick
end
end
object CheckBox1: TCheckBox
Left = 8
Top = 272
Width = 97
Height = 17
Caption = '输入团队人员名单'
TabOrder = 15
OnClick = CheckBox1Click
end
object BitBtnGropuIn: TBitBtn
Left = 536
Top = 16
Width = 75
Height = 73
Caption = '登记'
TabOrder = 16
OnClick = BitBtnGropuInClick
end
object ComBoSex: TComboBox
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -