📄 mealform.dfm
字号:
end
object Label17: TLabel
Left = 24
Top = 80
Width = 36
Height = 13
Caption = #26102#38388#65306
end
object Label18: TLabel
Left = 24
Top = 112
Width = 60
Height = 13
Caption = #25903#20184#31181#31867#65306
end
object Label19: TLabel
Left = 24
Top = 144
Width = 84
Height = 13
Caption = #25903#20184#36135#24065#21517#31216#65306
end
object Label20: TLabel
Left = 296
Top = 40
Width = 36
Height = 13
Caption = #23454#20184#65306
end
object Label21: TLabel
Left = 296
Top = 64
Width = 84
Height = 13
Caption = #36716#25442#21040#20154#27665#24065#65306
end
object Label22: TLabel
Left = 296
Top = 112
Width = 59
Height = 13
Caption = #25910#27454#20154'ID'#65306
end
object Label23: TLabel
Left = 296
Top = 16
Width = 36
Height = 13
Caption = #24212#20184#65306
end
object Label24: TLabel
Left = 296
Top = 88
Width = 36
Height = 13
Caption = #25214#38646#65306
end
object Label25: TLabel
Left = 24
Top = 48
Width = 36
Height = 13
Caption = #26085#26399#65306
end
object DBEdit6: TDBEdit
Left = 112
Top = 8
Width = 73
Height = 21
DataField = 'StreamID'
DataSource = Data.DataSBegin
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 0
end
object DBComboBox1: TDBComboBox
Left = 112
Top = 104
Width = 161
Height = 21
DataField = 'TypeOfCoin'
DataSource = Data.DataSEnd
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ItemHeight = 13
Items.Strings = (
#25903#31080
#29616#37329)
TabOrder = 1
end
object DBComboBox6: TDBComboBox
Left = 112
Top = 136
Width = 161
Height = 21
DataField = 'NameOfCoin'
DataSource = Data.DataSEnd
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ItemHeight = 13
Items.Strings = (
#20154#27665#24065
#32654#20803
#26085#20803
#27431#20803)
TabOrder = 2
end
object DBEdit8: TDBEdit
Left = 384
Top = 8
Width = 153
Height = 21
DataField = 'ShouldPay'
DataSource = Data.DataSEnd
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ReadOnly = True
TabOrder = 3
end
object DBEdit9: TDBEdit
Left = 384
Top = 32
Width = 153
Height = 21
DataField = 'PayActually'
DataSource = Data.DataSEnd
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 4
end
object DBEdit10: TDBEdit
Left = 384
Top = 80
Width = 153
Height = 21
DataField = 'Changes'
DataSource = Data.DataSEnd
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ReadOnly = True
TabOrder = 5
end
object DBGrid2: TDBGrid
Left = 8
Top = 168
Width = 545
Height = 121
DataSource = Data.DataSEnd
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 6
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'StreamID'
Width = 55
Visible = True
end
item
Expanded = False
FieldName = 'Date'
Width = 84
Visible = True
end
item
Expanded = False
FieldName = 'TypeOfCoin'
Width = 61
Visible = True
end
item
Expanded = False
FieldName = 'NameOfCoin'
Width = 62
Visible = True
end
item
Expanded = False
FieldName = 'ShouldPay'
Width = 67
Visible = True
end
item
Expanded = False
FieldName = 'PayActually'
Width = 72
Visible = True
end
item
Expanded = False
FieldName = 'Changes'
Width = 56
Visible = True
end
item
Expanded = False
FieldName = 'PayeeID'
Width = 55
Visible = True
end>
end
object btEnd: TButton
Left = 296
Top = 136
Width = 75
Height = 25
Caption = #25910#21488
Enabled = False
TabOrder = 7
OnClick = btEndClick
end
object DBGrid3: TDBGrid
Left = 8
Top = 288
Width = 273
Height = 129
DataSource = Data.DataSBegin
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ReadOnly = True
TabOrder = 8
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'StreamID'
Width = 46
Visible = True
end
item
Expanded = False
FieldName = 'WaiterID'
Width = 46
Visible = True
end
item
Expanded = False
FieldName = 'Time'
Width = 59
Visible = True
end
item
Expanded = False
FieldName = 'Ends'
Width = 60
Visible = True
end>
end
object DBEdit7: TDBEdit
Left = 112
Top = 72
Width = 161
Height = 21
DataField = 'Time'
DataSource = Data.DataSEnd
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 9
end
object DBEdit11: TDBEdit
Left = 384
Top = 56
Width = 153
Height = 21
DataField = 'ConverToRMB'
DataSource = Data.DataSEnd
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 10
end
object DBEdit12: TDBEdit
Left = 384
Top = 104
Width = 153
Height = 21
DataField = 'PayeeID'
DataSource = Data.DataSEnd
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 11
end
object Button1: TButton
Left = 200
Top = 8
Width = 75
Height = 25
Caption = #32467#36134
TabOrder = 12
OnClick = Button1Click
end
object DBGrid4: TDBGrid
Left = 280
Top = 288
Width = 273
Height = 129
DataSource = Data.DataSOrder
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ReadOnly = True
TabOrder = 13
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'StreamNumber'
Width = 59
Visible = True
end
item
Expanded = False
FieldName = 'DishName'
Width = 68
Visible = True
end
item
Expanded = False
FieldName = 'Price'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'Discount'
Width = 59
Visible = True
end>
end
object DBEdit1: TDBEdit
Left = 112
Top = 40
Width = 161
Height = 21
DataField = 'Date'
DataSource = Data.DataSEnd
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 14
end
end
end
object Timer1: TTimer
OnTimer = Timer1Timer
Left = 88
Top = 65528
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -