Group_DJD/D10DJkaimengwenshang
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
74d01e92e1
D10DJkaimengwenshang/项目代码/wenshangkm/G04复核布匹检验/U_TradeMachInsp.dfm

3194 lines
80 KiB
Plaintext
Raw Normal View History

~
2025-09-27 14:24:10 +08:00
inherited frmTradeMachInsp: TfrmTradeMachInsp
Left = 234
Top = 20
Caption = #25104#21697#26816#39564
ClientHeight = 701
ClientWidth = 1308
FormStyle = fsMDIChild
Position = poScreenCenter
Visible = True
ExplicitWidth = 1324
ExplicitHeight = 740
PixelsPerInch = 96
TextHeight = 17
object ScrollBox1: TScrollBox [0]
Left = 617
Top = 0
Width = 448
Height = 701
Align = alLeft
TabOrder = 1
Visible = False
object SpeedButton13: TSpeedButton
Left = 7
Top = 3
Width = 50
Height = 50
Caption = #30772#27934
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton14: TSpeedButton
Left = 63
Top = 3
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton15: TSpeedButton
Left = 119
Top = 3
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton16: TSpeedButton
Left = 175
Top = 3
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton17: TSpeedButton
Left = 231
Top = 3
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton18: TSpeedButton
Left = 287
Top = 3
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton21: TSpeedButton
Left = 343
Top = 3
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton22: TSpeedButton
Left = 7
Top = 59
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton23: TSpeedButton
Left = 63
Top = 63
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton24: TSpeedButton
Left = 119
Top = 61
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton25: TSpeedButton
Left = 175
Top = 61
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton26: TSpeedButton
Left = 231
Top = 61
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton29: TSpeedButton
Left = 287
Top = 61
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton30: TSpeedButton
Left = 343
Top = 61
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton31: TSpeedButton
Left = 7
Top = 119
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton32: TSpeedButton
Left = 63
Top = 119
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton33: TSpeedButton
Left = 119
Top = 119
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton34: TSpeedButton
Left = 175
Top = 119
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton37: TSpeedButton
Left = 231
Top = 119
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton38: TSpeedButton
Left = 287
Top = 119
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton39: TSpeedButton
Left = 343
Top = 119
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton40: TSpeedButton
Left = 7
Top = 177
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton41: TSpeedButton
Left = 63
Top = 177
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton42: TSpeedButton
Left = 119
Top = 177
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton45: TSpeedButton
Left = 175
Top = 177
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton46: TSpeedButton
Left = 231
Top = 177
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton47: TSpeedButton
Left = 287
Top = 177
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton48: TSpeedButton
Left = 343
Top = 177
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton50: TSpeedButton
Left = 7
Top = 235
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton51: TSpeedButton
Left = 63
Top = 235
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton54: TSpeedButton
Left = 119
Top = 235
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton55: TSpeedButton
Left = 175
Top = 235
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton56: TSpeedButton
Left = 231
Top = 235
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton57: TSpeedButton
Left = 287
Top = 235
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton58: TSpeedButton
Left = 343
Top = 235
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton59: TSpeedButton
Left = 7
Top = 291
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton62: TSpeedButton
Left = 63
Top = 291
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton63: TSpeedButton
Left = 119
Top = 291
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton64: TSpeedButton
Left = 175
Top = 291
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton65: TSpeedButton
Left = 231
Top = 291
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton66: TSpeedButton
Left = 287
Top = 291
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton67: TSpeedButton
Left = 343
Top = 291
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton70: TSpeedButton
Left = 7
Top = 347
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton71: TSpeedButton
Left = 63
Top = 347
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton72: TSpeedButton
Left = 119
Top = 347
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton73: TSpeedButton
Left = 175
Top = 347
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton74: TSpeedButton
Left = 231
Top = 347
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton75: TSpeedButton
Left = 287
Top = 347
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton19: TSpeedButton
Left = 343
Top = 347
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton20: TSpeedButton
Left = 7
Top = 403
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton27: TSpeedButton
Left = 63
Top = 403
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton28: TSpeedButton
Left = 119
Top = 403
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton35: TSpeedButton
Left = 175
Top = 403
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton36: TSpeedButton
Left = 231
Top = 403
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton43: TSpeedButton
Left = 287
Top = 403
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton44: TSpeedButton
Left = 343
Top = 403
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton52: TSpeedButton
Left = 7
Top = 459
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton53: TSpeedButton
Left = 63
Top = 459
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton60: TSpeedButton
Left = 119
Top = 459
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton61: TSpeedButton
Left = 175
Top = 459
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton68: TSpeedButton
Left = 231
Top = 459
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton69: TSpeedButton
Left = 287
Top = 459
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton76: TSpeedButton
Left = 343
Top = 459
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton77: TSpeedButton
Left = 7
Top = 515
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton78: TSpeedButton
Left = 63
Top = 515
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton79: TSpeedButton
Left = 119
Top = 515
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton80: TSpeedButton
Left = 175
Top = 515
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton81: TSpeedButton
Left = 231
Top = 515
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton82: TSpeedButton
Left = 287
Top = 515
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton83: TSpeedButton
Left = 343
Top = 515
Width = 50
Height = 50
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object MovePanel1: TMovePanel
Left = 4
Top = 233
Width = 391
Height = 337
BevelInner = bvLowered
Color = clWhite
ParentBackground = False
TabOrder = 0
Visible = False
object Label17: TLabel
Left = 38
Top = 59
Width = 40
Height = 19
Caption = #38271#24230
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 157
Top = 59
Width = 20
Height = 19
Caption = #21040
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object lblLenUnit1: TLabel
Left = 362
Top = 59
Width = 11
Height = 19
Caption = 'M'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object lblCIFName: TLabel
Left = 41
Top = 14
Width = 40
Height = 19
Caption = #30772#27934
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 257
Top = 59
Width = 20
Height = 19
Caption = #20849
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 362
Top = 21
Width = 20
Height = 19
Caption = #20010
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object CIFBeg: TcxTextEdit
Left = 84
Top = 56
ParentFont = False
TabOrder = 0
OnClick = CIFBegClick
Width = 73
end
object Button1: TButton
Left = 171
Top = 273
Width = 66
Height = 43
Caption = #30830#23450
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = Button1Click
end
object Button4: TButton
Left = 283
Top = 273
Width = 64
Height = 42
Caption = #20851#38381
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = Button4Click
end
object CIFEnd: TcxTextEdit
Left = 179
Top = 56
ParentFont = False
TabOrder = 1
OnClick = CIFBegClick
Width = 73
end
object CIFQty: TcxTextEdit
Left = 283
Top = 52
ParentFont = False
TabOrder = 2
OnClick = CIFBegClick
Width = 73
end
object RadioGroup1: TRadioGroup
Left = 0
Top = 91
Width = 389
Height = 176
Color = clWhite
Columns = 2
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
Items.Strings = (
'0-3"'
'3"-6"'
'6"-9"'
#8805'9"'
#25972#21305
#36830#32493#20986#29616#29781#30133)
ParentBackground = False
ParentColor = False
ParentFont = False
TabOrder = 3
end
object Button2: TButton
Left = 14
Top = 273
Width = 82
Height = 42
Caption = #21462#28040#36873#25321
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = Button2Click
end
object CIFNumber: TcxTextEdit
Left = 283
Top = 14
ParentFont = False
TabOrder = 7
OnClick = CIFBegClick
Width = 73
end
object Edit1: TcxTextEdit
Left = 9
Top = 56
ParentFont = False
TabOrder = 8
Text = #8730
OnClick = Edit1Click
Width = 30
end
end
end
object Panel7: TPanel [1]
Left = 1065
Top = 0
Width = 144
Height = 701
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 6
object AOrdDefNote1: TRichEdit
Left = 2
Top = 116
Width = 140
Height = 583
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
Zoom = 100
end
object Panel1: TPanel
Left = 6
Top = 510
Width = 282
Height = 206
Caption = 'Panel1'
TabOrder = 1
Visible = False
object Pic_Image1: TcxDBImage
Left = 1
Top = 1
Hint = 'FileName'
Align = alClient
DataBinding.DataField = 'FilesOther'
DataBinding.DataSource = DataSource2
Properties.GraphicClassName = 'TdxSmartImage'
Properties.GraphicTransparency = gtTransparent
Properties.ReadOnly = True
Properties.ShowFocusRect = False
Style.BorderStyle = ebsSingle
TabOrder = 0
OnDblClick = Pic_Image1DblClick
Height = 204
Width = 280
end
end
object Panel8: TPanel
Left = 6
Top = 274
Width = 282
Height = 206
Caption = 'Panel8'
TabOrder = 2
Visible = False
object cxDBImage1: TcxDBImage
Left = 1
Top = 1
Hint = 'FileName'
Align = alClient
DataBinding.DataField = 'FilesOther'
DataBinding.DataSource = DS_ImgHX
Properties.GraphicClassName = 'TdxSmartImage'
Properties.GraphicTransparency = gtTransparent
Properties.ReadOnly = True
Properties.ShowFocusRect = False
Style.BorderStyle = ebsSingle
TabOrder = 0
OnDblClick = cxDBImage1DblClick
Height = 204
Width = 280
end
end
object ToolBar1: TToolBar
Tag = 1
Left = 2
Top = 2
Width = 140
Height = 114
AutoSize = True
ButtonHeight = 38
ButtonWidth = 91
Caption = 'ToolBar1'
Color = clSkyBlue
EdgeInner = esNone
EdgeOuter = esNone
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_TradeInsp.ImageList_new32
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 3
object btnRK: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20837#24211
ImageIndex = 12
Wrap = True
OnClick = btnRKClick
end
object ToolButton2: TToolButton
Left = 0
Top = 38
AutoSize = True
Caption = #30721#21333#25171#21360
ImageIndex = 21
Wrap = True
OnClick = ToolButton2Click
end
object btnCXRK: TToolButton
Left = 0
Top = 76
AutoSize = True
Caption = #25764#38144#20837#24211
ImageIndex = 11
OnClick = btnCXRKClick
end
end
end
object pnlSet: TPanel [2]
Left = 417
Top = 0
Width = 200
Height = 701
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clWhite
ParentBackground = False
TabOrder = 5
Visible = False
object Label35: TLabel
Left = 27
Top = 55
Width = 21
Height = 23
Caption = #31204
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 6
Top = 15
Width = 42
Height = 23
Caption = #30721#34920
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label26: TLabel
Left = 6
Top = 94
Width = 42
Height = 23
Caption = #20986#32440
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 86
Top = 94
Width = 42
Height = 23
Caption = #20221#25968
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 86
Top = 15
Width = 42
Height = 23
Caption = #21333#20301
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 6
Top = 136
Width = 42
Height = 23
Caption = #38271#24230
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 6
Top = 178
Width = 42
Height = 23
Caption = #37325#37327
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label19: TLabel
Left = 6
Top = 224
Width = 84
Height = 23
Caption = #31859#25968#20445#30041
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label20: TLabel
Left = 161
Top = 224
Width = 21
Height = 23
Caption = #20301
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label21: TLabel
Left = 6
Top = 255
Width = 84
Height = 23
Caption = #30721#25968#20445#30041
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 161
Top = 255
Width = 21
Height = 23
Caption = #20301
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label30: TLabel
Left = 161
Top = 286
Width = 21
Height = 23
Caption = #20301
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label33: TLabel
Left = 6
Top = 286
Width = 84
Height = 23
Caption = #37325#37327#20445#30041
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label31: TLabel
Left = 8
Top = 462
Width = 84
Height = 23
Caption = #21367#21495#29983#25104
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label34: TLabel
Left = 86
Top = 55
Width = 42
Height = 23
Caption = #31216#37325
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label41: TLabel
Left = 10
Top = 327
Width = 42
Height = 23
Caption = #25171#21253
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object edtChen: TcxTextEdit
Left = 50
Top = 52
ParentFont = False
TabOrder = 0
Text = #8730
OnClick = edtChenClick
Width = 30
end
object edtMaBiao: TcxTextEdit
Left = 50
Top = 13
ParentFont = False
TabOrder = 1
Text = #8730
OnClick = edtChenClick
Width = 30
end
object ComboBox1: TComboBox
Left = 130
Top = 92
Width = 43
Height = 28
Style = csDropDownList
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemIndex = 1
ParentFont = False
TabOrder = 2
Text = '2'
Items.Strings = (
'1'
'2'
'3'
'4')
end
object Edit6: TcxTextEdit
Left = 50
Top = 92
ParentFont = False
TabOrder = 3
Text = #8730
OnClick = Edit6Click
OnKeyPress = MJstr3KeyPress
Width = 30
end
object edtMBDW: TcxTextEdit
Left = 130
Top = 12
ParentFont = False
TabOrder = 4
Text = #8730
OnClick = edtChenClick
Width = 30
end
object MinLen: TcxTextEdit
Left = 50
Top = 133
ParentFont = False
TabOrder = 5
OnClick = CIFBegClick
OnExit = MPlaceExit
OnKeyPress = MJstr3KeyPress
Width = 63
end
object MinWeight: TcxTextEdit
Left = 50
Top = 175
ParentFont = False
TabOrder = 6
OnClick = CIFBegClick
OnExit = MPlaceExit
OnKeyPress = MJstr3KeyPress
Width = 63
end
object MaxLen: TcxTextEdit
Left = 119
Top = 133
ParentFont = False
TabOrder = 7
OnClick = CIFBegClick
OnExit = MPlaceExit
OnKeyPress = MJstr3KeyPress
Width = 63
end
object MaxWeight: TcxTextEdit
Left = 119
Top = 175
ParentFont = False
TabOrder = 8
OnClick = CIFBegClick
OnExit = MPlaceExit
OnKeyPress = MJstr3KeyPress
Width = 63
end
object MPlace: TcxTextEdit
Left = 92
Top = 222
ParentFont = False
TabOrder = 9
OnClick = CIFBegClick
OnExit = MPlaceExit
OnKeyPress = MJstr3KeyPress
Width = 63
end
object YPlace: TcxTextEdit
Left = 92
Top = 253
ParentFont = False
TabOrder = 10
OnClick = CIFBegClick
OnExit = MPlaceExit
OnKeyPress = MJstr3KeyPress
Width = 63
end
object KgPlace: TcxTextEdit
Left = 92
Top = 284
ParentFont = False
TabOrder = 11
OnClick = CIFBegClick
OnExit = MPlaceExit
OnKeyPress = MJstr3KeyPress
Width = 63
end
object ComboBox2: TComboBox
Left = 94
Top = 460
Width = 89
Height = 28
Style = csDropDownList
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemIndex = 0
ParentFont = False
TabOrder = 12
Text = #33258#21160
Visible = False
OnChange = ComboBox2Change
Items.Strings = (
#33258#21160
#25163#21160)
end
object ComboBox3: TComboBox
Left = 129
Top = 47
Width = 65
Height = 28
Style = csDropDownList
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ItemIndex = 0
ParentFont = False
TabOrder = 13
Text = #27611#37325
Visible = False
OnChange = ComboBox3Change
Items.Strings = (
#27611#37325
#20928#37325)
end
object edtdabao: TcxTextEdit
Left = 54
Top = 319
ParentFont = False
TabOrder = 14
OnClick = edtdabaoClick
Width = 30
end
object edtfrnshu: TcxTextEdit
Left = 90
Top = 325
ParentFont = False
TabOrder = 15
OnClick = CIFBegClick
OnExit = MPlaceExit
OnKeyPress = MJstr3KeyPress
Width = 63
end
end
object Panel4: TPanel [3]
Left = 1209
Top = 0
Width = 99
Height = 701
Align = alClient
Caption = 'Panel4'
TabOrder = 2
object cxGrid3: TcxGrid
Left = 1
Top = 229
Width = 97
Height = 278
Align = alClient
TabOrder = 0
object Tv3: TcxGridDBTableView
OnMouseDown = Tv3MouseDown
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
OnCustomDrawCell = Tv3CustomDrawCell
DataController.DataSource = DS_3
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = v3Column4
end
item
Kind = skSum
Column = v3Column5
end
item
Format = #21367#25968':0'
Kind = skCount
Column = cxGridDBColumn1
end
item
Kind = skSum
end
item
Kind = skSum
Column = Tv3Column3
end
item
Kind = skSum
Column = Tv3Column1
end
item
Kind = skSum
end
item
Kind = skCount
Column = v3Column1
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Header = DataLink_TradeInsp.Default
object v3Column1: TcxGridDBColumn
Caption = #21367#21495
DataBinding.FieldName = 'PieceNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 40
end
object Tv3Column3: TcxGridDBColumn
Caption = #30721#25968
DataBinding.FieldName = 'Yardage'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 62
end
object Tv3Column1: TcxGridDBColumn
Caption = #31859#25968
DataBinding.FieldName = 'Meter'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 62
end
object v3Column5: TcxGridDBColumn
Caption = #20928#37325
DataBinding.FieldName = 'NetWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 50
end
object v3Column4: TcxGridDBColumn
Caption = #27611#37325
DataBinding.FieldName = 'GrossWeight'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 50
end
object Tv3Column4: TcxGridDBColumn
Caption = #31561#32423
DataBinding.FieldName = 'Grade'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 54
end
object cxGridDBColumn1: TcxGridDBColumn
Caption = #21367#26465#30721
DataBinding.FieldName = 'CIID'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 113
end
object Tv3Column2: TcxGridDBColumn
Caption = #25209#21495
DataBinding.FieldName = 'BatchNO'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 56
end
object Tv3Column5: TcxGridDBColumn
Caption = #21253#21495
DataBinding.FieldName = 'PacketNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 57
end
end
object cxGridLevel2: TcxGridLevel
GridView = Tv3
end
end
object cxPageControl1: TcxPageControl
Left = 1
Top = 507
Width = 97
Height = 193
Align = alBottom
TabOrder = 1
Properties.ActivePage = cxTabSheet1
Properties.CustomButtons.Buttons = <>
ClientRectBottom = 191
ClientRectLeft = 2
ClientRectRight = 95
ClientRectTop = 32
object cxTabSheet1: TcxTabSheet
Caption = #24405#20837
ImageIndex = 0
object cxGrid2: TcxGrid
Left = 0
Top = 0
Width = 93
Height = 159
Align = alClient
TabOrder = 0
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
OnCellDblClick = Tv2CellDblClick
DataController.DataSource = DS_2
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = Tv2CDQty
end
item
Kind = skSum
Column = v2Column3
end
item
Kind = skSum
Column = v2Column4
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsSelection.CellSelect = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Footer = DataLink_TradeInsp.Default
Styles.Header = DataLink_TradeInsp.Default
object tv2CDType: TcxGridDBColumn
Caption = #30133#28857#21517#31216
DataBinding.FieldName = 'CIFName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 75
end
object tv2CDWZ: TcxGridDBColumn
Caption = #20301#32622#36215
DataBinding.FieldName = 'CIFbeg'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Options.Sorting = False
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 52
end
object v2Column2: TcxGridDBColumn
Caption = #20301#32622#27490
DataBinding.FieldName = 'CIFend'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 51
end
object Tv2CDQty: TcxGridDBColumn
Caption = #38271#24230
DataBinding.FieldName = 'CIFQty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 46
end
object Tv2CDReason: TcxGridDBColumn
Caption = #21407#22240
DataBinding.FieldName = 'CDReason'
DataBinding.IsNullValueType = True
Visible = False
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Styles.Content = cxStyle2
Styles.Header = cxStyle1
Width = 60
end
object v2Column1: TcxGridDBColumn
DataBinding.FieldName = 'CDQty'
DataBinding.IsNullValueType = True
Visible = False
Width = 60
end
object v2Column3: TcxGridDBColumn
Caption = #25187#20998
DataBinding.FieldName = 'CIFPoints'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 54
end
object v2Column4: TcxGridDBColumn
Caption = #20010#25968
DataBinding.FieldName = 'CIFNumber'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 36
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv2
end
end
end
object 查看: TcxTabSheet
Caption = #26597#30475
ImageIndex = 1
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object cxGrid1: TcxGrid
Left = 0
Top = 0
Width = 93
Height = 159
Align = alClient
TabOrder = 0
object TV1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_1
DataController.Filter.AutoDataSetFilter = True
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = cxGridDBColumn5
end
item
Kind = skSum
Column = cxGridDBColumn8
end
item
Kind = skSum
Column = cxGridDBColumn9
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsSelection.CellSelect = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Footer = DataLink_TradeInsp.Default
Styles.Header = DataLink_TradeInsp.Default
object cxGridDBColumn2: TcxGridDBColumn
Caption = #30133#28857#21517#31216
DataBinding.FieldName = 'CIFName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 75
end
object cxGridDBColumn3: TcxGridDBColumn
Caption = #20301#32622#36215
DataBinding.FieldName = 'CIFbeg'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Options.Sorting = False
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 52
end
object cxGridDBColumn4: TcxGridDBColumn
Caption = #20301#32622#27490
DataBinding.FieldName = 'CIFend'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 51
end
object cxGridDBColumn5: TcxGridDBColumn
Caption = #38271#24230
DataBinding.FieldName = 'CIFQty'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 46
end
object cxGridDBColumn6: TcxGridDBColumn
Caption = #21407#22240
DataBinding.FieldName = 'CDReason'
DataBinding.IsNullValueType = True
Visible = False
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Styles.Content = cxStyle2
Styles.Header = cxStyle1
Width = 60
end
object cxGridDBColumn7: TcxGridDBColumn
DataBinding.FieldName = 'CDQty'
DataBinding.IsNullValueType = True
Visible = False
Width = 60
end
object cxGridDBColumn8: TcxGridDBColumn
Caption = #25187#20998
DataBinding.FieldName = 'CIFPoints'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 54
end
object cxGridDBColumn9: TcxGridDBColumn
Caption = #20010#25968
DataBinding.FieldName = 'CIFNumber'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 36
end
end
object cxGridLevel3: TcxGridLevel
GridView = TV1
end
end
end
end
object ToolBar2: TToolBar
Tag = 1
Left = 1
Top = 1
Width = 97
Height = 228
AutoSize = True
ButtonHeight = 38
ButtonWidth = 91
Caption = 'ToolBar1'
Color = clSkyBlue
EdgeInner = esNone
EdgeOuter = esNone
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_TradeInsp.ImageList_new32
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 2
object ToolButton3: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #37325#25171
ImageIndex = 21
Wrap = True
OnClick = ToolButton3Click
end
object ToolButton5: TToolButton
Left = 0
Top = 38
AutoSize = True
Caption = #21024#38500
ImageIndex = 5
Wrap = True
OnClick = ToolButton5Click
end
object ToolButton4: TToolButton
Left = 0
Top = 76
AutoSize = True
Caption = #30133#28857#31649#29702
ImageIndex = 2
Wrap = True
OnClick = ToolButton4Click
end
object ToolButton7: TToolButton
Left = 0
Top = 114
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 16
Wrap = True
OnClick = ToolButton7Click
end
object ToolButton6: TToolButton
Left = 0
Top = 152
AutoSize = True
Caption = #20462#25913
ImageIndex = 3
Wrap = True
OnClick = ToolButton6Click
end
object ToolButton8: TToolButton
Left = 0
Top = 190
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = ToolButton8Click
end
end
end
object Panel9: TPanel [4]
Left = 0
Top = 0
Width = 417
Height = 701
Align = alLeft
Color = clWhite
ParentBackground = False
TabOrder = 4
object Panel2: TPanel
Left = 1
Top = 173
Width = 415
Height = 527
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentBackground = False
ParentFont = False
TabOrder = 1
object lblLenUnit: TLabel
Left = 233
Top = 85
Width = 25
Height = 34
Caption = 'M'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -29
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
OnClick = lblLenUnitClick
end
object Label4: TLabel
Left = 231
Top = 139
Width = 44
Height = 34
Caption = 'KG'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -29
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 13
Top = 86
Width = 62
Height = 34
Caption = #38271#24230
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -29
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 13
Top = 139
Width = 62
Height = 34
Caption = #27611#37325
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -29
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 69
Top = 245
Width = 42
Height = 24
Caption = #27491#21697
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 180
Top = 245
Width = 42
Height = 24
Caption = #27425#21697
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object lblRuleConversion: TLabel
Left = 146
Top = 6
Width = 84
Height = 24
Caption = #31859#36716#20844#26020
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label36: TLabel
Left = 15
Top = 7
Width = 42
Height = 23
Caption = #31995#25968
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label29: TLabel
Left = 15
Top = 47
Width = 42
Height = 23
Caption = #25209#21495
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label32: TLabel
Left = 184
Top = 42
Width = 62
Height = 34
Caption = #21367#21495
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -29
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label37: TLabel
Left = 13
Top = 189
Width = 62
Height = 34
Caption = #20928#37325
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -29
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label38: TLabel
Left = 167
Top = 189
Width = 44
Height = 34
Caption = 'KG'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -29
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label39: TLabel
Left = 247
Top = 7
Width = 63
Height = 23
Caption = #21407#32568#21495
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label40: TLabel
Left = 235
Top = 189
Width = 62
Height = 34
Caption = #21253#21495
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -29
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object InputLen: TcxTextEdit
Left = 81
Top = 82
ParentFont = False
TabOrder = 0
OnClick = CIFBegClick
OnKeyPress = MJstr3KeyPress
Width = 146
end
object BTPrint: TButton
Left = 272
Top = 229
Width = 120
Height = 57
Caption = #25552#20132
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = BTPrintClick
end
object Button6: TButton
Left = 303
Top = 83
Width = 80
Height = 45
Caption = #30133#28857
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = Button6Click
end
object Button8: TButton
Left = 303
Top = 134
Width = 80
Height = 45
Caption = #35814#24773
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = Button8Click
end
object Edit3: TcxTextEdit
Left = 45
Top = 241
ParentFont = False
TabOrder = 4
Text = #8730
OnClick = Edit3Click
OnKeyPress = MJstr3KeyPress
Width = 30
end
object Edit4: TcxTextEdit
Left = 149
Top = 241
ParentFont = False
TabOrder = 5
OnClick = Edit4Click
OnKeyPress = MJstr3KeyPress
Width = 30
end
object Tare: TcxTextEdit
Left = 159
Top = 144
ParentFont = False
TabOrder = 6
OnClick = CIFBegClick
OnKeyPress = MJstr3KeyPress
Width = 66
end
object Coefficient: TcxTextEdit
Left = 60
Top = 5
ParentFont = False
TabOrder = 7
OnClick = CIFBegClick
OnKeyPress = MJstr3KeyPress
Width = 80
end
object InputWeight: TcxTextEdit
Left = 81
Top = 135
ParentFont = False
TabOrder = 8
OnClick = CIFBegClick
OnKeyPress = MJstr3KeyPress
Width = 80
end
object BatchNO: TcxTextEdit
Left = 63
Top = 47
ParentFont = False
TabOrder = 9
OnClick = CIFBegClick
Width = 80
end
object PieceNo: TcxTextEdit
Left = 252
Top = 37
ParentFont = False
TabOrder = 10
Visible = False
OnClick = CIFBegClick
OnKeyPress = MJstr3KeyPress
Width = 102
end
object OutPutWeight: TcxTextEdit
Left = 81
Top = 179
ParentFont = False
TabOrder = 11
OnClick = CIFBegClick
OnKeyPress = MJstr3KeyPress
Width = 80
end
object YGNo: TcxTextEdit
Left = 316
Top = 6
ParentFont = False
TabOrder = 12
OnClick = CIFBegClick
Width = 76
end
object edtPacketNo: TcxTextEdit
Left = 303
Top = 185
ParentFont = False
TabOrder = 13
Visible = False
OnClick = CIFBegClick
OnKeyPress = MJstr3KeyPress
Width = 80
end
end
object Panel10: TPanel
Left = 1
Top = 1
Width = 415
Height = 172
Align = alTop
Color = clWhite
ParentBackground = False
TabOrder = 0
object Label22: TLabel
Left = 8
Top = 144
Width = 51
Height = 19
Caption = #25968#37327#65306
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 207
Top = 144
Width = 51
Height = 19
Caption = #21305#25968#65306
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 8
Top = 113
Width = 51
Height = 19
Caption = #32568#21495#65306
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label23: TLabel
Left = 207
Top = 82
Width = 51
Height = 19
Caption = #39068#33394#65306
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label24: TLabel
Left = 8
Top = 82
Width = 51
Height = 19
Caption = #33394#21495#65306
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label25: TLabel
Left = 207
Top = 49
Width = 51
Height = 19
Caption = #21697#21517#65306
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label27: TLabel
Left = 8
Top = 49
Width = 51
Height = 19
Caption = #35745#21010#65306
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 12
Top = 12
Width = 80
Height = 27
Caption = #25195#25551#20837#21475
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Label28: TLabel
Left = 207
Top = 113
Width = 51
Height = 19
Caption = #21345#21495#65306
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
end
object Piece: TcxTextEdit
Left = 248
Top = 141
ParentFont = False
TabOrder = 0
Width = 144
end
object Qty: TcxTextEdit
Left = 53
Top = 142
ParentFont = False
TabOrder = 1
Width = 144
end
object FtyPCId: TcxTextEdit
Left = 53
Top = 111
ParentFont = False
TabOrder = 2
Width = 144
end
object Color: TcxTextEdit
Left = 248
Top = 80
ParentFont = False
TabOrder = 3
Width = 144
end
object ColorNo: TcxTextEdit
Left = 53
Top = 80
ParentFont = False
TabOrder = 4
Width = 144
end
object CodeName: TcxTextEdit
Left = 248
Top = 47
ParentFont = False
TabOrder = 5
Width = 144
end
object OrderNo: TcxTextEdit
Left = 53
Top = 47
ParentFont = False
TabOrder = 6
Width = 144
end
object edtScan: TcxTextEdit
Tag = 999
Left = 98
Top = 5
ParentFont = False
Style.Font.Charset = ANSI_CHARSET
Style.Font.Color = clWindowText
Style.Font.Height = -19
Style.Font.Name = #24494#36719#38597#40657
Style.Font.Style = [fsBold]
Style.LookAndFeel.Kind = lfUltraFlat
Style.LookAndFeel.SkinName = 'WXI'
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.Kind = lfUltraFlat
StyleDisabled.LookAndFeel.SkinName = 'WXI'
StyleFocused.LookAndFeel.Kind = lfUltraFlat
StyleFocused.LookAndFeel.SkinName = 'WXI'
StyleHot.LookAndFeel.Kind = lfUltraFlat
StyleHot.LookAndFeel.SkinName = 'WXI'
TabOrder = 7
OnClick = edtScanClick
OnDblClick = edtScanDblClick
OnKeyPress = edtScanKeyPress
Width = 185
end
object Button3: TButton
Left = 334
Top = 7
Width = 58
Height = 34
Caption = #35774#32622
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnClick = Button3Click
end
object BCIOID: TcxTextEdit
Left = 248
Top = 111
ParentFont = False
TabOrder = 9
Width = 144
end
end
end
object Panel3: TPanel [5]
Left = 69
Top = 468
Width = 276
Height = 207
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 3
object SpeedButton1: TSpeedButton
Left = 1
Top = 0
Width = 70
Height = 70
Caption = '1'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 68
Top = 0
Width = 70
Height = 70
Caption = '2'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton3: TSpeedButton
Left = 136
Top = 0
Width = 70
Height = 70
Caption = '3'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton4: TSpeedButton
Left = 204
Top = -3
Width = 70
Height = 70
Caption = #8592
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton12Click
end
object SpeedButton5: TSpeedButton
Left = 0
Top = 68
Width = 70
Height = 70
Caption = '4'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton6: TSpeedButton
Left = 68
Top = 68
Width = 70
Height = 70
Caption = '5'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton7: TSpeedButton
Left = 136
Top = 68
Width = 70
Height = 70
Caption = '6'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton8: TSpeedButton
Left = 204
Top = 68
Width = 70
Height = 70
Caption = '0'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton9: TSpeedButton
Left = 0
Top = 136
Width = 70
Height = 70
Caption = '7'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton10: TSpeedButton
Left = 68
Top = 136
Width = 70
Height = 70
Caption = '8'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton11: TSpeedButton
Tag = 9
Left = 136
Top = 136
Width = 70
Height = 70
Caption = '9'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = #40657#20307
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton12: TSpeedButton
Left = 204
Top = 136
Width = 70
Height = 70
Caption = '.'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
Left = 1313
Top = 223
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
Left = 1305
Top = 168
end
object cxStyleRepository1: TcxStyleRepository
Left = 1104
Top = 211
PixelsPerInch = 96
object cxStyle1: TcxStyle
AssignedValues = [svColor, svFont]
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = [fsBold]
end
object cxStyle2: TcxStyle
AssignedValues = [svFont, svTextColor]
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Pitch = fpFixed
Font.Style = [fsBold]
TextColor = clDefault
end
object cxStyle4: TcxStyle
AssignedValues = [svFont]
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
end
end
object GPM_1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 1149
Top = 717
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 848
Top = 127
end
object ADOCmd: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
Parameters = <>
Left = 912
Top = 123
end
object RMDB_1: TRMDBDataSet
Visible = True
DataSet = ADOQueryPrint
Left = 832
Top = 591
end
object DS_2: TDataSource
DataSet = CDS_2
Left = 1256
Top = 615
end
object CDS_2: TClientDataSet
Aggregates = <>
Params = <>
Left = 1184
Top = 615
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 756
Top = 611
end
object GPM_2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 1136
Top = 658
end
object ADOQueryMainDSC: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
LockType = ltReadOnly
Parameters = <>
SQL.Strings = (
'select A.*,C.OrderNo,B.SWFBColor,B.SWFBHW,B.SWFBCodeName,'
' B.SWFBCode,B.SWFBKZ,B.WKMS,B.KZBig,B.KZSmal,'
' SCMQty=(select isnull(Sum(MJLen),0) from WFB_MJJY WM wher' +
'e WM.APId=A.APId and len(WM.MJID)>8),'
' Case when A.OrderQtyM-(select isnull(Sum(MJLen),0) from W' +
'FB_MJJY WM where WM.APId=A.APId )>0 '
' then A.OrderQtyM-(select isnull(Sum(MJLen),0) fr' +
'om WFB_MJJY WM where WM.APId=A.APId ) else 0 end as WSCMQty'
'from WFBOrder_Sub_AnPai A '
'inner join WFBOrder_Sub B on A.SubId=B.SubId'
'inner join WFBOrder_Main C on A.MainId=C.MainId'
'where C.ChkStatus='#39#23457#26680#36890#36807#39' and RTrim(isnull(A.SCStatus,'#39#39'))<>'#39#24050#23436#25104#39 +
' '
'and isnull(B.AnPaiChkStatus,'#39#39')='#39#23457#26680#36890#36807#39' and A.SCXDFlag=1'
'')
Left = 1072
Top = 135
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [rmpbZoom, rmpbLoad, rmpbSave, rmpbPrint, rmpbFind, rmpbPageSetup, rmpbExit, rmpbExport, rmpbNavigator]
DefaultCollate = False
ShowPrintDialog = False
SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
PreviewOptions.RulerUnit = rmutScreenPixels
PreviewOptions.RulerVisible = False
PreviewOptions.DrawBorder = False
PreviewOptions.BorderPen.Color = clGray
PreviewOptions.BorderPen.Style = psDash
Dataset = RMDB_1
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 676
Top = 583
ReportData = {}
end
object ADOTmp: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
Parameters = <>
Left = 975
Top = 118
end
object CDS_3: TClientDataSet
Aggregates = <>
Params = <>
Left = 1232
Top = 399
end
object DS_3: TDataSource
DataSet = CDS_3
Left = 1360
Top = 391
end
object ADOQueryImage: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
Parameters = <>
Left = 896
Top = 642
end
object DataSource2: TDataSource
DataSet = ADOQueryImage
Left = 980
Top = 630
end
object IdFTP1: TIdFTP
ConnectTimeout = 0
NATKeepAlive.UseKeepAlive = False
NATKeepAlive.IdleTimeMS = 0
NATKeepAlive.IntervalMS = 0
ProxySettings.ProxyType = fpcmNone
ProxySettings.Port = 0
ReadTimeout = 0
Left = 928
Top = 577
end
object DS_ImgHX: TDataSource
DataSet = Qry_ImgHX
Left = 1036
Top = 406
end
object Qry_ImgHX: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
Parameters = <>
Left = 920
Top = 402
end
object DS_1: TDataSource
DataSet = CDS_1
Left = 1272
Top = 703
end
object CDS_1: TClientDataSet
Aggregates = <>
Params = <>
Left = 1200
Top = 703
end
object GPM_3: TcxGridPopupMenu
Grid = cxGrid3
PopupMenus = <>
Left = 1160
Top = 402
end
object ADOQueryTmp: TADOQuery
Connection = DataLink_TradeInsp.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 426
Top = 588
end
end
Reference in New Issue Copy Permalink