This commit is contained in:
DESKTOP-E401PHE\Administrator 2025-05-27 09:08:33 +08:00
parent bc250e3bce
commit 58b2c11d73
3 changed files with 49 additions and 37 deletions

View File

@ -19,7 +19,7 @@ object frmJYOrderCDList: TfrmJYOrderCDList
object ToolBar1: TToolBar object ToolBar1: TToolBar
Left = 0 Left = 0
Top = 0 Top = 0
Width = 1341 Width = 1349
Height = 62 Height = 62
AutoSize = True AutoSize = True
ButtonHeight = 30 ButtonHeight = 30
@ -136,7 +136,7 @@ object frmJYOrderCDList: TfrmJYOrderCDList
object Panel1: TPanel object Panel1: TPanel
Left = 0 Left = 0
Top = 62 Top = 62
Width = 1341 Width = 1349
Height = 81 Height = 81
Align = alTop Align = alTop
BevelInner = bvRaised BevelInner = bvRaised
@ -586,8 +586,8 @@ object frmJYOrderCDList: TfrmJYOrderCDList
object cxGrid1: TcxGrid object cxGrid1: TcxGrid
Left = 0 Left = 0
Top = 196 Top = 196
Width = 1341 Width = 1349
Height = 486 Height = 494
Align = alClient Align = alClient
PopupMenu = PopupMenu1 PopupMenu = PopupMenu1
TabOrder = 4 TabOrder = 4
@ -1084,14 +1084,14 @@ object frmJYOrderCDList: TfrmJYOrderCDList
object Panel6: TPanel object Panel6: TPanel
Left = 0 Left = 0
Top = 143 Top = 143
Width = 1341 Width = 1349
Height = 28 Height = 28
Align = alTop Align = alTop
AutoSize = True AutoSize = True
BorderStyle = bsSingle BorderStyle = bsSingle
TabOrder = 2 TabOrder = 2
DesignSize = ( DesignSize = (
1337 1345
24) 24)
object Label31: TLabel object Label31: TLabel
Left = 25 Left = 25
@ -1185,7 +1185,7 @@ object frmJYOrderCDList: TfrmJYOrderCDList
object cxTabControl1: TcxTabControl object cxTabControl1: TcxTabControl
Left = 0 Left = 0
Top = 171 Top = 171
Width = 1341 Width = 1349
Height = 25 Height = 25
Align = alTop Align = alTop
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
@ -1204,7 +1204,7 @@ object frmJYOrderCDList: TfrmJYOrderCDList
#20840#37096) #20840#37096)
OnChange = cxTabControl1Change OnChange = cxTabControl1Change
ClientRectBottom = 27 ClientRectBottom = 27
ClientRectRight = 1341 ClientRectRight = 1349
ClientRectTop = 27 ClientRectTop = 27
end end
object cxGridPopupMenu1: TcxGridPopupMenu object cxGridPopupMenu1: TcxGridPopupMenu

View File

@ -12,7 +12,21 @@ uses
RM_Common, RM_Class, RM_GridReport, RM_e_Xls, Menus, MovePanel, cxTextEdit, RM_Common, RM_Class, RM_GridReport, RM_e_Xls, Menus, MovePanel, cxTextEdit,
cxContainer, cxCurrencyEdit, BtnEdit, RM_e_main, RM_e_htm, RM_e_Graphic, cxContainer, cxCurrencyEdit, BtnEdit, RM_e_main, RM_e_htm, RM_e_Graphic,
RM_e_Jpeg, RM_e_txt, RM_e_csv, RM_E_llPDF, Math, Clipbrd, cxPC, cxLookAndFeels, RM_e_Jpeg, RM_e_txt, RM_e_csv, RM_E_llPDF, Math, Clipbrd, cxPC, cxLookAndFeels,
cxLookAndFeelPainters, cxNavigator, dxBarBuiltInMenu; cxLookAndFeelPainters, cxNavigator, dxBarBuiltInMenu, dxSkinsCore,
dxSkinBlack, dxSkinBlue, dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee,
dxSkinDarkRoom, dxSkinDarkSide, dxSkinDevExpressDarkStyle,
dxSkinDevExpressStyle, dxSkinFoggy, dxSkinGlassOceans,
dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian, dxSkinLiquidSky,
dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray,
dxSkinOffice2013LightGray, dxSkinOffice2013White, dxSkinPumpkin,
dxSkinSeven, dxSkinSevenClassic, dxSkinSharp, dxSkinSharpPlus,
dxSkinSilver, dxSkinSpringTime, dxSkinStardust, dxSkinSummer2008,
dxSkinTheAsphaltWorld, dxSkinsDefaultPainters, dxSkinValentine,
dxSkinVS2010, dxSkinWhiteprint, dxSkinXmas2008Blue, dxSkinscxPCPainter;
type type
TfrmJYOrderCDList = class(TForm) TfrmJYOrderCDList = class(TForm)

View File

