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

555

Browse Source
This commit is contained in:
DESKTOP-E401PHE\Administrator 2025-08-21 14:57:32 +08:00
parent bf5567aecf
commit 7d6fca36e0
3 changed files with 2 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
A02基础产品管理/U_TatClothInfo.dfm
View File

@ -1158,7 +1158,6 @@ inherited frmTatClothInfo: TfrmTatClothInfo
Properties.ShowFocusRect = False Properties.ShowFocusRect = False
Style.BorderStyle = ebsSingle Style.BorderStyle = ebsSingle
TabOrder = 0 TabOrder = 0
ExplicitLeft = -4
Height = 339 Height = 339
Width = 1259 Width = 1259
end end
@ -1182,7 +1181,6 @@ inherited frmTatClothInfo: TfrmTatClothInfo
ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
ParentFont = False ParentFont = False
TabOrder = 0 TabOrder = 0
ExplicitLeft = 4
end end
object cxDBImage1: TcxDBImage object cxDBImage1: TcxDBImage
Left = 0 Left = 0
@ -1197,7 +1195,6 @@ inherited frmTatClothInfo: TfrmTatClothInfo
Properties.ShowFocusRect = False Properties.ShowFocusRect = False
Style.BorderStyle = ebsSingle Style.BorderStyle = ebsSingle
TabOrder = 1 TabOrder = 1
ExplicitTop = 42
Height = 339 Height = 339
Width = 1259 Width = 1259
end end

2
A02基础产品管理/U_TatClothInfoInput.dfm
View File

@ -369,7 +369,7 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput
Top = 250 Top = 250
Width = 64 Width = 64
Height = 21 Height = 21
Caption = #33853#24067#31859#25968 Caption = #33853#24067#23450#38271
end end
object Label31: TLabel object Label31: TLabel
Left = 1145 Left = 1145

2
A02基础产品管理/U_TatClothInfoInput.pas
View File

@ -878,7 +878,7 @@ begin
FieldByName('YRType').Value := '¾­Ë¿'; FieldByName('YRType').Value := '¾­Ë¿';
FieldByName('BCIID').Value := Trim(maxId); FieldByName('BCIID').Value := Trim(maxId);
FieldByName('YRId').Value := Trim(maxpbno); FieldByName('YRId').Value := Trim(maxpbno);
RTSetSaveDataCDS(ADOQueryCmd, Tv2, CDS_1, 'BS_Cloth_Yarn', 0); RTSetSaveDataCDS(ADOQueryCmd, Tv1, CDS_1, 'BS_Cloth_Yarn', 0);
Post; Post;
end; end;
CDS_1.Edit; CDS_1.Edit;