Group_DJD/D7djHongyuan
7
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

~

Browse Source
This commit is contained in:
DESKTOP-E401PHE\Administrator 2026-02-05 17:16:36 +08:00
parent 4c159f69bb
commit e3c7222a85
2 changed files with 15 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
检验管理/U_MJManageNewFDNew.dfm
View File

@ -21,7 +21,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
Left = 0
Top = 101
Width = 237
Height = 606
Height = 598
Align = alLeft
TabOrder = 1
object Tv3: TcxGridDBTableView
@ -127,8 +127,8 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
object ScrollBox1: TScrollBox
Left = 645
Top = 101
Width = 612
Height = 606
Width = 604
Height = 598
Align = alClient
TabOrder = 4
object SpeedButton13: TSpeedButton
@ -977,7 +977,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
Left = 445
Top = 101
Width = 200
Height = 606
Height = 598
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
@ -1801,7 +1801,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
object Panel4: TPanel
Left = 0
Top = 0
Width = 1257
Width = 1249
Height = 101
Align = alTop
BevelInner = bvRaised
@ -1810,14 +1810,14 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
object Panel5: TPanel
Left = 2
Top = 2
Width = 1253
Width = 1245
Height = 97
Align = alClient
TabOrder = 0
object Panel6: TPanel
Left = 1
Top = 31
Width = 1251
Width = 1243
Height = 78
Align = alTop
BevelInner = bvRaised
@ -2179,7 +2179,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
object ToolBar1: TToolBar
Left = 1
Top = 1
Width = 1251
Width = 1243
Height = 30
ButtonHeight = 30
ButtonWidth = 107
@ -2506,7 +2506,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
Left = 237
Top = 101
Width = 208
Height = 606
Height = 598
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
@ -2515,7 +2515,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
Left = 2
Top = 2
Width = 204
Height = 280
Height = 272
Align = alClient
TabOrder = 0
object Tv2: TcxGridDBTableView
@ -2624,7 +2624,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
end
object Panel8: TPanel
Left = 2
Top = 282
Top = 274
Width = 204
Height = 29
Align = alBottom
@ -2639,7 +2639,7 @@ object frmMJManageNewFDNewSF: TfrmMJManageNewFDNewSF
end
object AOrdDefNote1: TRichEdit
Left = 2
Top = 311
Top = 303
Width = 204
Height = 293
Align = alBottom

4
检验管理/U_MJManageNewFDNew.pas
View File

@ -512,8 +512,8 @@ begin
begin
if trim(DllName) <> '' then
closeCom(DllName);
if trim(JCYDLL) <> '' then
closeCom(JCYDLL);
// if trim(JCYDLL) <> '' then
// closeCom(JCYDLL);
end;
end;