Group_01/D7DJrongchuang
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-12-03 09:29:09 +08:00
parent 5476d983e5
commit bd54e6dede
2 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -118,19 +118,19 @@ object frmProductOrderNewList: TfrmProductOrderNewList
AutoSize = True
Caption = #25764#38144#23436#25104
ImageIndex = 86
Wrap = True
OnClick = TNoWCClick
end
object TBExport: TToolButton
Left = 0
Top = 30
Left = 678
Top = 0
AutoSize = True
Caption = #23548#20986
ImageIndex = 75
Wrap = True
OnClick = TBExportClick
end
object TFJ: TToolButton
Left = 63
Left = 0
Top = 30
AutoSize = True
Caption = #25351#31034#21333#38468#20214
@ -138,7 +138,7 @@ object frmProductOrderNewList: TfrmProductOrderNewList
OnClick = TFJClick
end
object TBPrint: TToolButton
Left = 162
Left = 99
Top = 30
AutoSize = True
Caption = #25171#21360
@ -146,7 +146,7 @@ object frmProductOrderNewList: TfrmProductOrderNewList
OnClick = TBPrintClick
end
object ToolButton4: TToolButton
Left = 225
Left = 162
Top = 30
AutoSize = True
Caption = #24322#24120#25968#25454
@ -154,14 +154,14 @@ object frmProductOrderNewList: TfrmProductOrderNewList
OnClick = ToolButton4Click
end
object ToolButton5: TToolButton
Left = 312
Left = 249
Top = 30
Caption = #30133#28857#31649#29702
ImageIndex = 132
OnClick = ToolButton5Click
end
object ToolButton6: TToolButton
Left = 419
Left = 356
Top = 30
AutoSize = True
Caption = #26085#24535
@ -169,7 +169,7 @@ object frmProductOrderNewList: TfrmProductOrderNewList
OnClick = ToolButton6Click
end
object ToolButton7: TToolButton
Left = 482
Left = 419
Top = 30
AutoSize = True
Caption = #37325#36830
@ -178,7 +178,7 @@ object frmProductOrderNewList: TfrmProductOrderNewList
OnClick = ToolButton7Click
end
object ToolButton8: TToolButton
Left = 545
Left = 482
Top = 30
AutoSize = True
Caption = #20837#24211#30721#21333
@ -186,7 +186,7 @@ object frmProductOrderNewList: TfrmProductOrderNewList
OnClick = ToolButton8Click
end
object ToolButton9: TToolButton
Left = 632
Left = 569
Top = 30
AutoSize = True
Caption = #25171#21360#28151#33394#30721#21333
@ -194,7 +194,7 @@ object frmProductOrderNewList: TfrmProductOrderNewList
OnClick = ToolButton9Click
end
object TBClose: TToolButton
Left = 743
Left = 680
Top = 30
AutoSize = True
Caption = #20851#38381

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

@ -1271,7 +1271,7 @@ var
begin
if Order_Main.IsEmpty then
Exit;
fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\살<EFBFBD>쯤데.rmf';
fPrintFile := ExtractFilePath(Application.ExeName) + 'Report\쇱駱살<EFBFBD>쯤데.rmf';
begin
with ADOQueryTemp do
@ -1303,7 +1303,7 @@ begin
begin
RM1.LoadFromFile(fPrintFile);
RM1.ShowReport;
end
end
else
begin
Application.MessageBox(PChar('没有找' + fPrintFile), '提示', 0);