Group_01/D7DJbulaikeyi
5
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

~

Browse Source
This commit is contained in:
DESKTOP-E401PHE\Administrator 2025-08-18 16:28:36 +08:00
parent 785e380c27
commit faa7b07f60
3 changed files with 41 additions and 35 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

73
打卷检验管理/U_ProductOrderNewList.dfm
View File

@ -20,8 +20,7 @@ object frmProductOrderNewList: TfrmProductOrderNewList
object ToolBar1: TToolBar object ToolBar1: TToolBar
Left = 0 Left = 0
Top = 0 Top = 0
Width = 1349 Width = 1366
Height = 62
AutoSize = True AutoSize = True
ButtonHeight = 30 ButtonHeight = 30
ButtonWidth = 95 ButtonWidth = 95
@ -118,67 +117,66 @@ object frmProductOrderNewList: TfrmProductOrderNewList
AutoSize = True AutoSize = True
Caption = #25764#38144#23436#25104 Caption = #25764#38144#23436#25104
ImageIndex = 86 ImageIndex = 86
Wrap = True
OnClick = TNoWCClick OnClick = TNoWCClick
end end
object TBExport: TToolButton object TBExport: TToolButton
Left = 0 Left = 678
Top = 30 Top = 0
AutoSize = True AutoSize = True
Caption = #23548#20986 Caption = #23548#20986
ImageIndex = 75 ImageIndex = 75
OnClick = TBExportClick OnClick = TBExportClick
end end
object TFJ: TToolButton object TFJ: TToolButton
Left = 63 Left = 741
Top = 30 Top = 0
AutoSize = True AutoSize = True
Caption = #25351#31034#21333#38468#20214 Caption = #25351#31034#21333#38468#20214
ImageIndex = 57 ImageIndex = 57
OnClick = TFJClick OnClick = TFJClick
end end
object TBPrint: TToolButton object TBPrint: TToolButton
Left = 162 Left = 840
Top = 30 Top = 0
AutoSize = True AutoSize = True
Caption = #25171#21360 Caption = #25171#21360
ImageIndex = 12 ImageIndex = 12
OnClick = TBPrintClick OnClick = TBPrintClick
end end
object ToolButton8: TToolButton object ToolButton8: TToolButton
Left = 225 Left = 903
Top = 30 Top = 0
AutoSize = True AutoSize = True
Caption = #30452#25509#25171#21360 Caption = #30452#25509#25171#21360
ImageIndex = 23 ImageIndex = 23
OnClick = ToolButton8Click OnClick = ToolButton8Click
end end
object ToolButton4: TToolButton object ToolButton4: TToolButton
Left = 312 Left = 990
Top = 30 Top = 0
AutoSize = True AutoSize = True
Caption = #24322#24120#25968#25454 Caption = #24322#24120#25968#25454
ImageIndex = 2 ImageIndex = 2
OnClick = ToolButton4Click OnClick = ToolButton4Click
end end
object ToolButton5: TToolButton object ToolButton5: TToolButton
Left = 399 Left = 1077
Top = 30 Top = 0
Caption = #30133#28857#31649#29702 Caption = #30133#28857#31649#29702
ImageIndex = 132 ImageIndex = 132
OnClick = ToolButton5Click OnClick = ToolButton5Click
end end
object ToolButton6: TToolButton object ToolButton6: TToolButton
Left = 494 Left = 1172
Top = 30 Top = 0
AutoSize = True AutoSize = True
Caption = #26085#24535 Caption = #26085#24535
ImageIndex = 72 ImageIndex = 72
OnClick = ToolButton6Click OnClick = ToolButton6Click
end end
object ToolButton7: TToolButton object ToolButton7: TToolButton
Left = 557 Left = 1235
Top = 30 Top = 0
AutoSize = True AutoSize = True
Caption = #37325#36830 Caption = #37325#36830
ImageIndex = 73 ImageIndex = 73
@ -186,8 +184,8 @@ object frmProductOrderNewList: TfrmProductOrderNewList
OnClick = ToolButton7Click OnClick = ToolButton7Click
end end
object TBClose: TToolButton object TBClose: TToolButton
Left = 620 Left = 1298
Top = 30 Top = 0
AutoSize = True AutoSize = True
Caption = #20851#38381 Caption = #20851#38381
ImageIndex = 55 ImageIndex = 55
@ -196,8 +194,8 @@ object frmProductOrderNewList: TfrmProductOrderNewList
end end
object Panel1: TPanel object Panel1: TPanel
Left = 0 Left = 0
Top = 62 Top = 32
Width = 1349 Width = 1366
Height = 40 Height = 40
Align = alTop Align = alTop
BevelInner = bvRaised BevelInner = bvRaised
@ -513,8 +511,8 @@ object frmProductOrderNewList: TfrmProductOrderNewList
end end
object cxGrid1: TcxGrid object cxGrid1: TcxGrid
Left = 0 Left = 0
Top = 125 Top = 95
Width = 1349 Width = 1366
Height = 333 Height = 333
Align = alTop Align = alTop
TabOrder = 3 TabOrder = 3
@ -793,6 +791,13 @@ object frmProductOrderNewList: TfrmProductOrderNewList
object Tv1Column9: TcxGridDBColumn object Tv1Column9: TcxGridDBColumn
Caption = #32568#21495 Caption = #32568#21495
DataBinding.FieldName = 'GH' DataBinding.FieldName = 'GH'
HeaderAlignmentHorz = taCenter
end
object Tv1Column10: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'MPRTSCTeBieNote'
HeaderAlignmentHorz = taCenter
Width = 80
end end
end end
object cxGrid1Level1: TcxGridLevel object cxGrid1Level1: TcxGridLevel
@ -903,8 +908,8 @@ object frmProductOrderNewList: TfrmProductOrderNewList
end end
object cxSplitter1: TcxSplitter object cxSplitter1: TcxSplitter
Left = 0 Left = 0
Top = 458 Top = 451
Width = 1349 Width = 1366
Height = 8 Height = 8
HotZoneClassName = 'TcxMediaPlayer9Style' HotZoneClassName = 'TcxMediaPlayer9Style'
AlignSplitter = salBottom AlignSplitter = salBottom
@ -912,8 +917,8 @@ object frmProductOrderNewList: TfrmProductOrderNewList
end end
object Panel2: TPanel object Panel2: TPanel
Left = 0 Left = 0
Top = 466 Top = 459
Width = 1349 Width = 1366
Height = 256 Height = 256
Align = alBottom Align = alBottom
Caption = 'Panel2' Caption = 'Panel2'
@ -921,7 +926,7 @@ object frmProductOrderNewList: TfrmProductOrderNewList
object cxGrid2: TcxGrid object cxGrid2: TcxGrid
Left = 1 Left = 1
Top = 1 Top = 1
Width = 970 Width = 987
Height = 254 Height = 254
Align = alClient Align = alClient
TabOrder = 0 TabOrder = 0
@ -1248,7 +1253,7 @@ object frmProductOrderNewList: TfrmProductOrderNewList
end end
end end
object GroupBox1: TGroupBox object GroupBox1: TGroupBox
Left = 971 Left = 988
Top = 1 Top = 1
Width = 377 Width = 377
Height = 254 Height = 254
@ -1277,8 +1282,8 @@ object frmProductOrderNewList: TfrmProductOrderNewList
end end
object cxTabControl1: TcxTabControl object cxTabControl1: TcxTabControl
Left = 0 Left = 0
Top = 102 Top = 72
Width = 1349 Width = 1366
Height = 23 Height = 23
Align = alTop Align = alTop
TabOrder = 2 TabOrder = 2
@ -1291,7 +1296,7 @@ object frmProductOrderNewList: TfrmProductOrderNewList
#20840#37096) #20840#37096)
OnChange = cxTabControl1Change OnChange = cxTabControl1Change
ClientRectBottom = 23 ClientRectBottom = 23
ClientRectRight = 1349 ClientRectRight = 1366
ClientRectTop = 19 ClientRectTop = 19
end end
object cxGridPopupMenu1: TcxGridPopupMenu object cxGridPopupMenu1: TcxGridPopupMenu

1
打卷检验管理/U_ProductOrderNewList.pas
View File

@ -181,6 +181,7 @@ type
Label13: TLabel; Label13: TLabel;
GH: TEdit; GH: TEdit;
Tv1Column9: TcxGridDBColumn; Tv1Column9: TcxGridDBColumn;
Tv1Column10: TcxGridDBColumn;
procedure FormDestroy(Sender: TObject); procedure FormDestroy(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction); procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject); procedure FormCreate(Sender: TObject);