📄 dfm_saleset.dfm
字号:
object dfmsaleset: Tdfmsaleset
Left = 217
Top = 213
Width = 456
Height = 344
Caption = #38144#21806#31995#32479#35774#32622
Color = 13422259
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = False
Position = poMainFormCenter
Visible = True
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object StatusBar1: TStatusBar
Left = 0
Top = 298
Width = 448
Height = 19
Panels = <>
SimplePanel = False
end
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 448
Height = 176
Align = alClient
DataSource = dsdefault
ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
ReadOnly = True
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'bmh'
Title.Alignment = taCenter
Title.Caption = #40664#35748#24215#21495
Width = 74
Visible = True
end
item
Expanded = False
FieldName = 'ctop'
Title.Alignment = taCenter
Title.Caption = #31080#22836
Width = 144
Visible = True
end
item
Expanded = False
FieldName = 'cbottom'
Title.Alignment = taCenter
Title.Caption = #31080#23614
Width = 117
Visible = True
end
item
Expanded = False
FieldName = 'cdec'
Title.Caption = #23567#25968#20301
Visible = True
end>
end
object Panel1: TPanel
Left = 0
Top = 176
Width = 448
Height = 97
Align = alBottom
TabOrder = 2
object Label2: TLabel
Left = 15
Top = 53
Width = 48
Height = 12
Caption = #31080' '#23614
end
object Label11: TLabel
Left = 15
Top = 12
Width = 48
Height = 12
Caption = #40664#35748#24215#21495
end
object Label1: TLabel
Left = 15
Top = 32
Width = 48
Height = 12
Caption = #31080' '#22836
end
object Label3: TLabel
Left = 15
Top = 74
Width = 48
Height = 12
Caption = #23567' '#25968' '#20301
end
object Label4: TLabel
Left = 150
Top = 75
Width = 120
Height = 12
Caption = ' 0 '#20803' 1 '#35282' 3 '#20998' '
Color = clBackground
ParentColor = False
end
object DBLookupComboBox1: TDBLookupComboBox
Left = 72
Top = 8
Width = 129
Height = 20
DataField = 'bmh'
DataSource = dsdefault
KeyField = 'bmh'
ListField = 'bmmc'
ListSource = DataSource1
TabOrder = 0
end
object DBEdit1: TDBEdit
Left = 72
Top = 50
Width = 273
Height = 20
DataField = 'cbottom'
DataSource = dsdefault
TabOrder = 1
end
object DBEdit2: TDBEdit
Left = 72
Top = 29
Width = 273
Height = 20
DataField = 'ctop'
DataSource = dsdefault
TabOrder = 2
end
object DBComboBox1: TDBComboBox
Left = 72
Top = 71
Width = 65
Height = 20
DataField = 'cdec'
DataSource = dsdefault
ItemHeight = 12
Items.Strings = (
'0'
'1'
'2')
TabOrder = 3
end
end
object Panel2: TPanel
Left = 0
Top = 273
Width = 448
Height = 25
Align = alBottom
BevelInner = bvLowered
TabOrder = 3
object postbtn: TBitBtn
Left = 0
Top = 0
Width = 75
Height = 25
Caption = #30830#23450
Default = True
ModalResult = 1
TabOrder = 0
OnClick = postbtnClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object cancelbtn: TBitBtn
Left = 150
Top = 0
Width = 75
Height = 25
Cancel = True
Caption = #21462#28040
ModalResult = 2
TabOrder = 1
OnClick = cancelbtnClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333000033338833333333333333333F333333333333
0000333911833333983333333388F333333F3333000033391118333911833333
38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
911118111118333338F3338F833338F3000033333911111111833333338F3338
3333F8330000333333911111183333333338F333333F83330000333333311111
8333333333338F3333383333000033333339111183333333333338F333833333
00003333339111118333333333333833338F3333000033333911181118333333
33338333338F333300003333911183911183333333383338F338F33300003333
9118333911183333338F33838F338F33000033333913333391113333338FF833
38F338F300003333333333333919333333388333338FFF830000333333333333
3333333333333333333888330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object editbtn: TBitBtn
Left = 75
Top = 0
Width = 75
Height = 25
Caption = #32534#36753
TabOrder = 2
OnClick = editbtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
00333377737FFFFF773333303300000003333337337777777333}
NumGlyphs = 2
end
end
object dsdefault: TDataSource
DataSet = atblsaleset
OnStateChange = dsdefaultStateChange
Left = 16
Top = 48
end
object atblsaleset: TADOTable
Active = True
Connection = dmRainbowMIS.adopos
CursorType = ctStatic
TableName = 't_salepara'
Left = 48
Top = 48
end
object DataSource1: TDataSource
DataSet = Atblbmda
Left = 96
Top = 48
end
object Atblbmda: TADOTable
Active = True
Connection = dmRainbowMIS.adopos
CursorType = ctStatic
TableName = 't_branch'
Left = 128
Top = 48
end
object DataSource2: TDataSource
DataSet = Atbllabel
Left = 176
Top = 48
end
object Atbllabel: TADOTable
Active = True
Connection = dmRainbowMIS.adopos
CursorType = ctStatic
TableName = 't_label'
Left = 208
Top = 48
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -