Group_99/D7gmYongjin
6
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
74134557cb
D7gmYongjin/坯布生产计划(WeavingSchedule)/U_MJManageNewFDJJAP.dfm

2821 lines
69 KiB
Plaintext
Raw Normal View History

新建3-04
2026-03-04 09:51:44 +08:00
object frmMJManageNewFDJJAP: TfrmMJManageNewFDJJAP
Left = 191
Top = 52
Width = 1683
Height = 923
Caption = #22383#24067#26816#39564
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnClick = FormClick
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1667
Height = 30
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_WeavingSchedule.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object ToolButton1: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 0
OnClick = ToolButton1Click
end
object Panel5: TPanel
Left = 63
Top = 0
Width = 410
Height = 30
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label27: TLabel
Left = 6
Top = 4
Width = 88
Height = 21
Caption = #25195#25551#20837#21475
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label31: TLabel
Left = 255
Top = 4
Width = 12
Height = 21
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object APID: TEdit
Left = 96
Top = 2
Width = 155
Height = 28
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 0
OnKeyPress = APIDKeyPress
end
object Button2: TButton
Left = 277
Top = 3
Width = 75
Height = 25
Caption = #25163#20837#30830#23450
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Visible = False
OnClick = Button2Click
end
end
object Panel7: TPanel
Left = 473
Top = 0
Width = 336
Height = 30
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -23
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object TBClose: TToolButton
Left = 809
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object ScrollBox1: TScrollBox
Left = 0
Top = 67
Width = 625
Height = 817
Align = alLeft
TabOrder = 2
object SpeedButton13: TSpeedButton
Left = 5
Top = 3
Width = 64
Height = 55
Caption = '001'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton14: TSpeedButton
Left = 73
Top = 3
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton15: TSpeedButton
Left = 142
Top = 3
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton16: TSpeedButton
Left = 210
Top = 3
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton17: TSpeedButton
Left = 278
Top = 3
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton18: TSpeedButton
Left = 346
Top = 3
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton19: TSpeedButton
Left = 415
Top = 3
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton20: TSpeedButton
Left = 484
Top = 3
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton21: TSpeedButton
Left = 552
Top = 3
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton22: TSpeedButton
Left = 5
Top = 67
Width = 64
Height = 55
Caption = '001'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton23: TSpeedButton
Left = 73
Top = 67
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton24: TSpeedButton
Left = 142
Top = 67
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton25: TSpeedButton
Left = 210
Top = 67
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton26: TSpeedButton
Left = 278
Top = 67
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton27: TSpeedButton
Left = 346
Top = 67
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton28: TSpeedButton
Left = 415
Top = 67
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton29: TSpeedButton
Left = 484
Top = 67
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton30: TSpeedButton
Left = 552
Top = 67
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton31: TSpeedButton
Left = 5
Top = 131
Width = 64
Height = 55
Caption = '001'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton32: TSpeedButton
Left = 73
Top = 131
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton33: TSpeedButton
Left = 142
Top = 131
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton34: TSpeedButton
Left = 210
Top = 131
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton35: TSpeedButton
Left = 278
Top = 131
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton36: TSpeedButton
Left = 346
Top = 131
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton37: TSpeedButton
Left = 415
Top = 131
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton38: TSpeedButton
Left = 484
Top = 131
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton39: TSpeedButton
Left = 552
Top = 131
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton40: TSpeedButton
Left = 5
Top = 195
Width = 64
Height = 55
Caption = '001'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton41: TSpeedButton
Left = 73
Top = 195
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton42: TSpeedButton
Left = 142
Top = 195
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton43: TSpeedButton
Left = 210
Top = 195
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton44: TSpeedButton
Left = 278
Top = 195
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton45: TSpeedButton
Left = 346
Top = 195
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton46: TSpeedButton
Left = 415
Top = 195
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton47: TSpeedButton
Left = 484
Top = 195
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton48: TSpeedButton
Left = 552
Top = 195
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton50: TSpeedButton
Left = 5
Top = 259
Width = 64
Height = 55
Caption = '001'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton51: TSpeedButton
Left = 73
Top = 259
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton52: TSpeedButton
Left = 142
Top = 259
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton53: TSpeedButton
Left = 210
Top = 259
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton54: TSpeedButton
Left = 278
Top = 259
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton55: TSpeedButton
Left = 346
Top = 259
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton56: TSpeedButton
Left = 415
Top = 259
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton57: TSpeedButton
Left = 484
Top = 259
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton58: TSpeedButton
Left = 552
Top = 259
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton59: TSpeedButton
Left = 5
Top = 323
Width = 64
Height = 55
Caption = '001'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton60: TSpeedButton
Left = 73
Top = 323
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton61: TSpeedButton
Left = 142
Top = 323
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton62: TSpeedButton
Left = 210
Top = 323
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton63: TSpeedButton
Left = 278
Top = 323
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton64: TSpeedButton
Left = 346
Top = 323
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton65: TSpeedButton
Left = 415
Top = 323
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton66: TSpeedButton
Left = 484
Top = 323
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton67: TSpeedButton
Left = 552
Top = 323
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton68: TSpeedButton
Left = 5
Top = 387
Width = 64
Height = 55
Caption = '001'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton69: TSpeedButton
Left = 73
Top = 387
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton70: TSpeedButton
Left = 142
Top = 387
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton71: TSpeedButton
Left = 210
Top = 387
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton72: TSpeedButton
Left = 278
Top = 387
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton73: TSpeedButton
Left = 346
Top = 387
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton74: TSpeedButton
Left = 415
Top = 387
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton75: TSpeedButton
Left = 484
Top = 387
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton76: TSpeedButton
Left = 552
Top = 387
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton77: TSpeedButton
Left = 5
Top = 451
Width = 64
Height = 55
Caption = '001'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton78: TSpeedButton
Left = 73
Top = 451
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton79: TSpeedButton
Left = 142
Top = 451
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton80: TSpeedButton
Left = 210
Top = 451
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton81: TSpeedButton
Left = 278
Top = 451
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton82: TSpeedButton
Left = 346
Top = 451
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton83: TSpeedButton
Left = 415
Top = 451
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton84: TSpeedButton
Left = 484
Top = 451
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton85: TSpeedButton
Left = 552
Top = 451
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton86: TSpeedButton
Left = 5
Top = 512
Width = 64
Height = 55
Caption = '001'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton87: TSpeedButton
Left = 73
Top = 512
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton88: TSpeedButton
Left = 142
Top = 512
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton89: TSpeedButton
Left = 210
Top = 512
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton90: TSpeedButton
Left = 278
Top = 512
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton91: TSpeedButton
Left = 346
Top = 512
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton92: TSpeedButton
Left = 415
Top = 512
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton93: TSpeedButton
Left = 484
Top = 512
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton94: TSpeedButton
Left = 552
Top = 512
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton95: TSpeedButton
Left = 5
Top = 575
Width = 64
Height = 55
Caption = '001'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton96: TSpeedButton
Left = 73
Top = 575
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton97: TSpeedButton
Left = 142
Top = 575
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton98: TSpeedButton
Left = 210
Top = 575
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton99: TSpeedButton
Left = 278
Top = 575
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton100: TSpeedButton
Left = 346
Top = 575
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton101: TSpeedButton
Left = 415
Top = 575
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton102: TSpeedButton
Left = 484
Top = 575
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton103: TSpeedButton
Left = 552
Top = 575
Width = 64
Height = 55
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
end
object Panel1: TPanel
Left = 0
Top = 30
Width = 1667
Height = 37
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
Visible = False
object Label16: TLabel
Left = 1088
Top = 13
Width = 42
Height = 12
Caption = 'Label16'
Visible = False
end
object Label3: TLabel
Left = 484
Top = 11
Width = 88
Height = 21
Caption = #35843#35797#26426#20462
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label41: TLabel
Left = 1177
Top = 27
Width = 44
Height = 21
Caption = #20195#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object lblCodeName: TLabel
Left = 203
Top = 11
Width = 12
Height = 21
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object BTAdd: TButton
Left = 1195
Top = 8
Width = 46
Height = 25
Caption = #26032#22686
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
Visible = False
OnClick = BTAddClick
end
object BTEdit: TButton
Left = 1155
Top = 8
Width = 38
Height = 25
Caption = #20462#25913
TabOrder = 1
Visible = False
OnClick = BTEditClick
end
object JXPerson: TEdit
Left = 574
Top = 7
Width = 107
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 0
Visible = False
end
object GCCode: TEdit
Left = 1220
Top = 24
Width = 84
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
ReadOnly = True
TabOrder = 3
Visible = False
end
end
object Panel2: TPanel
Left = 625
Top = 67
Width = 221
Height = 817
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 3
object Label11: TLabel
Left = -103
Top = 534
Width = 40
Height = 23
Caption = #27611#37325
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Visible = False
end
object Label30: TLabel
Left = 172
Top = 231
Width = 24
Height = 22
Caption = 'Kg'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object www: TLabel
Left = 9
Top = 230
Width = 40
Height = 23
Caption = #37325#37327
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 267
Top = 143
Width = 44
Height = 21
Caption = #31561#32423
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label43: TLabel
Left = 271
Top = 46
Width = 40
Height = 23
Caption = #30382#37325
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Visible = False
end
object Label45: TLabel
Left = 271
Top = 81
Width = 40
Height = 22
Caption = #20928#37325
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Visible = False
end
object Label29: TLabel
Left = 271
Top = 115
Width = 40
Height = 22
Caption = #31354#21152
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Visible = False
end
object Label46: TLabel
Left = 89
Top = 274
Width = 40
Height = 22
Caption = #25209#21495
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Visible = False
end
object Label49: TLabel
Left = 293
Top = 191
Width = 44
Height = 21
Caption = #29677#27425
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 9
Top = 174
Width = 40
Height = 23
Caption = #26426#21488
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label37: TLabel
Left = 54
Top = 66
Width = 40
Height = 38
Caption = #33258#21160#13#10#21462#20540
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label33: TLabel
Left = 54
Top = 122
Width = 40
Height = 23
Caption = #20986#32440
Font.Charset = ANSI_CHARSET
Font.Color = clBlue
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label1: TLabel
Left = 78
Top = 8
Width = 60
Height = 19
Caption = #35746#21333#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object MJMaoZ: TEdit
Left = 51
Top = 214
Width = 111
Height = 56
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -48
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 0
OnChange = MJMaoZChange
OnClick = MJMaoZClick
end
object BTPrint: TButton
Left = 76
Top = 519
Width = 74
Height = 56
Caption = #20445#23384
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = BTPrintClick
end
object MJPiZ: TEdit
Left = 334
Top = 44
Width = 111
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 1
Visible = False
OnChange = MJPiZChange
end
object MJJingZ: TEdit
Left = 334
Top = 77
Width = 111
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
ReadOnly = True
TabOrder = 3
Visible = False
end
object ClothType: TComboBox
Left = 343
Top = 143
Width = 102
Height = 32
Style = csDropDownList
DropDownCount = 20
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ItemHeight = 24
ParentFont = False
TabOrder = 6
Items.Strings = (
#30333#29677
#22812#29677)
end
object MJKJZ: TEdit
Left = 334
Top = 110
Width = 111
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
ReadOnly = True
TabOrder = 7
Visible = False
end
object APBatchNo: TEdit
Left = 3
Top = 303
Width = 215
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 2
Visible = False
OnClick = MJMaoZClick
end
object WorkShift: TComboBox
Left = 342
Top = 186
Width = 102
Height = 32
Style = csDropDownList
DropDownCount = 20
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ItemHeight = 24
ParentFont = False
TabOrder = 4
Items.Strings = (
#30333#29677
#22812#29677)
end
object CarNo: TEdit
Left = 51
Top = 167
Width = 111
Height = 36
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -28
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
ReadOnly = True
TabOrder = 8
end
object Button3: TButton
Left = 14
Top = 336
Width = 86
Height = 42
Caption = '1-86'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
OnClick = Button3Click
end
object Edit13: TEdit
Left = 98
Top = 65
Width = 44
Height = 43
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -35
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
ReadOnly = True
TabOrder = 10
Text = #8730
OnClick = Edit13Click
end
object Edit6: TEdit
Left = 97
Top = 113
Width = 45
Height = 43
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -35
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
ReadOnly = True
TabOrder = 11
Text = #8730
OnClick = Edit6Click
end
object ConNo: TEdit
Left = 24
Top = 28
Width = 170
Height = 29
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
ReadOnly = True
TabOrder = 12
end
object Button5: TButton
Left = 110
Top = 336
Width = 86
Height = 42
Caption = '87-112'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 13
OnClick = Button5Click
end
object Button6: TButton
Left = 16
Top = 383
Width = 86
Height = 43
Caption = '201-274'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 14
OnClick = Button6Click
end
object Button7: TButton
Left = 111
Top = 384
Width = 86
Height = 43
Caption = '301-328'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 15
OnClick = Button7Click
end
object Button8: TButton
Left = 18
Top = 431
Width = 86
Height = 43
Caption = '401-439'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 16
OnClick = Button8Click
end
object Button9: TButton
Left = 111
Top = 431
Width = 86
Height = 43
Caption = '275-286'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 17
OnClick = Button9Click
end
object Button10: TButton
Left = 18
Top = 475
Width = 86
Height = 43
Caption = '501-541'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 18
OnClick = Button10Click
end
end
object Panel3: TPanel
Left = 94
Top = 313
Width = 383
Height = 231
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 6
Visible = False
object SpeedButton1: TSpeedButton
Left = 4
Top = 3
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 SpeedButton2: TSpeedButton
Left = 78
Top = 3
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 SpeedButton3: TSpeedButton
Left = 152
Top = 3
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 SpeedButton4: TSpeedButton
Left = 226
Top = 3
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 SpeedButton5: TSpeedButton
Left = 4
Top = 75
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 = 78
Top = 75
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 = 152
Top = 75
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 = 226
Top = 75
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 SpeedButton9: TSpeedButton
Left = 4
Top = 150
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 SpeedButton10: TSpeedButton
Left = 78
Top = 150
Width = 70
Height = 70
Caption = '9'
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 = 152
Top = 150
Width = 70
Height = 70
Caption = '.'
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 = 226
Top = 150
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 SpeedButton49: TSpeedButton
Tag = 9
Left = 303
Top = 81
Width = 65
Height = 57
Caption = #38544#34255
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -28
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton49Click
end
end
object Panel4: TPanel
Left = 846
Top = 67
Width = 821
Height = 817
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 4
object cxGrid2: TcxGrid
Left = 2
Top = 98
Width = 817
Height = 136
Align = alTop
TabOrder = 1
Visible = False
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
OnCellDblClick = Tv2CellDblClick
DataController.DataSource = DataSource2
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v2Column2
end
item
Kind = skSum
Column = Tv2CDQty
end
item
Kind = skSum
Column = v2Column3
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsSelection.CellSelect = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object tv2CDType: TcxGridDBColumn
Caption = #30133#28857#21517#31216
DataBinding.FieldName = 'CDName'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 77
end
object tv2CDWZ: TcxGridDBColumn
Caption = #36131#20219#20154
DataBinding.FieldName = 'ZZPerson'
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Options.Sorting = False
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 49
end
object v2Column2: TcxGridDBColumn
Caption = #20010#25968
DataBinding.FieldName = 'CDGS'
HeaderAlignmentHorz = taCenter
HeaderGlyphAlignmentHorz = taCenter
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 57
end
object Tv2CDQty: TcxGridDBColumn
Caption = #31859#25968
DataBinding.FieldName = 'CDQty'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = Tv2CDQtyPropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 51
end
object Tv2CDReason: TcxGridDBColumn
Caption = #21407#22240
DataBinding.FieldName = 'CDReason'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Styles.Content = cxStyle2
Styles.Header = cxStyle1
Width = 131
end
object v2Column1: TcxGridDBColumn
DataBinding.FieldName = 'CDQty'
Visible = False
Width = 55
end
object v2Column3: TcxGridDBColumn
Caption = #20844#26020#25968
DataBinding.FieldName = 'CDKgQty'
Styles.Content = cxStyle1
Styles.Header = cxStyle1
Width = 50
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv2
end
end
object cxGrid3: TcxGrid
Left = 2
Top = 234
Width = 817
Height = 581
Align = alClient
TabOrder = 2
object Tv3: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
OnCellClick = Tv3CellClick
OnCustomDrawCell = Tv3CustomDrawCell
DataController.DataSource = DataSource3
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
Column = v3Column3
end
item
Kind = skCount
Column = v3Column1
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object v3Column5: TcxGridDBColumn
Caption = #20135#21697#21517#31216
DataBinding.FieldName = 'C_CodeName'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 114
end
object v3Column3: TcxGridDBColumn
Caption = #20928#37325
DataBinding.FieldName = 'MJJingZ'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 54
end
object v3Column2: TcxGridDBColumn
Caption = #24211#20301
DataBinding.FieldName = 'KuWei'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 72
end
object v3Column4: TcxGridDBColumn
Caption = #26426#21488#21495
DataBinding.FieldName = 'CarNo'
HeaderAlignmentHorz = taCenter
Width = 49
end
object v3Column1: TcxGridDBColumn
Caption = #21367#21495
DataBinding.FieldName = 'MJXH'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 50
end
object cxGridDBColumn1: TcxGridDBColumn
Caption = #21367#26465#30721
DataBinding.FieldName = 'MJID'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 125
end
object v3Column6: TcxGridDBColumn
Caption = #33539#22260
DataBinding.FieldName = 'IsOutRange'
HeaderAlignmentHorz = taCenter
Width = 66
end
end
object cxGridLevel2: TcxGridLevel
GridView = Tv3
end
end
object Panel6: TPanel
Left = 2
Top = 2
Width = 817
Height = 96
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label32: TLabel
Left = 11
Top = 23
Width = 29
Height = 56
Caption = #21305#13#10#37325
Font.Charset = GB2312_CHARSET
Font.Color = clMaroon
Font.Height = -28
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object LBPiKgQty: TLabel
Left = 177
Top = 2
Width = 26
Height = 103
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -92
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label35: TLabel
Left = 67
Top = 3
Width = 100
Height = 99
Caption = #8594
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -99
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
end
end
object MovePanel1: TMovePanel
Left = 907
Top = 370
Width = 313
Height = 280
BevelInner = bvLowered
Color = clSkyBlue
TabOrder = 5
Visible = False
object Label21: TLabel
Left = 93
Top = 5
Width = 119
Height = 33
Caption = 'Label21'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -32
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 138
Top = 58
Width = 44
Height = 21
Caption = #31859#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = 23
Top = 78
Width = 44
Height = 21
Caption = #20010#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 138
Top = 102
Width = 44
Height = 21
Caption = #20844#26020
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label44: TLabel
Left = 25
Top = 156
Width = 66
Height = 21
Caption = #36131#20219#20154
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Button1: TButton
Left = 36
Top = 206
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 = 3
OnClick = Button1Click
end
object Button4: TButton
Left = 190
Top = 206
Width = 64
Height = 42
Caption = #21462#28040
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = Button4Click
end
object CDQty: TEdit
Left = 185
Top = 48
Width = 88
Height = 41
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 1
OnClick = CDQtyClick
end
object CDGS: TEdit
Left = 67
Top = 68
Width = 61
Height = 41
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 0
OnClick = CDQtyClick
end
object CDKgQty: TEdit
Left = 185
Top = 92
Width = 88
Height = 41
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ParentFont = False
TabOrder = 2
OnClick = CDQtyClick
end
object StaffName: TComboBox
Tag = 1
Left = 95
Top = 151
Width = 146
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ImeName = #20013#25991' - QQ'#25340#38899#36755#20837#27861
ItemHeight = 24
ParentFont = False
TabOrder = 5
Items.Strings = (
#19968#36710#38388
#20108#36710#38388
'')
end
end
object cxStyleRepository1: TcxStyleRepository
Left = 1084
Top = 44
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
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 1104
Top = 44
end
object DataSource1: TDataSource
DataSet = Order_MJ
Left = 1040
end
object Order_MJ: TClientDataSet
Aggregates = <>
Params = <>
Left = 1252
Top = 8
end
object ADOQueryMain: TADOQuery
Connection = DataLink_WeavingSchedule.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1176
end
object ADOCmd: TADOQuery
Connection = DataLink_WeavingSchedule.ADOLink
Parameters = <>
Left = 1128
Top = 8
end
object ADOTmp: TADOQuery
Connection = DataLink_WeavingSchedule.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1104
Top = 8
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_Print
Left = 968
Top = 88
end
object RM2: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
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_Main
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 1008
Top = 80
ReportData = {}
end
object DataSource2: TDataSource
DataSet = CDS_MJCD
Left = 1056
Top = 220
end
object CDS_MJCD: TClientDataSet
Aggregates = <>
Params = <>
Left = 1236
Top = 4
end
object DataSource3: TDataSource
DataSet = CDS_MJID
Left = 992
Top = 476
end
object CDS_MJID: TClientDataSet
Aggregates = <>
Params = <>
Left = 927
Top = 476
end
object Timer1: TTimer
Interval = 100
Left = 1052
Top = 252
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_WeavingSchedule.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 1120
Top = 120
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid3
PopupMenus = <>
Left = 876
Top = 411
end
object ADOQueryMainDSC: TADOQuery
Connection = DataLink_WeavingSchedule.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 = 56
end
object CDS_Print: TClientDataSet
Aggregates = <>
Params = <>
Left = 1056
Top = 112
end
object QryCheckNet: TADOQuery
Connection = DataLink_WeavingSchedule.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 = 792
Top = 252
end
end
Reference in New Issue Copy Permalink