unitroomrep.dfm
来自「自己做过的工程」· DFM 代码 · 共 1,151 行 · 第 1/3 页
DFM
1,151 行
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.9166666666667
420.6875
343.958333333333
203.729166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #25151#38388#26631#21495
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 14
end
object QRDBText15: TQRDBText
Left = 159
Top = 165
Width = 61
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.9166666666667
420.6875
436.5625
161.395833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = DMHotel.ADODataSet_roomfee
DataField = 'roomid'
Transparent = False
WordWrap = True
FontSize = 14
end
object QRShape1: TQRShape
Left = 146
Top = 85
Width = 545
Height = 25
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Frame.Style = psDot
Size.Values = (
66.1458333333333
386.291666666667
224.895833333333
1441.97916666667)
Pen.Style = psDot
Shape = qrsHorLine
end
object QRShape2: TQRShape
Left = 148
Top = 305
Width = 545
Height = 25
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Frame.Style = psDot
Size.Values = (
66.1458333333333
391.583333333333
806.979166666667
1441.97916666667)
Pen.Style = psDot
Shape = qrsHorLine
end
object QRLabel19: TQRLabel
Left = 672
Top = 365
Width = 20
Height = 25
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
66.1458333333333
1778
965.729166666667
52.9166666666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #20803
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 14
end
object QRShape3: TQRShape
Left = 145
Top = 99
Width = 545
Height = 12
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Frame.Style = psDot
Size.Values = (
31.75
383.645833333333
261.9375
1441.97916666667)
Pen.Style = psDot
Shape = qrsHorLine
end
object QRShape4: TQRShape
Left = 146
Top = 318
Width = 545
Height = 12
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Frame.Style = psDot
Size.Values = (
31.75
386.291666666667
841.375
1441.97916666667)
Pen.Style = psDot
Shape = qrsHorLine
end
object QRShape5: TQRShape
Left = 142
Top = 197
Width = 545
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Frame.Style = psDot
Size.Values = (
52.9166666666667
375.708333333333
521.229166666667
1441.97916666667)
Pen.Style = psDot
Shape = qrsHorLine
end
object QRLabel12: TQRLabel
Left = 355
Top = 366
Width = 39
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.9166666666667
939.270833333333
968.375
103.1875)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #25240#25187
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 14
end
object QRLabel13: TQRLabel
Left = 507
Top = 366
Width = 101
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.9166666666667
1341.4375
968.375
267.229166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #28040#36153#24635#37329#39069
Color = clWhite
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 14
end
object QRDBText7: TQRDBText
Left = 266
Top = 162
Width = 71
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.9166666666667
703.791666666667
428.625
187.854166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = DMHotel.ADODataSet_roomfee
DataField = 'suproom'
Transparent = False
WordWrap = True
FontSize = 14
end
object QRDBText13: TQRDBText
Left = 602
Top = 366
Width = 81
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.9166666666667
1592.79166666667
968.375
214.3125)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = DMHotel.ADODataSet_roomfee
DataField = 'totalfee'
Transparent = False
WordWrap = True
FontSize = 14
end
object QRDBText12: TQRDBText
Left = 402
Top = 366
Width = 81
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.9166666666667
1063.625
968.375
214.3125)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = DMHotel.ADODataSet_roomfee
DataField = 'discount'
Transparent = False
WordWrap = True
FontSize = 14
end
object QRDBText6: TQRDBText
Left = 378
Top = 162
Width = 91
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.9166666666667
1000.125
428.625
240.770833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = DMHotel.ADODataSet_roomfee
DataField = 'supsecond'
Transparent = False
WordWrap = True
FontSize = 14
end
object QRDBText8: TQRDBText
Left = 490
Top = 162
Width = 81
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.9166666666667
1296.45833333333
428.625
214.3125)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = DMHotel.ADODataSet_roomfee
DataField = 'ballroom'
Transparent = False
WordWrap = True
FontSize = 14
end
object QRDBText9: TQRDBText
Left = 602
Top = 162
Width = 61
Height = 20
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
52.9166666666667
1592.79166666667
428.625
161.395833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = DMHotel.ADODataSet_roomfee
DataField = 'kalaok'
Transparent = False
WordWrap = True
FontSize = 14
end
end
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?