@ -18,10 +18,10 @@ object frmMarkingInspection: TfrmMarkingInspection
PixelsPerInch = 96 PixelsPerInch = 96
TextHeight = 12 TextHeight = 12
object ScrollBox1: TScrollBox object ScrollBox1: TScrollBox
Left = 785 Left = 794
Top = 85 Top = 85
Width = 241 Width = 241
Height = 592 Height = 600
Align = alLeft Align = alLeft
TabOrder = 1 TabOrder = 1
object SpeedButton13: TSpeedButton object SpeedButton13: TSpeedButton
@ -477,8 +477,8 @@ object frmMarkingInspection: TfrmMarkingInspection
object Panel2: TPanel object Panel2: TPanel
Left = 0 Left = 0
Top = 85 Top = 85
Width = 360 Width = 369
Height = 592 Height = 600
Align = alLeft Align = alLeft
BevelInner = bvRaised BevelInner = bvRaised
BevelOuter = bvLowered BevelOuter = bvLowered
@ -656,8 +656,8 @@ object frmMarkingInspection: TfrmMarkingInspection
ParentFont = False ParentFont = False
end end
object Label37: TLabel object Label37: TLabel
Left = 435 Left = 203
Top = 434 Top = 282
Width = 40 Width = 40
Height = 23 Height = 23
Caption = #32568#21495 Caption = #32568#21495
@ -667,7 +667,6 @@ object frmMarkingInspection: TfrmMarkingInspection
Font.Name = 'Arial' Font.Name = 'Arial'
Font.Style = [] Font.Style = []
ParentFont = False ParentFont = False
Visible = False
end end
object Label38: TLabel object Label38: TLabel
Left = 11 Left = 11
@ -902,8 +901,8 @@ object frmMarkingInspection: TfrmMarkingInspection
'4') '4')
end end
object MJStr4: TEdit object MJStr4: TEdit
Left = 479 Left = 247
Top = 425 Top = 273
Width = 102 Width = 102
Height = 41 Height = 41
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
@ -913,7 +912,6 @@ object frmMarkingInspection: TfrmMarkingInspection
Font.Style = [] Font.Style = []
ParentFont = False ParentFont = False
TabOrder = 1 TabOrder = 1
Visible = False
OnClick = Edit1Click OnClick = Edit1Click
OnKeyPress = MJstr3KeyPress OnKeyPress = MJstr3KeyPress
end end
@ -1046,10 +1044,10 @@ object frmMarkingInspection: TfrmMarkingInspection
end end
end end
object Panel7: TPanel object Panel7: TPanel
Left = 1026 Left = 1035
Top = 85 Top = 85
Width = 0 Width = 0
Height = 592 Height = 600
Align = alClient Align = alClient
BevelInner = bvRaised BevelInner = bvRaised
BevelOuter = bvLowered BevelOuter = bvLowered
@ -1057,8 +1055,8 @@ object frmMarkingInspection: TfrmMarkingInspection
object cxGrid2: TcxGrid object cxGrid2: TcxGrid
Left = 2 Left = 2
Top = 2 Top = 2
Width = 336 Width = 524
Height = 263 Height = 271
Align = alClient Align = alClient
TabOrder = 0 TabOrder = 0
object Tv2: TcxGridDBTableView object Tv2: TcxGridDBTableView
@ -1150,8 +1148,8 @@ object frmMarkingInspection: TfrmMarkingInspection
end end
object Panel8: TPanel object Panel8: TPanel
Left = 2 Left = 2
Top = 265 Top = 273
Width = 336 Width = 524
Height = 41 Height = 41
Align = alBottom Align = alBottom
Caption = 'A<=25 25<B<=33 C>33' Caption = 'A<=25 25<B<=33 C>33'
@ -1166,8 +1164,8 @@ object frmMarkingInspection: TfrmMarkingInspection
end end
object AOrdDefNote1: TRichEdit object AOrdDefNote1: TRichEdit
Left = 2 Left = 2
Top = 306 Top = 314
Width = 336 Width = 524
Height = 284 Height = 284
Align = alBottom Align = alBottom
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
@ -1183,14 +1181,14 @@ object frmMarkingInspection: TfrmMarkingInspection
object Panel5: TPanel object Panel5: TPanel
Left = 0 Left = 0
Top = 0 Top = 0
Width = 1026 Width = 1035
Height = 85 Height = 85
Align = alTop Align = alTop
TabOrder = 0 TabOrder = 0
object Panel6: TPanel object Panel6: TPanel
Left = 1 Left = 1
Top = 31 Top = 31
Width = 1024 Width = 1033
Height = 53 Height = 53
Align = alClient Align = alClient
BevelInner = bvRaised BevelInner = bvRaised
@ -1368,7 +1366,7 @@ object frmMarkingInspection: TfrmMarkingInspection
object ToolBar1: TToolBar object ToolBar1: TToolBar
Left = 1 Left = 1
Top = 1 Top = 1
Width = 1024 Width = 1033
Height = 30 Height = 30
ButtonHeight = 30 ButtonHeight = 30
ButtonWidth = 119 ButtonWidth = 119
@ -1439,18 +1437,18 @@ object frmMarkingInspection: TfrmMarkingInspection
end end
end end
object cxSplitter1: TcxSplitter object cxSplitter1: TcxSplitter
Left = 777 Left = 786
Top = 85 Top = 85
Width = 8 Width = 8
Height = 592 Height = 600
HotZoneClassName = 'TcxMediaPlayer9Style' HotZoneClassName = 'TcxMediaPlayer9Style'
Control = Panel1 Control = Panel1
end end
object Panel1: TPanel object Panel1: TPanel
Left = 360 Left = 369
Top = 85 Top = 85
Width = 417 Width = 417
Height = 592 Height = 600
Align = alLeft Align = alLeft
Caption = 'Panel1' Caption = 'Panel1'
TabOrder = 7 TabOrder = 7
@ -1458,7 +1456,7 @@ object frmMarkingInspection: TfrmMarkingInspection
Left = 1 Left = 1
Top = 1 Top = 1
Width = 415 Width = 415
Height = 590 Height = 598
Align = alClient Align = alClient
TabOrder = 0 TabOrder = 0
object Tv3: TcxGridDBTableView object Tv3: TcxGridDBTableView
@ -1554,8 +1552,8 @@ object frmMarkingInspection: TfrmMarkingInspection
end end
end end
object Panel3: TPanel object Panel3: TPanel
Left = 374 Left = 398
Top = 427 Top = 443
Width = 383 Width = 383
Height = 231 Height = 231
BevelInner = bvRaised BevelInner = bvRaised