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

11

Browse Source
This commit is contained in:
LAPTOP-8NOV8MVQ\cai 2025-07-11 10:43:50 +08:00
parent 3d5adf8baa
commit 4b0f2a1f84
5 changed files with 224 additions and 403 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

140
E01梭织生产计划/TatPlan.dproj.local
View File

@ -1,76 +1,76 @@
<?xml version="1.0" encoding="utf-8"?> <?xml version="1.0" encoding="utf-8"?>
<BorlandProject> <BorlandProject>
<Transactions> <Transactions>
<Transaction>1899-12-30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.747,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanList.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.555,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.220,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.959,D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.pas=</Transaction> <Transaction>1899/12/30 00:00:00.000.806,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\Unit1.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.873,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm</Transaction> <Transaction>1899/12/30 00:00:00.000.383,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard1.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.577,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_FactoryInput2.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_JHDTJ.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.759,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCard1.dfm</Transaction> <Transaction>1899/12/30 00:00:00.000.577,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_FactoryInput2.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.383,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard1.dfm</Transaction> <Transaction>1899/12/30 00:00:00.000.555,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.469,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanMachInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.469,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanMachInput.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.452,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\TatPlan.dproj</Transaction> <Transaction>1899/12/30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.806,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\Unit1.pas=</Transaction> <Transaction>1899/12/30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.220,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.414,D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.pas=D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.959,D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.759,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCard1.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.873,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.460,=D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.628,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.414,D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.pas=D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.709,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.308,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnInfoInPut.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.957,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanInPut.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYInPut.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.957,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYInPut.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanInPut.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.308,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnInfoInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.258,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.812,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatWBCardInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.812,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.pas=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatWBCardInPut.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.258,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.709,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.747,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanList.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYList.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.628,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.600,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatGYSel.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.552,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatPlanCard.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.460,=D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction> <Transaction>1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.248,=D:\Dp10RepoV1\项目代码\花蝴蝶\T00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.248,=D:\Dp10RepoV1\项目代码\花蝴蝶\T00贸易通用窗体\U_TradeSalesContractSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.452,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\TatPlan.dproj=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\InformationBase.dproj</Transaction>
<Transaction>1899-12-30 00:00:00.000.383,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard1.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.600,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatGYSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.228,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.228,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.600,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatGYSel.dfm</Transaction> <Transaction>1899/12/30 00:00:00.000.552,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatPlanCard.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.354,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.747,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYList.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanList.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.926,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.812,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.dfm=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatWBCardInPut.dfm</Transaction> <Transaction>1899/12/30 00:00:00.000.759,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCard1.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.926,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanList.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.719,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.957,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanInPut.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.203,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_WBSpecSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.203,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_WBSpecSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_JHDTJ.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction>
<Transaction>1899-12-30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas=</Transaction> <Transaction>1899/12/30 00:00:00.000.354,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.414,D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.dfm=D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.dfm</Transaction> <Transaction>1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.556,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.556,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.306,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.957,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYInPut.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanInPut.dfm</Transaction> <Transaction>1899/12/30 00:00:00.000.414,D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.dfm=D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.416,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut1.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction> <Transaction>1899/12/30 00:00:00.000.547,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanMachList.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.547,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanMachList.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.306,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.719,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.747,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYList.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanList.dfm</Transaction> <Transaction>1899/12/30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_JHDTJ.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.297,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用组件\FrameDateSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.125,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_TatClothInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.297,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用组件\FrameDateSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.467,=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.812,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatWBCardInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.759,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCard1.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.467,=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.125,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_TatClothInfoSel.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.876,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanInPut.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.876,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction> <Transaction>1899/12/30 00:00:00.000.416,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut1.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut.dfm</Transaction>
<Transaction>1899-12-30 00:00:00.000.416,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut1.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.383,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard1.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.416,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut1.dfm</Transaction> <Transaction>1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.561,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatCardInPut.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.561,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatCardInPut.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_JHDTJ.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.dfm</Transaction> <Transaction>1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction>
<Transaction>1899-12-30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas</Transaction> <Transaction>1899/12/30 00:00:00.000.600,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatGYSel.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas</Transaction>
</Transactions> </Transactions>
<ProjectSortOrder AutoSort="0" SortType="0"> <ProjectSortOrder AutoSort="0" SortType="0">
<File Path="..\..\D10SZKaiXiYa"/> <File Path="..\..\D10SZKaiXiYa"/>

BIN
E01梭织生产计划/TatPlan.identcache
View File

Binary file not shown.

402
E01梭织生产计划/U_TatGYInPut.dfm
View File

@ -72,8 +72,9 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Ctl3D = False Ctl3D = False
ParentCtl3D = False ParentCtl3D = False
TabOrder = 1 TabOrder = 1
ExplicitTop = 24
object Label2: TLabel object Label2: TLabel
Left = 848 Left = 567
Top = 9 Top = 9
Width = 80 Width = 80
Height = 21 Height = 21
@ -81,25 +82,11 @@ inherited frmTatGYInPut: TfrmTatGYInPut
end end
object Label3: TLabel object Label3: TLabel
Left = 286 Left = 286
Top = 81 Top = 45
Width = 80 Width = 80
Height = 21 Height = 21
Caption = #22383#24067#21517#31216#65306 Caption = #22383#24067#21517#31216#65306
end end
object Label14: TLabel
Left = 848
Top = 44
Width = 80
Height = 21
Caption = #20844#21496#25260#22836#65306
end
object Label5: TLabel
Left = 573
Top = 9
Width = 80
Height = 21
Caption = #20132#36135#26085#26399#65306
end
object Label8: TLabel object Label8: TLabel
Left = 1180 Left = 1180
Top = 309 Top = 309
@ -108,13 +95,6 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Caption = #21305#25968#65306 Caption = #21305#25968#65306
Visible = False Visible = False
end end
object Label12: TLabel
Left = 848
Top = 116
Width = 48
Height = 21
Caption = #21305#38271#65306
end
object Label13: TLabel object Label13: TLabel
Left = 1172 Left = 1172
Top = 353 Top = 353
@ -125,32 +105,25 @@ inherited frmTatGYInPut: TfrmTatGYInPut
end end
object Label26: TLabel object Label26: TLabel
Left = 9 Left = 9
Top = 81 Top = 45
Width = 80 Width = 80
Height = 21 Height = 21
Caption = #22383#24067#32534#21495#65306 Caption = #22383#24067#32534#21495#65306
end end
object Label31: TLabel object Label31: TLabel
Left = 848 Left = 848
Top = 207 Top = 45
Width = 68 Width = 68
Height = 21 Height = 21
Caption = #35268' '#26684#65306 Caption = #35268' '#26684#65306
end end
object Label47: TLabel object Label47: TLabel
Left = 573 Left = 848
Top = 44 Top = 9
Width = 48 Width = 48
Height = 21 Height = 21
Caption = #23458#25143#65306 Caption = #23458#25143#65306
end end
object Label43: TLabel
Left = 286
Top = 44
Width = 64
Height = 21
Caption = #19994#21153#21592#65306
end
object lbl2: TLabel object lbl2: TLabel
Left = 286 Left = 286
Top = 9 Top = 9
@ -165,65 +138,58 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Height = 21 Height = 21
Caption = #24037#33402#21333#21495#65306 Caption = #24037#33402#21333#21495#65306
end end
object Label4: TLabel
Left = 1108
Top = 44
Width = 80
Height = 21
Caption = #21152#24037#21333#20301#65306
end
object Label35: TLabel object Label35: TLabel
Left = 9 Left = 1108
Top = 44 Top = 9
Width = 64 Width = 64
Height = 21 Height = 21
Caption = #21512#21516#21495#65306 Caption = #21512#21516#21495#65306
end end
object Label10: TLabel object Label10: TLabel
Left = 1108 Left = 1108
Top = 9 Top = 155
Width = 78 Width = 78
Height = 21 Height = 21
Caption = #26426' '#22411#65306 Caption = #26426' '#22411#65306
end end
object Label9: TLabel object Label9: TLabel
Left = 9 Left = 9
Top = 152 Top = 119
Width = 48 Width = 119
Height = 21 Height = 21
Caption = #31576#24133#65306 Caption = #31576#24133'/'#19978#32423#38376#24133#65306
end end
object Label6: TLabel object Label6: TLabel
Left = 573 Left = 567
Top = 81 Top = 155
Width = 112 Width = 112
Height = 21 Height = 21
Caption = #29702#35770#24179#26041#20811#37325#65306 Caption = #29702#35770#24179#26041#20811#37325#65306
end end
object Label11: TLabel object Label11: TLabel
Left = 573 Left = 1108
Top = 152 Top = 119
Width = 64 Width = 64
Height = 21 Height = 21
Caption = #24635#22836#32441#65306 Caption = #24635#22836#32441#65306
end end
object Label15: TLabel object Label15: TLabel
Left = 573 Left = 286
Top = 116 Top = 155
Width = 48 Width = 48
Height = 21 Height = 21
Caption = #32428#23494#65306 Caption = #32428#23494#65306
end end
object Label16: TLabel object Label16: TLabel
Left = 848 Left = 848
Top = 81 Top = 155
Width = 112 Width = 112
Height = 21 Height = 21
Caption = #23454#27979#24179#26041#20811#37325#65306 Caption = #23454#27979#24179#26041#20811#37325#65306
end end
object Label17: TLabel object Label17: TLabel
Left = 286 Left = 286
Top = 152 Top = 119
Width = 48 Width = 48
Height = 21 Height = 21
Caption = #31576#21495#65306 Caption = #31576#21495#65306
@ -259,44 +225,23 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Caption = #35746#21333#25968#37327#65306 Caption = #35746#21333#25968#37327#65306
Visible = False Visible = False
end end
object Label20: TLabel
Left = 848
Top = 152
Width = 80
Height = 21
Caption = #19978#26426#38376#24133#65306
end
object Label21: TLabel
Left = 1108
Top = 152
Width = 80
Height = 21
Caption = #25104#21697#38376#24133#65306
end
object Label22: TLabel
Left = 1108
Top = 81
Width = 80
Height = 21
Caption = #29256#26412#32534#21495#65306
end
object Label23: TLabel object Label23: TLabel
Left = 1108 Left = 567
Top = 116 Top = 45
Width = 78 Width = 78
Height = 21 Height = 21
Caption = #39068' '#33394#65306 Caption = #39068' '#33394#65306
end end
object Label24: TLabel object Label24: TLabel
Left = 286 Left = 286
Top = 117 Top = 83
Width = 112 Width = 112
Height = 21 Height = 21
Caption = #25972#32463#24037#33402#21517#31216#65306 Caption = #25972#32463#24037#33402#21517#31216#65306
end end
object Label25: TLabel object Label25: TLabel
Left = 9 Left = 9
Top = 117 Top = 82
Width = 112 Width = 112
Height = 21 Height = 21
Caption = #25972#32463#24037#33402#32534#21495#65306 Caption = #25972#32463#24037#33402#32534#21495#65306
@ -316,7 +261,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
end end
object Label28: TLabel object Label28: TLabel
Left = 14 Left = 14
Top = 279 Top = 286
Width = 454 Width = 454
Height = 21 Height = 21
Caption = #32428#32433#31859#24212#29992#37327'='#26681#25968'/'#24635#26681#25968'*('#38376#24133'+'#25439#32791')*'#20998#29305'(Dtex)*'#32428#23494'/9000' Caption = #32428#32433#31859#24212#29992#37327'='#26681#25968'/'#24635#26681#25968'*('#38376#24133'+'#25439#32791')*'#20998#29305'(Dtex)*'#32428#23494'/9000'
@ -327,21 +272,33 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Font.Style = [] Font.Style = []
ParentFont = False ParentFont = False
end end
object OrdPieceLen: TcxTextEdit object Label4: TLabel
Tag = 2 Left = 848
Left = 952 Top = 119
Top = 113 Width = 80
Properties.OnEditValueChanged = OrdPiecePropertiesEditValueChanged Height = 21
TabOrder = 2 Caption = #31359#31576#20837#27861#65306
OnKeyPress = ConNoKeyPress end
Width = 150 object Label5: TLabel
Left = 9
Top = 155
Width = 48
Height = 21
Caption = #32463#23494#65306
end
object Label12: TLabel
Left = 567
Top = 119
Width = 80
Height = 21
Caption = #38050#31576#32534#21495#65306
end end
object OrdPiece: TcxTextEdit object OrdPiece: TcxTextEdit
Tag = 2 Tag = 2
Left = 1254 Left = 1254
Top = 305 Top = 305
Properties.OnEditValueChanged = OrdPiecePropertiesEditValueChanged Properties.OnEditValueChanged = OrdPiecePropertiesEditValueChanged
TabOrder = 3 TabOrder = 2
Visible = False Visible = False
OnKeyPress = ConNoKeyPress OnKeyPress = ConNoKeyPress
Width = 150 Width = 150
@ -358,23 +315,16 @@ inherited frmTatGYInPut: TfrmTatGYInPut
object C_Name: TcxTextEdit object C_Name: TcxTextEdit
Tag = 2 Tag = 2
Left = 398 Left = 398
Top = 77 Top = 42
TabOrder = 0 TabOrder = 0
OnKeyPress = ConNoKeyPress OnKeyPress = ConNoKeyPress
Width = 150 Width = 150
end end
object Saleser: TcxTextEdit
Left = 398
Top = 40
TabOrder = 4
OnKeyPress = ConNoKeyPress
Width = 150
end
object OrderNo: TcxTextEdit object OrderNo: TcxTextEdit
Left = 114 Left = 121
Top = 5 Top = 5
Enabled = False Enabled = False
TabOrder = 5 TabOrder = 3
OnKeyPress = ConNoKeyPress OnKeyPress = ConNoKeyPress
Width = 150 Width = 150
end end
@ -383,7 +333,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 909 Left = 909
Top = 270 Top = 270
Enabled = False Enabled = False
TabOrder = 6 TabOrder = 4
Visible = False Visible = False
OnKeyPress = ConNoKeyPress OnKeyPress = ConNoKeyPress
Width = 120 Width = 120
@ -393,7 +343,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 909 Left = 909
Top = 305 Top = 305
Enabled = False Enabled = False
TabOrder = 7 TabOrder = 5
Visible = False Visible = False
OnKeyPress = ConNoKeyPress OnKeyPress = ConNoKeyPress
Width = 120 Width = 120
@ -404,107 +354,77 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Top = 389 Top = 389
ParentColor = True ParentColor = True
ParentFont = False ParentFont = False
TabOrder = 8 TabOrder = 6
Visible = False Visible = False
Height = 57 Height = 57
Width = 589 Width = 589
end end
object C_FinishLatitudeDensity: TcxTextEdit object C_FinishLatitudeDensity: TcxTextEdit
Tag = 2 Tag = 2
Left = 680 Left = 398
Top = 112 Top = 152
ParentColor = True ParentColor = True
Properties.OnEditValueChanged = C_YarnQtyPropertiesEditValueChanged Properties.OnEditValueChanged = C_YarnQtyPropertiesEditValueChanged
TabOrder = 9 TabOrder = 7
Width = 150 Width = 150
end end
object C_TestGramWeight: TcxTextEdit object C_TestGramWeight: TcxTextEdit
Tag = 2 Tag = 2
Left = 952 Left = 952
Top = 77 Top = 152
ParentColor = True ParentColor = True
TabOrder = 10 TabOrder = 8
Width = 150 Width = 150
end end
object C_GramWeight: TcxTextEdit object C_GramWeight: TcxTextEdit
Tag = 2 Tag = 2
Left = 679 Left = 679
Top = 79 Top = 152
ParentColor = True ParentColor = True
TabOrder = 11 TabOrder = 9
Width = 150 Width = 150
end end
object C_ReedNo: TcxTextEdit object C_ReedNo: TcxTextEdit
Tag = 2 Tag = 2
Left = 398 Left = 398
Top = 150 Top = 115
ParentColor = True ParentColor = True
TabOrder = 12 TabOrder = 10
Width = 150 Width = 150
end end
object C_ReedWidth: TcxTextEdit object C_ReedWidth: TcxTextEdit
Tag = 2 Tag = 2
Left = 114 Left = 121
Top = 150 Top = 115
ParentColor = True ParentColor = True
Properties.OnEditValueChanged = C_YarnQtyPropertiesEditValueChanged Properties.OnEditValueChanged = C_YarnQtyPropertiesEditValueChanged
TabOrder = 13 TabOrder = 11
Width = 150 Width = 150
end end
object C_YarnQty: TcxTextEdit object C_YarnQty: TcxTextEdit
Tag = 2 Tag = 2
Left = 680 Left = 1200
Top = 148 Top = 112
ParentColor = True ParentColor = True
Properties.OnEditValueChanged = C_YarnQtyPropertiesEditValueChanged Properties.OnEditValueChanged = C_YarnQtyPropertiesEditValueChanged
TabOrder = 14 TabOrder = 12
Width = 150 Width = 150
end end
object LoomType: TcxTextEdit object LoomType: TcxTextEdit
Tag = 2 Tag = 2
Left = 1200 Left = 1200
Top = 5 Top = 154
ParentColor = True ParentColor = True
TabOrder = 15 TabOrder = 13
Width = 150 Width = 150
end end
object OrdNote: TcxMemo object OrdNote: TcxMemo
Left = 114 Left = 121
Top = 189 Top = 189
ParentColor = True ParentColor = True
TabOrder = 16 TabOrder = 14
Height = 57 Height = 57
Width = 685 Width = 708
end
object OurCoName: TcxButtonEdit
Left = 952
Top = 40
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = OurCoNamePropertiesButtonClick
Style.ButtonStyle = btsDefault
TabOrder = 17
OnDblClick = OurCoNameDblClick
Width = 150
end
object FtyCoName: TcxButtonEdit
Left = 1200
Top = 40
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = FtyCoNamePropertiesButtonClick
Style.ButtonStyle = btsDefault
TabOrder = 18
OnDblClick = OurCoNameDblClick
Width = 150
end end
object OrdType: TcxComboBox object OrdType: TcxComboBox
Left = 398 Left = 398
@ -512,27 +432,20 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Properties.Items.Strings = ( Properties.Items.Strings = (
#22823#36135#21333 #22823#36135#21333
#35797#26679#21333) #35797#26679#21333)
TabOrder = 19 TabOrder = 15
Width = 150
end
object DlyDate: TcxDateEdit
Left = 679
Top = 5
Properties.ShowTime = False
TabOrder = 20
Width = 150 Width = 150
end end
object OrdDate: TcxDateEdit object OrdDate: TcxDateEdit
Left = 952 Left = 679
Top = 5 Top = 5
Properties.ShowTime = False Properties.ShowTime = False
TabOrder = 21 TabOrder = 16
Width = 150 Width = 150
end end
object ConNo: TcxButtonEdit object ConNo: TcxButtonEdit
Tag = 2 Tag = 2
Left = 114 Left = 1200
Top = 40 Top = 5
Properties.Buttons = < Properties.Buttons = <
item item
Default = True Default = True
@ -541,13 +454,13 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Properties.ReadOnly = True Properties.ReadOnly = True
Properties.OnButtonClick = ConNoPropertiesButtonClick Properties.OnButtonClick = ConNoPropertiesButtonClick
Style.ButtonStyle = btsDefault Style.ButtonStyle = btsDefault
TabOrder = 22 TabOrder = 17
OnDblClick = OurCoNameDblClick OnDblClick = OurCoNameDblClick
Width = 150 Width = 150
end end
object CustName: TcxButtonEdit object CustName: TcxButtonEdit
Left = 679 Left = 952
Top = 40 Top = 5
Properties.Buttons = < Properties.Buttons = <
item item
Default = True Default = True
@ -556,22 +469,22 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Properties.ReadOnly = True Properties.ReadOnly = True
Properties.OnButtonClick = CustNamePropertiesButtonClick Properties.OnButtonClick = CustNamePropertiesButtonClick
Style.ButtonStyle = btsDefault Style.ButtonStyle = btsDefault
TabOrder = 23 TabOrder = 18
OnDblClick = OurCoNameDblClick OnDblClick = OurCoNameDblClick
Width = 150 Width = 150
end end
object C_Spec: TcxMemo object C_Spec: TcxMemo
Tag = 2 Tag = 2
Left = 952 Left = 952
Top = 202 Top = 42
TabOrder = 24 TabOrder = 19
Height = 32 Height = 32
Width = 398 Width = 398
end end
object C_Code: TcxButtonEdit object C_Code: TcxButtonEdit
Tag = 2 Tag = 2
Left = 114 Left = 121
Top = 77 Top = 42
Properties.Buttons = < Properties.Buttons = <
item item
Default = True Default = True
@ -580,7 +493,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Properties.ReadOnly = True Properties.ReadOnly = True
Properties.OnButtonClick = C_CodePropertiesButtonClick Properties.OnButtonClick = C_CodePropertiesButtonClick
Style.ButtonStyle = btsDefault Style.ButtonStyle = btsDefault
TabOrder = 25 TabOrder = 20
OnDblClick = OurCoNameDblClick OnDblClick = OurCoNameDblClick
Width = 150 Width = 150
end end
@ -589,7 +502,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 986 Left = 986
Top = 364 Top = 364
Properties.ReadOnly = True Properties.ReadOnly = True
TabOrder = 26 TabOrder = 21
Visible = False Visible = False
OnKeyPress = ConNoKeyPress OnKeyPress = ConNoKeyPress
Width = 150 Width = 150
@ -599,55 +512,31 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Left = 986 Left = 986
Top = 399 Top = 399
Properties.ReadOnly = True Properties.ReadOnly = True
TabOrder = 27 TabOrder = 22
Visible = False Visible = False
OnKeyPress = ConNoKeyPress OnKeyPress = ConNoKeyPress
Width = 150 Width = 150
end end
object C_Width: TcxTextEdit
Tag = 2
Left = 952
Top = 148
ParentColor = True
TabOrder = 28
Width = 150
end
object C_FinishWidth: TcxTextEdit
Tag = 2
Left = 1200
Top = 148
ParentColor = True
TabOrder = 29
Width = 150
end
object BBNo: TcxTextEdit
Tag = 2
Left = 1200
Top = 77
ParentColor = True
TabOrder = 30
Width = 150
end
object C_Color: TcxTextEdit object C_Color: TcxTextEdit
Tag = 2 Tag = 2
Left = 1200 Left = 679
Top = 112 Top = 42
ParentColor = True ParentColor = True
TabOrder = 31 TabOrder = 23
Width = 150 Width = 150
end end
object WB_Name: TcxTextEdit object WB_Name: TcxTextEdit
Tag = 2 Tag = 2
Left = 398 Left = 398
Top = 113 Top = 79
Properties.ReadOnly = True Properties.ReadOnly = True
TabOrder = 32 TabOrder = 24
Width = 150 Width = 150
end end
object WB_Code: TcxButtonEdit object WB_Code: TcxButtonEdit
Tag = 2 Tag = 2
Left = 114 Left = 121
Top = 113 Top = 79
Properties.Buttons = < Properties.Buttons = <
item item
Default = True Default = True
@ -656,10 +545,35 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Properties.ReadOnly = True Properties.ReadOnly = True
Properties.OnButtonClick = WB_CodePropertiesButtonClick Properties.OnButtonClick = WB_CodePropertiesButtonClick
Style.ButtonStyle = btsDefault Style.ButtonStyle = btsDefault
TabOrder = 33 TabOrder = 25
OnDblClick = OurCoNameDblClick OnDblClick = OurCoNameDblClick
Width = 150 Width = 150
end end
object WB_ReedNote: TcxTextEdit
Tag = 2
Left = 952
Top = 115
ParentColor = True
TabOrder = 26
Width = 150
end
object WB_YarnDensity: TcxTextEdit
Tag = 2
Left = 121
Top = 152
ParentColor = True
Properties.OnEditValueChanged = C_YarnQtyPropertiesEditValueChanged
TabOrder = 27
Width = 150
end
object GKBH: TcxTextEdit
Tag = 2
Left = 679
Top = 115
ParentColor = True
TabOrder = 28
Width = 150
end
end end
object cxPageControl3: TcxPageControl [2] object cxPageControl3: TcxPageControl [2]
Left = 0 Left = 0
@ -668,7 +582,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Height = 414 Height = 414
Align = alClient Align = alClient
TabOrder = 2 TabOrder = 2
Properties.ActivePage = cxTabSheet2 Properties.ActivePage = cxTabSheet1
Properties.CustomButtons.Buttons = <> Properties.CustomButtons.Buttons = <>
Properties.Style = 9 Properties.Style = 9
ClientRectBottom = 414 ClientRectBottom = 414
@ -744,6 +658,8 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Height = 384 Height = 384
Align = alClient Align = alClient
TabOrder = 1 TabOrder = 1
ExplicitLeft = -2
ExplicitTop = -1
object TV1: TcxGridDBTableView object TV1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <> Navigator.Buttons.CustomButtons = <>
ScrollbarAnnotations.CustomAnnotations = <> ScrollbarAnnotations.CustomAnnotations = <>
@ -871,6 +787,7 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Caption = #30424#22836#21495 Caption = #30424#22836#21495
DataBinding.FieldName = 'PTNo' DataBinding.FieldName = 'PTNo'
DataBinding.IsNullValueType = True DataBinding.IsNullValueType = True
Visible = False
HeaderAlignmentHorz = taCenter HeaderAlignmentHorz = taCenter
Width = 100 Width = 100
end end
@ -881,15 +798,6 @@ inherited frmTatGYInPut: TfrmTatGYInPut
HeaderAlignmentHorz = taCenter HeaderAlignmentHorz = taCenter
Width = 99 Width = 99
end end
object cxGridDBColumn5: TcxGridDBColumn
Caption = #32433#32447#21697#29260
DataBinding.FieldName = 'Brand'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Moving = False
Options.Sorting = False
Width = 111
end
object TV1Column11: TcxGridDBColumn object TV1Column11: TcxGridDBColumn
Caption = #32442#27861 Caption = #32442#27861
DataBinding.FieldName = 'FF' DataBinding.FieldName = 'FF'
@ -904,27 +812,6 @@ inherited frmTatGYInPut: TfrmTatGYInPut
HeaderAlignmentHorz = taCenter HeaderAlignmentHorz = taCenter
Width = 80 Width = 80
end end
object TV1Column3: TcxGridDBColumn
Caption = #28068
DataBinding.FieldName = 'Dacron'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 80
end
object TV1Column4: TcxGridDBColumn
Caption = #26825
DataBinding.FieldName = 'Cotton'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 67
end
object TV1Column5: TcxGridDBColumn
Caption = #40635
DataBinding.FieldName = 'Linen'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 48
end
end end
object cxGridLevel2: TcxGridLevel object cxGridLevel2: TcxGridLevel
GridView = TV1 GridView = TV1
@ -1126,13 +1013,6 @@ inherited frmTatGYInPut: TfrmTatGYInPut
Styles.Header = DataLink_TatPlan.grid_head_black Styles.Header = DataLink_TatPlan.grid_head_black
Width = 83 Width = 83
end end
object Tv2Column13: TcxGridDBColumn
Caption = #28504#36890#21495
DataBinding.FieldName = 'PTNo'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 100
end
object v2Column6: TcxGridDBColumn object v2Column6: TcxGridDBColumn
Caption = #39068#33394 Caption = #39068#33394
DataBinding.FieldName = 'Y_Color' DataBinding.FieldName = 'Y_Color'
@ -1140,15 +1020,6 @@ inherited frmTatGYInPut: TfrmTatGYInPut
HeaderAlignmentHorz = taCenter HeaderAlignmentHorz = taCenter
Width = 99 Width = 99
end end
object v2Column2: TcxGridDBColumn
Caption = #32433#32447#21697#29260
DataBinding.FieldName = 'Brand'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Moving = False
Options.Sorting = False
Width = 111
end
object Tv2Column12: TcxGridDBColumn object Tv2Column12: TcxGridDBColumn
Caption = #25467#24230 Caption = #25467#24230
DataBinding.FieldName = 'ND' DataBinding.FieldName = 'ND'
@ -1163,27 +1034,6 @@ inherited frmTatGYInPut: TfrmTatGYInPut
HeaderAlignmentHorz = taCenter HeaderAlignmentHorz = taCenter
Width = 80 Width = 80
end end
object Tv2Column3: TcxGridDBColumn
Caption = #28068
DataBinding.FieldName = 'Dacron'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 80
end
object Tv2Column4: TcxGridDBColumn
Caption = #26825
DataBinding.FieldName = 'Cotton'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 80
end
object Tv2Column5: TcxGridDBColumn
Caption = #40635
DataBinding.FieldName = 'Linen'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Width = 80
end
end end
object cxGridLevel1: TcxGridLevel object cxGridLevel1: TcxGridLevel
GridView = Tv2 GridView = Tv2

85
E01梭织生产计划/U_TatGYInPut.pas
View File

@ -46,12 +46,8 @@ type
ScrollBox1: TScrollBox; ScrollBox1: TScrollBox;
Label2: TLabel; Label2: TLabel;
Label3: TLabel; Label3: TLabel;
Label14: TLabel;
ADOQueryTemp: TADOQuery; ADOQueryTemp: TADOQuery;
Label5: TLabel;
Label8: TLabel; Label8: TLabel;
Label12: TLabel;
OrdPieceLen: TcxTextEdit;
OrdPiece: TcxTextEdit; OrdPiece: TcxTextEdit;
Label13: TLabel; Label13: TLabel;
OrdQty: TcxTextEdit; OrdQty: TcxTextEdit;
@ -63,12 +59,9 @@ type
Label31: TLabel; Label31: TLabel;
Label47: TLabel; Label47: TLabel;
C_Name: TcxTextEdit; C_Name: TcxTextEdit;
Label43: TLabel;
lbl2: TLabel; lbl2: TLabel;
Saleser: TcxTextEdit;
Label7: TLabel; Label7: TLabel;
OrderNo: TcxTextEdit; OrderNo: TcxTextEdit;
Label4: TLabel;
ToolButton8: TToolButton; ToolButton8: TToolButton;
Label35: TLabel; Label35: TLabel;
ConMId: TcxTextEdit; ConMId: TcxTextEdit;
@ -110,10 +103,7 @@ type
Label17: TLabel; Label17: TLabel;
Label55: TLabel; Label55: TLabel;
Label18: TLabel; Label18: TLabel;
OurCoName: TcxButtonEdit;
FtyCoName: TcxButtonEdit;
OrdType: TcxComboBox; OrdType: TcxComboBox;
DlyDate: TcxDateEdit;
OrdDate: TcxDateEdit; OrdDate: TcxDateEdit;
ConNo: TcxButtonEdit; ConNo: TcxButtonEdit;
CustName: TcxButtonEdit; CustName: TcxButtonEdit;
@ -124,13 +114,9 @@ type
TV1Column7: TcxGridDBColumn; TV1Column7: TcxGridDBColumn;
cxGridDBColumn3: TcxGridDBColumn; cxGridDBColumn3: TcxGridDBColumn;
cxGridDBColumn4: TcxGridDBColumn; cxGridDBColumn4: TcxGridDBColumn;
cxGridDBColumn5: TcxGridDBColumn;
cxGridDBColumn8: TcxGridDBColumn; cxGridDBColumn8: TcxGridDBColumn;
TV1Column1: TcxGridDBColumn; TV1Column1: TcxGridDBColumn;
TV1Column2: TcxGridDBColumn; TV1Column2: TcxGridDBColumn;
TV1Column3: TcxGridDBColumn;
TV1Column4: TcxGridDBColumn;
TV1Column5: TcxGridDBColumn;
TV1Column6: TcxGridDBColumn; TV1Column6: TcxGridDBColumn;
TV1Column8: TcxGridDBColumn; TV1Column8: TcxGridDBColumn;
TV1Column9: TcxGridDBColumn; TV1Column9: TcxGridDBColumn;
@ -140,13 +126,9 @@ type
Tv2Column7: TcxGridDBColumn; Tv2Column7: TcxGridDBColumn;
v2Column10: TcxGridDBColumn; v2Column10: TcxGridDBColumn;
cxGridDBColumn1: TcxGridDBColumn; cxGridDBColumn1: TcxGridDBColumn;
v2Column2: TcxGridDBColumn;
v2Column6: TcxGridDBColumn; v2Column6: TcxGridDBColumn;
Tv2Column1: TcxGridDBColumn; Tv2Column1: TcxGridDBColumn;
Tv2Column2: TcxGridDBColumn; Tv2Column2: TcxGridDBColumn;
Tv2Column3: TcxGridDBColumn;
Tv2Column4: TcxGridDBColumn;
Tv2Column5: TcxGridDBColumn;
Tv2Column6: TcxGridDBColumn; Tv2Column6: TcxGridDBColumn;
Tv2Column8: TcxGridDBColumn; Tv2Column8: TcxGridDBColumn;
Tv2Column9: TcxGridDBColumn; Tv2Column9: TcxGridDBColumn;
@ -165,17 +147,10 @@ type
PBQty: TcxTextEdit; PBQty: TcxTextEdit;
Label19: TLabel; Label19: TLabel;
DDQty: TcxTextEdit; DDQty: TcxTextEdit;
Label20: TLabel;
C_Width: TcxTextEdit;
Label21: TLabel;
C_FinishWidth: TcxTextEdit;
Label22: TLabel;
BBNo: TcxTextEdit;
Label23: TLabel; Label23: TLabel;
C_Color: TcxTextEdit; C_Color: TcxTextEdit;
QZF: TMemo; QZF: TMemo;
Tv2Column10: TcxGridDBColumn; Tv2Column10: TcxGridDBColumn;
Tv2Column13: TcxGridDBColumn;
TV1Column10: TcxGridDBColumn; TV1Column10: TcxGridDBColumn;
TV1Column13: TcxGridDBColumn; TV1Column13: TcxGridDBColumn;
Label24: TLabel; Label24: TLabel;
@ -189,6 +164,12 @@ type
Label27: TLabel; Label27: TLabel;
Label28: TLabel; Label28: TLabel;
C_TestGramWeight: TcxTextEdit; C_TestGramWeight: TcxTextEdit;
Label4: TLabel;
WB_ReedNote: TcxTextEdit;
Label5: TLabel;
WB_YarnDensity: TcxTextEdit;
Label12: TLabel;
GKBH: TcxTextEdit;
procedure TBCloseClick(Sender: TObject); procedure TBCloseClick(Sender: TObject);
procedure FormShow(Sender: TObject); procedure FormShow(Sender: TObject);
procedure TBSaveClick(Sender: TObject); procedure TBSaveClick(Sender: TObject);
@ -272,7 +253,6 @@ begin
Self.C_TestGramWeight.Text := ADOQueryTemp.fieldbyname('C_TestGramWeight').AsString; Self.C_TestGramWeight.Text := ADOQueryTemp.fieldbyname('C_TestGramWeight').AsString;
Self.LoomType.Text := ADOQueryTemp.fieldbyname('LoomType').AsString; Self.LoomType.Text := ADOQueryTemp.fieldbyname('LoomType').AsString;
Self.C_ReedWidth.Text := ADOQueryTemp.fieldbyname('C_ReedWidth').AsString; Self.C_ReedWidth.Text := ADOQueryTemp.fieldbyname('C_ReedWidth').AsString;
Self.BBNO.Text := ADOQueryTemp.fieldbyname('BBNO').AsString;
Self.C_Color.Text := ADOQueryTemp.fieldbyname('C_Color').AsString; Self.C_Color.Text := ADOQueryTemp.fieldbyname('C_Color').AsString;
// Self.QZF.Text := ADOQueryTemp.fieldbyname('QZF').AsString; // Self.QZF.Text := ADOQueryTemp.fieldbyname('QZF').AsString;
@ -549,7 +529,6 @@ var
begin begin
FDate := SGetServerDateTime(ADOQueryTemp); FDate := SGetServerDateTime(ADOQueryTemp);
OrdDate.Date := FDate; OrdDate.Date := FDate;
DlyDate.Date := FDate;
end; end;
procedure TfrmTatGYInPut.FormShow(Sender: TObject); procedure TfrmTatGYInPut.FormShow(Sender: TObject);
@ -573,8 +552,8 @@ begin
FCoType := '供应商'; FCoType := '供应商';
if ShowModal = 1 then if ShowModal = 1 then
begin begin
FtyCoName.Properties.LookupItems.Text := Trim(CDS_1.fieldbyname('CoCode').AsString); // FtyCoName.Properties.LookupItems.Text := Trim(CDS_1.fieldbyname('CoCode').AsString);
FtyCoName.Text := Trim(CDS_1.fieldbyname('CoAbbrName').AsString); // FtyCoName.Text := Trim(CDS_1.fieldbyname('CoAbbrName').AsString);
end; end;
end; end;
finally finally
@ -873,12 +852,6 @@ begin
Exit; Exit;
end; end;
if Trim(C_Width.Text) = '' then
begin
Application.MessageBox('ÉÏ»úÃÅ·ù²»ÄÜΪ¿Õ!', 'Ìáʾ', 0);
Exit;
end;
// if Trim(OrdQty.Text) = '' then // if Trim(OrdQty.Text) = '' then
// begin // begin
// Application.MessageBox('总数量不能为空!', '提示', 0); // Application.MessageBox('总数量不能为空!', '提示', 0);
@ -1542,6 +1515,10 @@ begin
Self.C_ReedWidth.Text := Trim(frmWBSpecSel.CDS_1.fieldbyname('WB_Width').AsString); Self.C_ReedWidth.Text := Trim(frmWBSpecSel.CDS_1.fieldbyname('WB_Width').AsString);
Self.Y_Note_PLJ.Text := Trim(frmWBSpecSel.CDS_1.fieldbyname('WB_YarnArrNote').AsString); Self.Y_Note_PLJ.Text := Trim(frmWBSpecSel.CDS_1.fieldbyname('WB_YarnArrNote').AsString);
Self.WB_ReedNote.Text := Trim(frmWBSpecSel.CDS_1.fieldbyname('WB_ReedNote').AsString);
Self.GKBH.Text := Trim(frmWBSpecSel.CDS_1.fieldbyname('GKBH').AsString);
Self.WB_YarnDensity.Text := Trim(frmWBSpecSel.CDS_1.fieldbyname('WB_YarnDensity').AsString);
with ADOQuery1 do with ADOQuery1 do
begin begin
Close; Close;
@ -1595,14 +1572,14 @@ var
FOrdQty, FOrdPieceLen: Double; FOrdQty, FOrdPieceLen: Double;
begin begin
FOrdQty := StrToFloatDef(OrdQty.Text, 0); FOrdQty := StrToFloatDef(OrdQty.Text, 0);
FOrdPieceLen := StrToFloatDef(OrdPieceLen.Text, 0); // FOrdPieceLen := StrToFloatDef(OrdPieceLen.Text, 0);
if FOrdPieceLen > 0 then // if FOrdPieceLen > 0 then
OrdPiece.Text := IntToStr(Ceil(FOrdQty / FOrdPieceLen)); // OrdPiece.Text := IntToStr(Ceil(FOrdQty / FOrdPieceLen));
end; end;
procedure TfrmTatGYInPut.OrdPiecePropertiesEditValueChanged(Sender: TObject); procedure TfrmTatGYInPut.OrdPiecePropertiesEditValueChanged(Sender: TObject);
begin begin
OrdQty.text := floattostr(strtofloatdef(OrdPiece.text, 0) * strtofloatdef(OrdPieceLen.text, 0)); // OrdQty.text := floattostr(strtofloatdef(OrdPiece.text, 0) * strtofloatdef(OrdPieceLen.text, 0));
end; end;
procedure TfrmTatGYInPut.OurCoNameDblClick(Sender: TObject); procedure TfrmTatGYInPut.OurCoNameDblClick(Sender: TObject);
@ -1620,10 +1597,10 @@ begin
FCoType := '我司'; FCoType := '我司';
if ShowModal = 1 then if ShowModal = 1 then
begin begin
OurCoName.Properties.LookupItems.Text := Trim(CDS_1.fieldbyname('CoCode').AsString); // OurCoName.Properties.LookupItems.Text := Trim(CDS_1.fieldbyname('CoCode').AsString);
OurCoName.Text := Trim(CDS_1.fieldbyname('CoAbbrName').AsString); // OurCoName.Text := Trim(CDS_1.fieldbyname('CoAbbrName').AsString);
FtyCoName.Properties.LookupItems.Text := Trim(CDS_1.fieldbyname('CoCode').AsString); // FtyCoName.Properties.LookupItems.Text := Trim(CDS_1.fieldbyname('CoCode').AsString);
FtyCoName.Text := Trim(CDS_1.fieldbyname('CoAbbrName').AsString); // FtyCoName.Text := Trim(CDS_1.fieldbyname('CoAbbrName').AsString);
end; end;
end; end;
finally finally
@ -1635,12 +1612,12 @@ procedure TfrmTatGYInPut.OrdPieceChange(Sender: TObject);
var var
FOrdQty, FOrdPieceLen, FOrdPiece: Double; FOrdQty, FOrdPieceLen, FOrdPiece: Double;
begin begin
FOrdPieceLen := StrToFloatDef(OrdPieceLen.Text, 0); // FOrdPieceLen := StrToFloatDef(OrdPieceLen.Text, 0);
FOrdPiece := StrToFloatDef(OrdPiece.Text, 0); // FOrdPiece := StrToFloatDef(OrdPiece.Text, 0);
if FOrdPiece > 0 then // if FOrdPiece > 0 then
OrdQty.Text := FloatToStr(FOrdPieceLen * FOrdPiece) // OrdQty.Text := FloatToStr(FOrdPieceLen * FOrdPiece)
else // else
OrdQty.Text := '0'; // OrdQty.Text := '0';
end; end;
procedure TfrmTatGYInPut.C_CodeKeyPress(Sender: TObject; var Key: Char); procedure TfrmTatGYInPut.C_CodeKeyPress(Sender: TObject; var Key: Char);
@ -1754,22 +1731,16 @@ begin
self.CustName.Properties.LookupItems.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('BuyNo').AsString); self.CustName.Properties.LookupItems.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('BuyNo').AsString);
self.CustName.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('BuyName').AsString); self.CustName.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('BuyName').AsString);
self.OurCoName.Properties.LookupItems.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('Sellno').AsString);
self.OurCoName.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('Sellname').AsString);
self.FtyCoName.Properties.LookupItems.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('Sellno').AsString);
self.FtyCoName.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('Sellname').AsString);
self.ConNo.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('ConNo').AsString); self.ConNo.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('ConNo').AsString);
self.ConMId.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('ConMId').AsString); self.ConMId.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('ConMId').AsString);
self.ConSId.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('ConSId').AsString); self.ConSId.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('ConSId').AsString);
self.Saleser.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('Saleser').AsString);
self.C_Code.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('C_Code').AsString); self.C_Code.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('C_Code').AsString);
self.C_Width.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('C_Width').AsString);
self.C_GramWeight.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('C_GramWeight').AsString); self.C_GramWeight.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('C_GramWeight').AsString);
self.BBNO.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('BBNO').AsString);
self.C_Color.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('C_Color').AsString); self.C_Color.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('C_Color').AsString);
self.OrdQty.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('ConQty').AsString); self.OrdQty.Text := Trim(frmTradeSalesContractSel.CDS_1.fieldbyname('ConQty').AsString);
InitClothYarn(frmTradeSalesContractSel.CDS_1.fieldbyname('C_Code').AsString); InitClothYarn(frmTradeSalesContractSel.CDS_1.fieldbyname('C_Code').AsString);

BIN
E01梭织生产计划/testDll.res
View File

Binary file not shown.