Group_01/D7DJfusheng
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-07-19 10:24:05 +08:00
parent 308f364f5d
commit 608f7c3dc8
2 changed files with 38 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

58
复合检验管理/U_OrderInPut.dfm
View File

@ -96,8 +96,8 @@ object frmOrderInPut: TfrmOrderInPut
Visible = False Visible = False
end end
object Label10: TLabel object Label10: TLabel
Left = 563 Left = 707
Top = 67 Top = 59
Width = 66 Width = 66
Height = 12 Height = 12
Caption = #21512' '#21516' '#21495#65306 Caption = #21512' '#21516' '#21495#65306
@ -164,8 +164,8 @@ object frmOrderInPut: TfrmOrderInPut
Visible = False Visible = False
end end
object Label2: TLabel object Label2: TLabel
Left = 561 Left = 705
Top = 46 Top = 38
Width = 60 Width = 60
Height = 12 Height = 12
Caption = #24320' '#21098#65306 Caption = #24320' '#21098#65306
@ -331,8 +331,8 @@ object frmOrderInPut: TfrmOrderInPut
Visible = False Visible = False
end end
object Label21: TLabel object Label21: TLabel
Left = 383 Left = 647
Top = 44 Top = 12
Width = 67 Width = 67
Height = 12 Height = 12
Caption = #33337' '#26679#65306 Caption = #33337' '#26679#65306
@ -345,8 +345,8 @@ object frmOrderInPut: TfrmOrderInPut
Visible = False Visible = False
end end
object Label22: TLabel object Label22: TLabel
Left = 387 Left = 651
Top = 68 Top = 36
Width = 67 Width = 67
Height = 12 Height = 12
Caption = #23553' '#26465#65306 Caption = #23553' '#26465#65306
@ -568,8 +568,8 @@ object frmOrderInPut: TfrmOrderInPut
OnDblClick = Label37DblClick OnDblClick = Label37DblClick
end end
object Label38: TLabel object Label38: TLabel
Left = 568 Left = 712
Top = 40 Top = 32
Width = 67 Width = 67
Height = 12 Height = 12
Caption = #28907' '#37329#65306 Caption = #28907' '#37329#65306
@ -831,6 +831,19 @@ object frmOrderInPut: TfrmOrderInPut
Font.Style = [fsBold] Font.Style = [fsBold]
ParentFont = False ParentFont = False
end end
object Label56: TLabel
Left = 384
Top = 50
Width = 65
Height = 12
Caption = #20844#21496#25260#22836#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object OrderNo: TEdit object OrderNo: TEdit
Tag = 2 Tag = 2
Left = 96 Left = 96
@ -841,8 +854,8 @@ object frmOrderInPut: TfrmOrderInPut
end end
object ConNo: TEdit object ConNo: TEdit
Tag = 2 Tag = 2
Left = 628 Left = 772
Top = 64 Top = 56
Width = 100 Width = 100
Height = 18 Height = 18
TabOrder = 3 TabOrder = 3
@ -1045,8 +1058,8 @@ object frmOrderInPut: TfrmOrderInPut
end end
object MPRTKaiJian: TBtnEditC object MPRTKaiJian: TBtnEditC
Tag = 2 Tag = 2
Left = 626 Left = 770
Top = 43 Top = 35
Width = 100 Width = 100
Height = 20 Height = 20
Hint = 'MPRTKaiJian/'#24320#21098 Hint = 'MPRTKaiJian/'#24320#21098
@ -1057,8 +1070,8 @@ object frmOrderInPut: TfrmOrderInPut
end end
object MPRTChuanY: TBtnEditC object MPRTChuanY: TBtnEditC
Tag = 2 Tag = 2
Left = 450 Left = 714
Top = 41 Top = 9
Width = 100 Width = 100
Height = 20 Height = 20
Hint = 'MPRTChuanY/'#33337#26679 Hint = 'MPRTChuanY/'#33337#26679
@ -1070,8 +1083,8 @@ object frmOrderInPut: TfrmOrderInPut
end end
object MPRTYaoFeng: TBtnEditC object MPRTYaoFeng: TBtnEditC
Tag = 2 Tag = 2
Left = 451 Left = 715
Top = 64 Top = 32
Width = 100 Width = 100
Height = 20 Height = 20
Hint = 'MPRTYaoFeng/'#23553#26465 Hint = 'MPRTYaoFeng/'#23553#26465
@ -1260,8 +1273,8 @@ object frmOrderInPut: TfrmOrderInPut
end end
object MPRTTangJin: TBtnEditC object MPRTTangJin: TBtnEditC
Tag = 2 Tag = 2
Left = 630 Left = 774
Top = 34 Top = 26
Width = 100 Width = 100
Height = 20 Height = 20
Hint = 'MPRTTangJin/'#28907#37329 Hint = 'MPRTTangJin/'#28907#37329
@ -1345,13 +1358,12 @@ object frmOrderInPut: TfrmOrderInPut
end end
object SYRName: TBtnEditC object SYRName: TBtnEditC
Tag = 2 Tag = 2
Left = 594 Left = 450
Top = 406 Top = 44
Width = 99 Width = 99
Height = 20 Height = 20
Hint = 'SYRName/'#20844#21496#21488#22836 Hint = 'SYRName/'#20844#21496#21488#22836
TabOrder = 29 TabOrder = 29
Visible = False
OnBtnUpClick = SYRNameBtnUpClick OnBtnUpClick = SYRNameBtnUpClick
OnBtnDnClick = CustomerNoNameBtnDnClick OnBtnDnClick = CustomerNoNameBtnDnClick
end end

1
复合检验管理/U_OrderInPut.pas
View File

@ -191,6 +191,7 @@ type
RMBMPExport1: TRMBMPExport; RMBMPExport1: TRMBMPExport;
Tv1Column1: TcxGridDBColumn; Tv1Column1: TcxGridDBColumn;
Tv1Column2: TcxGridDBColumn; Tv1Column2: TcxGridDBColumn;
Label56: TLabel;
procedure TBCloseClick(Sender: TObject); procedure TBCloseClick(Sender: TObject);
procedure FormShow(Sender: TObject); procedure FormShow(Sender: TObject);
procedure TBSaveClick(Sender: TObject); procedure TBSaveClick(Sender: TObject);