Group_99/D7myzhenyong
6
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

11

Browse Source
This commit is contained in:
DESKTOP-E401PHE\Administrator 2025-10-28 13:56:34 +08:00
parent 75d7afdabb
commit c07391b2d0
3 changed files with 52 additions and 46 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
报关管理(BaoGuan.dll)/BaoGuan.dpr
View File

@ -19,7 +19,13 @@ uses
U_SelExportField in '..\Z99Dependency\ThreeFun\Fun\U_SelExportField.pas' {frmSelExportField},
U_ColumnBandSet in '..\Z99Dependency\ThreeFun\Form\U_ColumnBandSet.pas' {frmColumnBandSet},
U_ColumnSet in '..\Z99Dependency\ThreeFun\Form\U_ColumnSet.pas' {frmColumnSet},
U_SelPrintFieldNew in '..\Z99Dependency\ThreeFun\Form\U_SelPrintFieldNew.pas' {frmSelPrintFieldNew};
U_SelPrintFieldNew in '..\Z99Dependency\ThreeFun\Form\U_SelPrintFieldNew.pas' {frmSelPrintFieldNew},
U_ClientPrintRmf in '..\A00±êÇ©´òÓ¡\U_ClientPrintRmf.pas' {frmClientPrintRmf},
U_LabelMapSet in '..\A00±êÇ©´òÓ¡\U_LabelMapSet.pas' {frmLabelMapSet},
U_LabelPrint in '..\A00±êÇ©´òÓ¡\U_LabelPrint.pas' {frmLabelPrint},
superobject in '..\Z99Dependency\ThreeFun\Fun\superobject.pas',
U_QrCodeFun in '..\A00±êÇ©´òÓ¡\U_QrCodeFun.pas',
U_LabelPrintFun in '..\A00±êÇ©´òÓ¡\U_LabelPrintFun.pas';
// U_SelfForm in '..\..\SelfForm\U_SelfForm.pas',
// U_SelExportField in '..\..\SelfForm\U_SelExportField.pas' {frmSelExportField},

86
染整计划(DyeingFinishingPlan.dll)/U_MarkingInspection.dfm
View File

@ -1,6 +1,6 @@
object frmMarkingInspection: TfrmMarkingInspection
Left = 318
Top = 159
Left = 556
Top = 370
Width = 1539
Height = 825
Align = alLeft
@ -1987,22 +1987,6 @@ object frmMarkingInspection: TfrmMarkingInspection
TabOrder = 11
OnClick = BTPrintClick
end
object Button5: TButton
Left = 19
Top = 557
Width = 80
Height = 45
Caption = #37325#25171
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 12
Visible = False
OnClick = Button5Click
end
object Edit3: TEdit
Left = 52
Top = 307
@ -2163,7 +2147,7 @@ object frmMarkingInspection: TfrmMarkingInspection
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 13
TabOrder = 12
Visible = False
OnChange = MJLenChange
OnClick = Edit1Click
@ -2181,7 +2165,7 @@ object frmMarkingInspection: TfrmMarkingInspection
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 14
TabOrder = 13
OnClick = Button3Click
end
object JYPerson: TEdit
@ -2195,7 +2179,7 @@ object frmMarkingInspection: TfrmMarkingInspection
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 15
TabOrder = 14
end
object Button6: TButton
Left = 123
@ -2209,7 +2193,7 @@ object frmMarkingInspection: TfrmMarkingInspection
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 16
TabOrder = 15
OnClick = Button6Click
end
object KuangHao: TEdit
@ -2224,7 +2208,7 @@ object frmMarkingInspection: TfrmMarkingInspection
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 17
TabOrder = 16
OnClick = Edit1Click
OnKeyPress = MJstr3KeyPress
end
@ -2240,25 +2224,9 @@ object frmMarkingInspection: TfrmMarkingInspection
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 18
TabOrder = 17
OnClick = Button7Click
end
object Button8: TButton
Left = 123
Top = 556
Width = 110
Height = 45
Caption = #37325#25171#21253#26631#31614
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 19
Visible = False
OnClick = Button8Click
end
object Button9: TButton
Left = 19
Top = 508
@ -2271,14 +2239,14 @@ object frmMarkingInspection: TfrmMarkingInspection
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 20
TabOrder = 18
OnClick = Button9Click
end
object cxImage1: TcxImage
Left = 43
Top = 608
AutoSize = True
TabOrder = 21
TabOrder = 19
Visible = False
Height = 113
Width = 169
@ -2650,6 +2618,38 @@ object frmMarkingInspection: TfrmMarkingInspection
ParentFont = False
TabOrder = 5
end
object Button5: TButton
Left = 291
Top = 48
Width = 80
Height = 28
Caption = #37325#25171
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
Visible = False
OnClick = Button5Click
end
object Button8: TButton
Left = 390
Top = 48
Width = 110
Height = 28
Caption = #37325#25171#21253#26631#31614
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
Visible = False
OnClick = Button8Click
end
end
object ToolBar1: TToolBar
Left = 1
@ -2931,7 +2931,7 @@ object frmMarkingInspection: TfrmMarkingInspection
end
object MovePanel1: TMovePanel
Left = 237
Top = 93
Top = 133
Width = 391
Height = 337
BevelInner = bvLowered

4
染整计划(DyeingFinishingPlan.dll)/U_MarkingInspection.pas
View File

@ -98,7 +98,6 @@ type
Label5: TLabel;
Label11: TLabel;
BTPrint: TButton;
Button5: TButton;
Edit3: TEdit;
Label10: TLabel;
Edit4: TEdit;
@ -202,7 +201,6 @@ type
v3Column8: TcxGridDBColumn;
ToolButton4: TToolButton;
Button7: TButton;
Button8: TButton;
Button9: TButton;
Tv3Column1: TcxGridDBColumn;
ScrollBox1: TScrollBox;
@ -330,6 +328,8 @@ type
Label25: TLabel;
BarCode: TEdit;
Tv3Column2: TcxGridDBColumn;
Button5: TButton;
Button8: TButton;
procedure FormDestroy(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure TBCloseClick(Sender: TObject);