unitmanagerroomquery.dfm
来自「自己做过的工程」· DFM 代码 · 共 974 行 · 第 1/2 页
DFM
974 行
TabOrder = 2
object StaticText6: TStaticText
Left = 29
Top = 40
Width = 4
Height = 4
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
end
object StaticText3: TStaticText
Left = 53
Top = 60
Width = 60
Height = 18
Caption = #36215#22987#26102#38388
TabOrder = 1
end
object StaticText7: TStaticText
Left = 54
Top = 97
Width = 60
Height = 18
Caption = #32456#27490#26102#38388
TabOrder = 2
end
object dtp_redebttimeEnd: TDateTimePicker
Left = 118
Top = 91
Width = 147
Height = 22
CalAlignment = dtaLeft
Date = 37482.9469882292
Time = 37482.9469882292
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 3
end
object dtp_redebttimeBegin: TDateTimePicker
Left = 118
Top = 56
Width = 147
Height = 22
CalAlignment = dtaLeft
Date = 37482.9469882292
Time = 37482.9469882292
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 4
end
object ed_redebtusername: TEdit
Left = 118
Top = 20
Width = 146
Height = 22
Enabled = False
TabOrder = 5
end
object cb_redebtusername: TCheckBox
Left = 22
Top = 24
Width = 81
Height = 17
Caption = #25151#23458#22995#21517
TabOrder = 6
OnClick = cb_redebtusernameClick
end
end
object StaticText1: TStaticText
Left = 392
Top = 32
Width = 74
Height = 18
Caption = #28040#36153#24635#37329#39069
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
end
object ed_totalredebt: TEdit
Left = 362
Top = 55
Width = 144
Height = 22
ReadOnly = True
TabOrder = 4
end
end
object DBGrid3: TDBGrid
Left = 0
Top = 2
Width = 529
Height = 285
DataSource = DataSource2
ReadOnly = True
TabOrder = 2
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'username'
Title.Caption = #25151#23458#22995#21517
Width = 63
Visible = True
end
item
Expanded = False
FieldName = 'roomid'
Title.Caption = #25151#38388#26631#21495
Width = 66
Visible = True
end
item
Expanded = False
FieldName = 'checkornot'
Title.Caption = #26159#21542#24050#32467#24080
Width = 88
Visible = True
end
item
Expanded = False
FieldName = 'checktime'
Title.Caption = #32467#24080#26102#38388
Width = 142
Visible = True
end
item
Expanded = False
FieldName = 'discount'
Title.Caption = #25240#25187
Width = 35
Visible = True
end
item
Expanded = False
FieldName = 'totalfee'
Title.Caption = #28040#36153#24635#37329#39069
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'intime'
Title.Caption = #20837#20303#26102#38388
Visible = True
end
item
Expanded = False
FieldName = 'roomtype'
Title.Caption = #25151#38388#31867#22411
Width = 65
Visible = True
end
item
Expanded = False
FieldName = 'roomfee'
Title.Caption = #20303#23487#36153#29992
Visible = True
end
item
Expanded = False
FieldName = 'roomthings'
Title.Caption = #25151#20869#28040#36153
Visible = True
end
item
Expanded = False
FieldName = 'supsecond'
Title.Caption = #25955#24231#28040#36153
Visible = True
end
item
Expanded = False
FieldName = 'suproom'
Title.Caption = #20445#38388#28040#36153
Visible = True
end
item
Expanded = False
FieldName = 'kalaok'
Title.Caption = #21345#25289'OK '
Visible = True
end
item
Expanded = False
FieldName = 'ballroom'
Title.Caption = #27468#33310#21381#36153
Visible = True
end
item
Expanded = False
FieldName = 'commercecenter'
Title.Caption = #21830#21153#20013#24515
Visible = True
end
item
Expanded = False
FieldName = 'hairdressing'
Title.Caption = #32654#23481#20013#24515
Visible = True
end
item
Expanded = False
FieldName = 'employeeid'
Title.Caption = #32467#24080#21592#24037
Width = 77
Visible = True
end
item
Expanded = False
FieldName = 'remark'
Title.Caption = #22791#27880#20449#24687
Visible = True
end>
end
end
object TabSheet3: TTabSheet
Caption = #25151#23458#25346#24080#27424#24080#26597#35810
ImageIndex = 2
OnShow = TabSheet3Show
object DBGrid4: TDBGrid
Left = 0
Top = 2
Width = 529
Height = 285
DataSource = DataSource3
ReadOnly = True
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -14
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'username'
Title.Caption = #25151#23458#22995#21517
Width = 85
Visible = True
end
item
Expanded = False
FieldName = 'roomid'
Title.Caption = #25151#38388#26631#21495
Width = 67
Visible = True
end
item
Expanded = False
FieldName = 'checkornot'
Title.Caption = #26159#21542#24050#32467#24080
Width = 82
Visible = True
end
item
Expanded = False
FieldName = 'checktime'
Title.Caption = #32467#24080#26102#38388
Width = 141
Visible = True
end
item
Expanded = False
FieldName = 'discount'
Title.Caption = #25240#25187
Width = 48
Visible = True
end
item
Expanded = False
FieldName = 'totalfee'
Title.Caption = #28040#36153#24635#37329#39069
Width = 94
Visible = True
end
item
Expanded = False
FieldName = 'roomtype'
Title.Caption = #25151#38388#31867#22411
Width = 72
Visible = True
end
item
Expanded = False
FieldName = 'roomfee'
Title.Caption = #20303#23487#36153#29992
Visible = True
end
item
Expanded = False
FieldName = 'roomthings'
Title.Caption = #25151#20869#28040#36153
Visible = True
end
item
Expanded = False
FieldName = 'supsecond'
Title.Caption = #25955#24231#28040#36153
Visible = True
end
item
Expanded = False
FieldName = 'suproom'
Title.Caption = #20445#38388#28040#36153
Visible = True
end
item
Expanded = False
FieldName = 'kalaok'
Title.Caption = #21345#25289'OK '
Visible = True
end
item
Expanded = False
FieldName = 'ballroom'
Title.Caption = #27468#33310#21381#36153
Visible = True
end
item
Expanded = False
FieldName = 'commercecenter'
Title.Caption = #21830#21153#20013#24515
Visible = True
end
item
Expanded = False
FieldName = 'hairdressing'
Title.Caption = #32654#23481#20013#24515
Visible = True
end
item
Expanded = False
FieldName = 'intime'
Title.Caption = #20837#20303#26102#38388
Width = 140
Visible = True
end
item
Expanded = False
FieldName = 'employeeid'
Title.Caption = #32467#24080#21592#24037
Width = 81
Visible = True
end
item
Expanded = False
FieldName = 'remark'
Title.Caption = #22791#27880#20449#24687
Visible = True
end>
end
object GroupBox3: TGroupBox
Left = 16
Top = 294
Width = 281
Height = 121
Caption = #26597#35810#26465#20214
TabOrder = 1
object StaticText10: TStaticText
Left = 37
Top = 60
Width = 60
Height = 18
Caption = #36215#22987#26102#38388
TabOrder = 0
end
object StaticText11: TStaticText
Left = 38
Top = 95
Width = 60
Height = 18
Caption = #32456#27490#26102#38388
TabOrder = 1
end
object dtp_debttimeEnd: TDateTimePicker
Left = 112
Top = 90
Width = 147
Height = 22
CalAlignment = dtaLeft
Date = 37482.9469882292
Time = 37482.9469882292
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 2
end
object dtp_debttimeBegin: TDateTimePicker
Left = 113
Top = 55
Width = 145
Height = 22
CalAlignment = dtaLeft
Date = 37482.9469882292
Time = 37482.9469882292
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 3
end
object ed_debtusername: TEdit
Left = 113
Top = 20
Width = 144
Height = 22
Enabled = False
TabOrder = 4
end
object cb_debtusername: TCheckBox
Left = 24
Top = 24
Width = 81
Height = 17
Caption = #25151#23458#22995#21517
TabOrder = 5
OnClick = cb_debtusernameClick
end
end
object ed_totaldebt: TEdit
Left = 336
Top = 344
Width = 121
Height = 22
Enabled = False
ReadOnly = True
TabOrder = 2
end
object StaticText12: TStaticText
Left = 352
Top = 320
Width = 74
Height = 18
Caption = #28040#36153#24635#37329#39069
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
end
object Button1: TButton
Left = 360
Top = 376
Width = 75
Height = 33
Caption = #26597#35810
TabOrder = 4
OnClick = Button1Click
end
end
end
object DataSource1: TDataSource
DataSet = DMHotel.ADODataSet_roomfee_requery
Left = 64
Top = 104
end
object DataSource2: TDataSource
DataSet = DMHotel.ADODataSet_roomredebt_requery
Left = 128
Top = 104
end
object DataSource3: TDataSource
DataSet = DMHotel.ADODataSet_roomdebt_requery
Left = 272
Top = 160
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?