📄 setgoodunit.dfm
字号:
FieldName = 'xfxm_mc'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
Title.Alignment = taCenter
Title.Caption = #39033#30446#21517#31216
Title.Color = clWhite
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlack
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = [fsBold]
Width = 165
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'xfxm_jp'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
Title.Alignment = taCenter
Title.Caption = #21161#35760#31526
Title.Color = clWhite
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlack
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = [fsBold]
Width = 100
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'xfxm_ysdj'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
Title.Alignment = taCenter
Title.Caption = #39044#21806#21333#20215
Title.Color = clWhite
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlack
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = [fsBold]
Width = 100
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'xfxm_cbdj'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
Title.Alignment = taCenter
Title.Caption = #25104#26412#21333#20215
Title.Color = clWhite
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlack
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = [fsBold]
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'xfxm_dzbl'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
Title.Alignment = taCenter
Title.Caption = #25171#25240#27604#20363
Title.Color = clWhite
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlack
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = [fsBold]
Width = 100
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'xfxm_qmye'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
Title.Alignment = taCenter
Title.Caption = #24211#23384#37327
Title.Color = clWhite
Title.Font.Charset = ANSI_CHARSET
Title.Font.Color = clBlack
Title.Font.Height = -14
Title.Font.Name = #23435#20307
Title.Font.Style = [fsBold]
Width = 100
Visible = True
end>
end
object suiButton3: TsuiButton
Left = 360
Top = 248
Width = 50
Height = 25
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
Caption = #28155#21152
AutoSize = False
ParentFont = False
UIStyle = MacOS
TabOrder = 1
Transparent = True
ModalResult = 0
FocusedRectMargin = 2
Layout = blGlyphLeft
Spacing = 4
MouseContinuouslyDownInterval = 100
OnClick = suiButton3Click
ResHandle = 0
end
object suiButton4: TsuiButton
Left = 416
Top = 248
Width = 50
Height = 25
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
Caption = #32534#36753
AutoSize = False
ParentFont = False
UIStyle = MacOS
TabOrder = 2
Transparent = True
ModalResult = 0
FocusedRectMargin = 2
Layout = blGlyphLeft
Spacing = 4
MouseContinuouslyDownInterval = 100
OnClick = suiButton4Click
ResHandle = 0
end
object suiButton5: TsuiButton
Left = 472
Top = 248
Width = 50
Height = 25
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
Caption = #21024#38500
AutoSize = False
ParentFont = False
UIStyle = MacOS
TabOrder = 3
Transparent = True
ModalResult = 0
FocusedRectMargin = 2
Layout = blGlyphLeft
Spacing = 4
MouseContinuouslyDownInterval = 100
OnClick = suiButton5Click
ResHandle = 0
end
object suiButton6: TsuiButton
Left = 640
Top = 248
Width = 50
Height = 25
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
Caption = #36864#20986
AutoSize = False
ParentFont = False
UIStyle = MacOS
TabOrder = 4
Transparent = True
ModalResult = 0
FocusedRectMargin = 2
Layout = blGlyphLeft
Spacing = 4
MouseContinuouslyDownInterval = 100
OnClick = suiButton6Click
ResHandle = 0
end
object suiButton9: TsuiButton
Left = 584
Top = 249
Width = 50
Height = 25
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
Caption = #21462#28040
AutoSize = False
ParentFont = False
UIStyle = MacOS
TabOrder = 5
Transparent = True
ModalResult = 0
FocusedRectMargin = 2
Layout = blGlyphLeft
Spacing = 4
MouseContinuouslyDownInterval = 100
OnClick = suiButton9Click
ResHandle = 0
end
object suiButton10: TsuiButton
Left = 528
Top = 249
Width = 50
Height = 25
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
Caption = #25552#20132
AutoSize = False
ParentFont = False
UIStyle = MacOS
TabOrder = 6
Transparent = True
ModalResult = 0
FocusedRectMargin = 2
Layout = blGlyphLeft
Spacing = 4
MouseContinuouslyDownInterval = 100
OnClick = suiButton10Click
ResHandle = 0
end
object dbedtxfxm_lxbh: TDBEdit
Left = 72
Top = 256
Width = 160
Height = 22
DataField = 'xfxm_lxbh'
DataSource = ds4
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
end
object dbedtxfxm_mc: TDBEdit
Left = 72
Top = 280
Width = 160
Height = 22
DataField = 'xfxm_mc'
DataSource = ds4
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnKeyPress = dbedtxfxm_mcKeyPress
end
object dbedtxfxm_jp: TDBEdit
Left = 304
Top = 280
Width = 160
Height = 22
DataField = 'xfxm_jp'
DataSource = ds4
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
OnKeyPress = dbedtxfxm_jpKeyPress
end
object dbedtxfxm_ysdj: TDBEdit
Left = 536
Top = 280
Width = 160
Height = 22
DataField = 'xfxm_ysdj'
DataSource = ds4
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 10
OnKeyPress = dbedtxfxm_ysdjKeyPress
end
object dbedtxfxm_dzbl: TDBEdit
Left = 304
Top = 304
Width = 160
Height = 22
DataField = 'xfxm_dzbl'
DataSource = ds4
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 11
OnKeyPress = dbedtxfxm_dzblKeyPress
end
object dbedtxfxm_qmye: TDBEdit
Left = 536
Top = 304
Width = 160
Height = 22
DataField = 'xfxm_qmye'
DataSource = ds4
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 12
OnKeyPress = dbedtxfxm_qmyeKeyPress
end
object dbedtxfxm_cbdj: TDBEdit
Left = 72
Top = 304
Width = 160
Height = 22
DataField = 'xfxm_cbdj'
DataSource = ds4
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 13
OnKeyPress = dbedtxfxm_ysdjKeyPress
end
end
object ds1: TClientDataSet
Aggregates = <>
Params = <>
ProviderName = 'dspRoomXMLX'
RemoteServer = LoginForm.SocketConnection1
AfterScroll = ds1AfterScroll
Left = 12
Top = 67
object wdstrngfldds1Xmlx_bh: TWideStringField
FieldName = 'Xmlx_bh'
Size = 50
end
object wdstrngfldds1Xmlx_xmmc: TWideStringField
FieldName = 'Xmlx_xmmc'
Size = 50
end
end
object ds2: TDataSource
DataSet = ds1
Left = 44
Top = 67
end
object ds3: TClientDataSet
Aggregates = <>
IndexFieldNames = 'xfxm_lxbh'
MasterFields = 'Xmlx_bh'
MasterSource = ds2
PacketRecords = 0
Params = <>
ProviderName = 'dspRoomXFXM'
RemoteServer = LoginForm.SocketConnection1
Left = 12
Top = 212
object wdstrngfldds3xfxm_lxbh: TWideStringField
FieldName = 'xfxm_lxbh'
Size = 50
end
object wdstrngfldds3xfxm_mc: TWideStringField
FieldName = 'xfxm_mc'
Size = 50
end
object wdstrngfldds3xfxm_jp: TWideStringField
FieldName = 'xfxm_jp'
Size = 50
end
object ds3xfxm_ysdj: TFloatField
Alignment = taLeftJustify
FieldName = 'xfxm_ysdj'
EditFormat = '#.##'
end
object ds3xfxm_dzbl: TFloatField
Alignment = taLeftJustify
FieldName = 'xfxm_dzbl'
end
object ds3xfxm_qmye: TIntegerField
Alignment = taLeftJustify
FieldName = 'xfxm_qmye'
end
object ds3xfxm_cbdj: TFloatField
Alignment = taLeftJustify
FieldName = 'xfxm_cbdj'
end
end
object ds4: TDataSource
DataSet = ds3
Left = 44
Top = 212
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -