Group_DJD/D10myBahong
9
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

保存英文成分

Browse Source
This commit is contained in:
DESKTOP-E401PHE\Administrator 2025-11-21 09:32:48 +08:00
parent a65a009db6
commit 64039917a5
3 changed files with 3 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
T01贸易生产计划/ProjectGroup1.groupproj.local
View File

@ -1,7 +0,0 @@
<?xml version="1.0" encoding="utf-8"?>
<BorlandProject>
<Transactions/>
<Default.Personality>
<Projects ActiveProject="D:\Dp10RepoV1\项目代码\D10myOukai\T01贸易生产计划\TradePlan.dproj"/>
</Default.Personality>
</BorlandProject>

BIN
T01贸易生产计划/TradePlan.identcache
View File

Binary file not shown.

4
T03贸易布匹检验/U_MachRollMain.pas
View File

@ -332,7 +332,7 @@ type
FCIID, FOperationStatus, FCIFName, FWorkshop: string;
FBCIOID, FOrderNo, FMainId, FSubId, FPCId, FConNo, FConMId, fBuyConNo, FConSId: string;
FBatchNO, FLenUnit, FC_Code, FC_Name, FC_EName, FC_Spec, FC_Width, FC_GramWeight: string;
FC_Color, FC_EColor, FC_ColorNo, FC_StyleNo, FC_Composition,FC_EComposition, FC_Pattern, FC_CustPattern, FC_ColorDepth: string;
FC_Color, FC_EColor, FC_ColorNo, FC_StyleNo, FC_Composition, FC_EComposition, FC_Pattern, FC_CustPattern, FC_ColorDepth: string;
Faddwet, faddlen: double;
FFtyPCId, FGangNo, FRulePieceNo, FRulePackNo, FCDUnit: string;
FPieceNo: Integer;
@ -1296,6 +1296,7 @@ begin
FC_EColor := '';
FC_StyleNo := '';
FC_Composition := '';
FC_EComposition := '';
FC_Width := '';
FC_GramWeight := '';
FC_Pattern := '';
@ -2893,6 +2894,7 @@ begin
fieldbyName('C_ColorNo').value := FC_ColorNo;
// fieldbyName('C_StyleNo').value := FC_StyleNo;
fieldbyName('C_Composition').value := FC_Composition;
fieldbyName('C_EComposition').value := FC_EComposition;
if dxLayoutItem_width.ActuallyVisible then
fieldbyName('C_Width').value := trim(C_width.Text)
else