📄 ufrm_vendor.~dfm
字号:
inherited frm_vendor: Tfrm_vendor
Left = 195
Top = 112
Width = 771
Height = 591
Caption = 'frm_vendor'
PixelsPerInch = 96
TextHeight = 13
inherited CoolBar1: TCoolBar
Width = 763
Bands = <
item
Control = ToolBar1
ImageIndex = -1
MinHeight = 29
Width = 759
end>
inherited ToolBar1: TToolBar
Width = 746
inherited tbHelp: TToolButton
Visible = False
end
inherited tbother: TToolButton
Visible = False
end
end
end
inherited Page01: TPageControl
Width = 763
Height = 531
ActivePage = TabSheet1
TabIndex = 0
inherited TabSheet1: TTabSheet
inherited panelEdit: TPanel
Width = 755
Height = 500
object Label1: TLabel
Left = 32
Top = 36
Width = 72
Height = 13
Caption = #20379#24212#21830#32534#21495#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 320
Top = 34
Width = 72
Height = 13
Caption = #20379#24212#21830#31616#31216#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 32
Top = 75
Width = 72
Height = 13
Caption = #20379#24212#21830#20840#31216#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 32
Top = 115
Width = 72
Height = 13
Caption = #20379#24212#21830#22320#22336#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 32
Top = 154
Width = 72
Height = 13
Caption = #30005#35805#21495#30721'(1)'#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 320
Top = 158
Width = 72
Height = 13
Caption = #30005#35805#21495#30721'(2)'#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 32
Top = 194
Width = 60
Height = 13
Caption = #20256#30495#21495#30721#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 32
Top = 234
Width = 60
Height = 13
Caption = #36865#36135#22320#22336#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 32
Top = 273
Width = 60
Height = 13
Caption = #36134#21333#22320#22336#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 32
Top = 353
Width = 48
Height = 13
Caption = #30906#35469#21542#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object ACTI: TDBText
Left = 120
Top = 352
Width = 65
Height = 17
DataField = 'ACTI'
DataSource = ds_master
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 32
Top = 313
Width = 60
Height = 13
Caption = #20184#27454#26041#24335#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object F01: TDBEdit
Tag = 1
Left = 120
Top = 32
Width = 121
Height = 21
DataField = 'F01'
DataSource = ds_master
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object F02: TDBEdit
Tag = 1
Left = 427
Top = 32
Width = 121
Height = 21
DataField = 'F02'
DataSource = ds_master
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object F04: TDBEdit
Left = 120
Top = 112
Width = 428
Height = 21
DataField = 'F04'
DataSource = ds_master
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
object F10: TDBComboBox
Left = 120
Top = 312
Width = 121
Height = 21
Style = csDropDownList
DataField = 'F10'
DataSource = ds_master
ItemHeight = 13
TabOrder = 9
end
object F06: TDBEdit
Left = 427
Top = 156
Width = 121
Height = 21
DataField = 'F06'
DataSource = ds_master
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
end
object F08: TDBEdit
Left = 120
Top = 232
Width = 428
Height = 21
DataField = 'F08'
DataSource = ds_master
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
end
object F09: TDBEdit
Left = 120
Top = 272
Width = 428
Height = 21
DataField = 'F09'
DataSource = ds_master
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 8
end
object F07: TDBEdit
Left = 120
Top = 192
Width = 121
Height = 21
DataField = 'F07'
DataSource = ds_master
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
end
object F05: TDBEdit
Left = 120
Top = 152
Width = 121
Height = 21
DataField = 'F05'
DataSource = ds_master
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
end
object F03: TDBEdit
Left = 120
Top = 72
Width = 428
Height = 21
DataField = 'F03'
DataSource = ds_master
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
end
end
inherited TabSheet2: TTabSheet
inherited dbGrid: TdxDBGrid
Width = 755
Height = 500
KeyField = 'F01'
Filter.Criteria = {00000000}
object dbGridF01: TdxDBGridMaskColumn
Caption = #20379#24212#21830#32534#21495
Width = 81
BandIndex = 0
RowIndex = 0
FieldName = 'F01'
end
object dbGridF02: TdxDBGridMaskColumn
Caption = #20379#24212#21830#31616#31216
Width = 83
BandIndex = 0
RowIndex = 0
FieldName = 'F02'
end
object dbGridF03: TdxDBGridMaskColumn
Caption = #20379#24212#21830#20840#31216
Width = 214
BandIndex = 0
RowIndex = 0
FieldName = 'F03'
end
object dbGridF04: TdxDBGridMaskColumn
Caption = #20379#24212#21830#22320#22336
Width = 214
BandIndex = 0
RowIndex = 0
FieldName = 'F04'
end
object dbGridF05: TdxDBGridMaskColumn
Caption = #30005#35805#21495#30721'(1)'
Width = 144
BandIndex = 0
RowIndex = 0
FieldName = 'F05'
end
object dbGridF06: TdxDBGridMaskColumn
Caption = #30005#35805#21495#30721'(2)'
Width = 144
BandIndex = 0
RowIndex = 0
FieldName = 'F06'
end
object dbGridF07: TdxDBGridMaskColumn
Caption = #20256#30495#21495#30721
Width = 144
BandIndex = 0
RowIndex = 0
FieldName = 'F07'
end
object dbGridF08: TdxDBGridMaskColumn
Caption = #36865#36135#22320#22336
Width = 74
BandIndex = 0
RowIndex = 0
FieldName = 'F08'
end
object dbGridF09: TdxDBGridMaskColumn
Caption = #36134#21333#22320#22336
Width = 74
BandIndex = 0
RowIndex = 0
FieldName = 'F09'
end
object dbGridF10: TdxDBGridMaskColumn
Caption = #20184#27454#26041#24335
Width = 74
BandIndex = 0
RowIndex = 0
FieldName = 'F10'
end
object dbGridACTI: TdxDBGridMaskColumn
Width = 34
BandIndex = 0
RowIndex = 0
FieldName = 'ACTI'
end
object dbGridOWUS: TdxDBGridMaskColumn
Width = 74
BandIndex = 0
RowIndex = 0
FieldName = 'OWUS'
end
object dbGridGRUP: TdxDBGridMaskColumn
Width = 74
BandIndex = 0
RowIndex = 0
FieldName = 'GRUP'
end
object dbGridCRET: TdxDBGridDateColumn
Width = 130
BandIndex = 0
RowIndex = 0
FieldName = 'CRET'
end
object dbGridMODU: TdxDBGridMaskColumn
Width = 74
BandIndex = 0
RowIndex = 0
FieldName = 'MODU'
end
object dbGridMODT: TdxDBGridDateColumn
Width = 130
BandIndex = 0
RowIndex = 0
FieldName = 'MODT'
end
end
end
end
inherited qy_master: TQuery
AutoCalcFields = False
DatabaseName = 'JXC_CSD'
SQL.Strings = (
'')
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -