?? mrprmtype.~dfm
字號:
inherited FrmMrpRmtype: TFrmMrpRmtype
Left = 150
Top = 138
Caption = #26448#26009#20998#39006
ClientHeight = 466
ClientWidth = 839
PixelsPerInch = 96
TextHeight = 13
inherited Panel2: TPanel
Top = 70
Width = 839
Height = 396
object Splitter1: TSplitter [0]
Left = 135
Top = 1
Width = 2
Height = 394
end
inherited DBGrid1: TDBGridEh
Left = 137
Width = 496
Height = 394
AutoFitColWidths = True
Font.Height = -15
FooterFont.Height = -9
ParentFont = False
TitleFont.Charset = CHINESEBIG5_CHARSET
TitleFont.Height = -15
Columns = <
item
EditButtons = <>
FieldName = 'fRmTypCode'
Footers = <>
Width = 76
end
item
EditButtons = <>
FieldName = 'fRmTypName'
Footers = <>
Width = 106
end>
end
object Panel3: TPanel
Left = 633
Top = 1
Width = 205
Height = 394
Align = alRight
Ctl3D = False
ParentCtl3D = False
TabOrder = 1
object Label1: TLabel
Left = 28
Top = 45
Width = 72
Height = 16
Caption = #26448#26009#20998#39006':'
Font.Charset = CHINESEBIG5_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #27161#26999#39636
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 36
Top = 133
Width = 72
Height = 16
Caption = #39006#21029#21517#31281':'
Font.Charset = CHINESEBIG5_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #27161#26999#39636
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 39
Top = 75
Width = 8
Height = 16
Font.Charset = CHINESEBIG5_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #27161#26999#39636
Font.Style = []
ParentFont = False
end
object DBEdit1: TDBxEdit
Left = 47
Top = 78
Width = 121
Height = 21
AutoSize = False
Color = 65408
DataField = 'fRmTypCode'
DataSource = DSBase06
TabOrder = 0
OnExit = DBEdit1Exit
FirstCharUpper = False
end
object DBEdit2: TDBxEdit
Left = 47
Top = 165
Width = 121
Height = 21
AutoSize = False
Color = 65408
DataField = 'fRmTypName'
DataSource = DSBase06
TabOrder = 1
FirstCharUpper = False
end
end
object TreeView: TTreeView
Left = 1
Top = 1
Width = 134
Height = 394
Align = alLeft
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
Indent = 19
ParentFont = False
TabOrder = 2
OnChange = TreeViewChange
OnExpanded = TreeViewExpanded
end
end
inherited ToolBar1: TToolBar
Width = 839
Height = 38
inherited ToolButton17: TToolButton
Left = 341
Wrap = False
end
inherited ToolButton10: TToolButton
Left = 349
Top = 0
end
inherited ToolButton21: TToolButton
Left = 386
Top = 0
end
inherited ToolButton11: TToolButton
Left = 432
Top = 0
end
inherited ToolButton12: TToolButton
Left = 469
Top = 0
end
inherited ToolButton18: TToolButton
Left = 506
Top = 0
end
inherited ToolButton13: TToolButton
Left = 514
Top = 0
end
inherited ToolButton19: TToolButton
Left = 551
Top = 0
end
inherited ToolButton20: TToolButton
Left = 588
Top = 0
end
inherited ToolButton15: TToolButton
Left = 596
Top = 0
end
inherited ToolButton14: TToolButton
Left = 633
Top = 0
end
inherited Panelloc: TPanel
Top = 38
Width = 839
object Label7: TLabel
Left = 20
Top = 5
Width = 72
Height = 16
Caption = #26448#26009#20998#39006':'
Font.Charset = CHINESEBIG5_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #27161#26999#39636
Font.Style = []
ParentFont = False
end
object Edit2: TEdit
Left = 98
Top = 6
Width = 121
Height = 19
TabOrder = 0
OnChange = Edit2Change
end
end
inherited DSBase06: TDataSource
DataSet = v_cqusrtorm
end
inherited XPMenu1: TXPMenu
Left = 389
Top = 134
end
object t_rmmst: TQuery
CachedUpdates = True
DatabaseName = 'hb_erp'
SQL.Strings = (
'select *'
'from t_rmmst'
' '
' '
' '
' ')
Left = 341
Top = 77
object t_rmmstfrmcode: TStringField
DisplayLabel = #26448#26009#20195#34399
FieldName = 'frmcode'
Origin = 'DB_DZ.t_rmmst.frmcode'
FixedChar = True
Size = 8
end
object t_rmmstfrmname: TStringField
DisplayLabel = #26448#26009#21517#31281
DisplayWidth = 10
FieldName = 'frmname'
Origin = 'DB_DZ.t_rmmst.frmname'
Size = 50
end
object t_rmmstfrmename: TStringField
DisplayLabel = #35215#26684
FieldName = 'frmename'
Origin = 'DB_DZ.t_rmmst.frmename'
Size = 50
end
object t_rmmstfweight: TFloatField
DisplayLabel = #21934#37325
FieldName = 'fweight'
Origin = 'DB_DZ.t_rmmst.fweight'
end
object t_rmmstfrmunit: TStringField
DisplayLabel = #31532#19968#21934#20301
FieldName = 'frmunit'
Origin = 'DB_DZ.t_rmmst.frmunit'
FixedChar = True
Size = 6
end
object t_rmmstl: TFloatField
DisplayLabel = #38263
FieldName = 'l'
Origin = 'DB_DZ.t_rmmst.l'
end
object t_rmmstfrmlUnit: TStringField
DisplayLabel = #21934#20301
FieldName = 'frmlUnit'
Origin = 'DB_DZ.t_rmmst.frmlUnit'
FixedChar = True
Size = 6
end
object t_rmmstw: TFloatField
DisplayLabel = #23532
FieldName = 'w'
Origin = 'DB_DZ.t_rmmst.w'
end
object t_rmmstfrmwUnit: TStringField
DisplayLabel = #21934#20301
FieldName = 'frmwUnit'
Origin = 'DB_DZ.t_rmmst.frmwUnit'
FixedChar = True
Size = 6
end
object t_rmmsth: TFloatField
DisplayLabel = #21402
FieldName = 'h'
Origin = 'DB_DZ.t_rmmst.h'
end
object t_rmmstfrmhUnit: TStringField
DisplayLabel = #21934#20301
FieldName = 'frmhUnit'
Origin = 'DB_DZ.t_rmmst.frmhUnit'
FixedChar = True
Size = 6
end
object t_rmmstfrmfnsh: TStringField
FieldName = 'frmfnsh'
Origin = 'DB_DZ.t_rmmst.frmfnsh'
FixedChar = True
Size = 6
end
object t_rmmstfrmscrew: TStringField
DisplayLabel = #38991#33394
FieldName = 'frmscrew'
Origin = 'DB_DZ.t_rmmst.frmscrew'
FixedChar = True
end
object t_rmmstfrmnstup: TFloatField
FieldName = 'frmnstup'
Origin = 'DB_DZ.t_rmmst.frmnstup'
end
object t_rmmstfrmnstup0: TFloatField
FieldName = 'frmnstup0'
Origin = 'DB_DZ.t_rmmst.frmnstup0'
end
object t_rmmstfrmstdup: TFloatField
DisplayLabel = #27161#28310#20215
FieldName = 'frmstdup'
Origin = 'DB_DZ.t_rmmst.frmstdup'
end
object t_rmmstFCRYCODE: TStringField
DisplayLabel = #24163#21029
FieldName = 'FCRYCODE'
Origin = 'DB_DZ.t_rmmst.FCRYCODE'
FixedChar = True
Size = 1
end
object t_rmmstfkj: TFloatField
DisplayLabel = #23380#24465
FieldName = 'fkj'
Origin = 'DB_DZ.t_rmmst.fkj'
end
object t_rmmstfbctyp: TStringField
DisplayLabel = #31665#22411
FieldName = 'fbctyp'
Origin = 'DB_DZ.t_rmmst.fbctyp'
FixedChar = True
end
object t_rmmstfbctup: TStringField
DisplayLabel = #32025#36074
FieldName = 'fbctup'
Origin = 'DB_DZ.t_rmmst.fbctup'
FixedChar = True
Size = 10
end
object t_rmmstfpp: TStringField
DisplayLabel = #21697#29260
FieldName = 'fpp'
Origin = 'DB_DZ.t_rmmst.fpp'
end
end
object v_loc: TQuery
CachedUpdates = True
BeforePost = v_cqusrtormBeforePost
OnNewRecord = v_cqusrtormNewRecord
DatabaseName = 'hb_erp'
SQL.Strings = (
'select * from (select frmtypcode,frmtypname,fbgtype,fasstype,cas' +
'e when fbgtype='#39'1'#39
'then '#39#26222#36890#20445#31649#39'when fbgtype='#39'2'#39' then '#39#36039#29986#20445#31649#39
'when fbgtype='#39'0'#39' then '#39#20197#33290#25563#26032#39' else '#39#39' '
'end fbgname,fdisp,fsubjectcode from t_RmTypmst) z'
' '
' '
' '
' '
' ')
Left = 304
Top = 192
object StringField1: TStringField
DisplayLabel = #26448#26009#20998#39006
DisplayWidth = 10
FieldName = 'fRmTypCode'
Origin = 'DB_DZ.t_RmTypmst.fRmTypCode'
FixedChar = True
Size = 5
end
object StringField2: TStringField
DisplayLabel = #39006#21029#21517#31281
DisplayWidth = 14
FieldName = 'fRmTypName'
Origin = 'DB_DZ.t_RmTypmst.fRmTypName'
FixedChar = True
end
object StringField3: TStringField
DisplayLabel = #20445#31649#39006#22411
DisplayWidth = 12
FieldName = 'fbgtype'
FixedChar = True
Size = 8
end
object StringField4: TStringField
DisplayLabel = #39023#31034#23383#27573
DisplayWidth = 113
FieldName = 'fdisp'
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -