From 24c636a33f37adad165469b09cc537bf699acaa4 Mon Sep 17 00:00:00 2001 From: "DESKTOP-E401PHE\\Administrator" Date: Wed, 26 Mar 2025 14:10:41 +0800 Subject: [PATCH] 11 --- A00通用窗体/U_TatClothInfoSel.dfm | 1 - A00通用窗体/U_TatClothInfoSel.pas | 2 +- A00通用窗体/U_YarnInfoSel.dfm | 29 +- A00通用窗体/U_YarnInfoSel.pas | 2 + A01基础公司管理/Company.identcache | Bin 2748 -> 2748 bytes A01基础公司管理/U_BankList.dfm | 8 +- A01基础公司管理/U_BankList.pas | 3 +- A01基础公司管理/U_CustInput.dfm | 6 - A01基础公司管理/U_CustInput.pas | 16 +- A02基础产品管理/U_TatClothInfoInput.dfm | 36 -- A02基础产品管理/U_TatClothInfoInput.pas | 95 +++- A05基础资料管理/BaseInfo.dproj.local | 48 +- A05基础资料管理/BaseInfo.identcache | Bin 2106 -> 2463 bytes A05基础资料管理/ProjectGroup1.groupproj.local | 2 +- A05基础资料管理/testDll.identcache | Bin 180 -> 178 bytes B01基础合同管理/Contract.identcache | Bin 2430 -> 2430 bytes B02基础纱线仓库/ProjectGroup1.groupproj.local | 2 +- B02基础纱线仓库/U_YarnInfoInPut.dfm | 421 ++++++++++++++---- B02基础纱线仓库/U_YarnInfoInPut.pas | 125 +++++- B02基础纱线仓库/U_YarnInfoList.dfm | 85 +++- B02基础纱线仓库/U_YarnInfoList.pas | 72 ++- B02基础纱线仓库/YarnStk.dproj.local | 51 +-- B02基础纱线仓库/YarnStk.identcache | Bin 3626 -> 3626 bytes B02基础纱线仓库/testDll.identcache | Bin 180 -> 178 bytes E01梭织生产计划/TatPlan.dproj.local | 104 ++--- E01梭织生产计划/TatPlan.identcache | Bin 2965 -> 3050 bytes E01梭织生产计划/U_TatPlanList.dfm | 2 - E02梭织经轴仓库/U_TatWBCardInPut.dfm | 7 +- 28 files changed, 806 insertions(+), 311 deletions(-) diff --git a/A00通用窗体/U_TatClothInfoSel.dfm b/A00通用窗体/U_TatClothInfoSel.dfm index cc187de..91c5e5c 100644 --- a/A00通用窗体/U_TatClothInfoSel.dfm +++ b/A00通用窗体/U_TatClothInfoSel.dfm @@ -111,7 +111,6 @@ inherited frmTatClothInfoSel: TfrmTatClothInfoSel Height = 508 Align = alClient TabOrder = 0 - ExplicitLeft = 6 object Tv1: TcxGridDBTableView OnDblClick = Tv1DblClick Navigator.Buttons.CustomButtons = <> diff --git a/A00通用窗体/U_TatClothInfoSel.pas b/A00通用窗体/U_TatClothInfoSel.pas index 2cd2bb5..d4905cc 100644 --- a/A00通用窗体/U_TatClothInfoSel.pas +++ b/A00通用窗体/U_TatClothInfoSel.pas @@ -121,7 +121,7 @@ begin begin Close; SQL.Clear; - SQL.Add('select * from BS_Cloth_Type where CTType=''֯'' '); + SQL.Add('select * from BS_Cloth_Type where CTType=''֯'' order by CTNo,CTLevel'); Open; end; diff --git a/A00通用窗体/U_YarnInfoSel.dfm b/A00通用窗体/U_YarnInfoSel.dfm index d5299f5..a08fbe9 100644 --- a/A00通用窗体/U_YarnInfoSel.dfm +++ b/A00通用窗体/U_YarnInfoSel.dfm @@ -3,14 +3,14 @@ inherited frmYarnInfoSel: TfrmYarnInfoSel Top = 106 Caption = #32433#32447#21517#31216#36873#25321 ClientHeight = 558 - ClientWidth = 1151 + ClientWidth = 1353 Color = clWhite Font.Charset = GB2312_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 Position = poScreenCenter OnClose = FormClose - ExplicitWidth = 1167 + ExplicitWidth = 1369 ExplicitHeight = 597 PixelsPerInch = 96 TextHeight = 21 @@ -18,7 +18,7 @@ inherited frmYarnInfoSel: TfrmYarnInfoSel Tag = 1 Left = 0 Top = 0 - Width = 1151 + Width = 1353 Height = 30 AutoSize = True ButtonHeight = 30 @@ -29,6 +29,7 @@ inherited frmYarnInfoSel: TfrmYarnInfoSel List = True ShowCaptions = True TabOrder = 0 + ExplicitWidth = 1151 object ToolButton1: TToolButton Left = 0 Top = 0 @@ -73,12 +74,13 @@ inherited frmYarnInfoSel: TfrmYarnInfoSel object Panel1: TPanel [1] Left = 0 Top = 30 - Width = 1151 + Width = 1353 Height = 44 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 + ExplicitWidth = 1151 object Label1: TLabel Left = 216 Top = 10 @@ -113,11 +115,12 @@ inherited frmYarnInfoSel: TfrmYarnInfoSel object cxGrid1: TcxGrid [2] Left = 0 Top = 74 - Width = 1151 + Width = 1353 Height = 484 Align = alClient PopupMenu = PM_1 TabOrder = 2 + ExplicitTop = 80 object Tv1: TcxGridDBTableView OnDblClick = TV1DblClick Navigator.Buttons.CustomButtons = <> @@ -270,6 +273,14 @@ inherited frmYarnInfoSel: TfrmYarnInfoSel Options.Editing = False Width = 102 end + object Tv1Column7: TcxGridDBColumn + Caption = #25903#25968 + DataBinding.FieldName = 'ZS' + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Options.Editing = False + Width = 100 + end object Tv1Column5: TcxGridDBColumn Caption = #32442#27861 DataBinding.FieldName = 'FF' @@ -303,6 +314,14 @@ inherited frmYarnInfoSel: TfrmYarnInfoSel Options.Editing = False Width = 80 end + object Tv1Column8: TcxGridDBColumn + Caption = #26631#26679#26085#26399 + DataBinding.FieldName = 'BYDate' + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Options.Editing = False + Width = 100 + end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 diff --git a/A00通用窗体/U_YarnInfoSel.pas b/A00通用窗体/U_YarnInfoSel.pas index 225ece4..4775b9d 100644 --- a/A00通用窗体/U_YarnInfoSel.pas +++ b/A00通用窗体/U_YarnInfoSel.pas @@ -73,6 +73,8 @@ type Tv1Column5: TcxGridDBColumn; Tv1Column6: TcxGridDBColumn; ToolButton3: TToolButton; + Tv1Column7: TcxGridDBColumn; + Tv1Column8: TcxGridDBColumn; procedure FormCreate(Sender: TObject); procedure FormClose(Sender: TObject; var Action: TCloseAction); procedure FormShow(Sender: TObject); diff --git a/A01基础公司管理/Company.identcache b/A01基础公司管理/Company.identcache index b8299c0a654624e1b85f4d301cf8ede8ac6e6792..da2ec6e104b870187122c3182e14222fe5ac0031 100644 GIT binary patch delta 74 zcmV-Q0JZmOTr4(|dzeBe&T!n^&eF;_`7ev^<~lYvrpY{P cu0TZ*llQV~PZnU}n7ki||8pozKF|3U0PAZSKL7v# diff --git a/A01基础公司管理/U_BankList.dfm b/A01基础公司管理/U_BankList.dfm index ce0740f..68c2c73 100644 --- a/A01基础公司管理/U_BankList.dfm +++ b/A01基础公司管理/U_BankList.dfm @@ -151,7 +151,8 @@ inherited frmBankList: TfrmBankList Properties.Items.Strings = ( 'CNY' 'USD' - 'EUR') + 'EUR' + 'VND') Properties.OnEditValueChanged = v2Column8PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 85 @@ -188,7 +189,7 @@ inherited frmBankList: TfrmBankList BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue - TabOrder = 1 + TabOrder = 4 object Label1: TLabel Left = 66 Top = 15 @@ -206,6 +207,9 @@ inherited frmBankList: TfrmBankList OnChange = CustomerChange end end + inherited cxProgressBar2: TcxProgressBar + ExplicitHeight = 25 + end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_Company.ADOLink Left = 233 diff --git a/A01基础公司管理/U_BankList.pas b/A01基础公司管理/U_BankList.pas index db8fc29..902f458 100644 --- a/A01基础公司管理/U_BankList.pas +++ b/A01基础公司管理/U_BankList.pas @@ -15,7 +15,8 @@ uses cxTextEdit, cxPC, cxCheckComboBox, cxDropDownEdit, Menus, RM_e_Xls, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, dxDateRanges, dxBarBuiltInMenu, U_BaseList, - cxContainer, dxScrollbarAnnotations, cxProgressBar; + cxContainer, dxScrollbarAnnotations, cxProgressBar, dxSkinsCore, + dxSkinsDefaultPainters; type TfrmBankList = class(TfrmBaseList) diff --git a/A01基础公司管理/U_CustInput.dfm b/A01基础公司管理/U_CustInput.dfm index 68158c7..9ae4c99 100644 --- a/A01基础公司管理/U_CustInput.dfm +++ b/A01基础公司管理/U_CustInput.dfm @@ -70,8 +70,6 @@ inherited frmCustInput: TfrmCustInput ParentColor = False ParentCtl3D = False TabOrder = 1 - ExplicitLeft = -1 - ExplicitTop = 26 object Label2: TLabel Left = 14 Top = 12 @@ -336,8 +334,6 @@ inherited frmCustInput: TfrmCustInput Align = alClient Caption = 'Panel1' TabOrder = 2 - ExplicitTop = 380 - ExplicitHeight = 263 object Panel3: TPanel Left = 1 Top = 1 @@ -346,7 +342,6 @@ inherited frmCustInput: TfrmCustInput Align = alClient Caption = 'Panel1' TabOrder = 0 - ExplicitHeight = 261 object ToolBar3: TToolBar Tag = 1 Left = 1 @@ -397,7 +392,6 @@ inherited frmCustInput: TfrmCustInput Align = alClient BorderStyle = cxcbsNone TabOrder = 1 - ExplicitHeight = 229 object TV2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False diff --git a/A01基础公司管理/U_CustInput.pas b/A01基础公司管理/U_CustInput.pas index c5b5f83..810f551 100644 --- a/A01基础公司管理/U_CustInput.pas +++ b/A01基础公司管理/U_CustInput.pas @@ -261,17 +261,15 @@ begin Exit; end; - if trim(CoCode.Text) = '' then + with ADOQueryTemp do begin - with ADOQueryTemp do - begin - Close; - sql.Clear; - sql.Add(' exec P_BS_Com_Get_No @Str=''K'' '); - Open; - end; - CoCode.Text := trim(ADOQueryTemp.FieldByName('NewCoCode').asstring); + Close; + sql.Clear; + sql.Add(' exec P_BS_Com_Get_No @Str=''K'' '); + Open; end; + CoCode.Text := trim(ADOQueryTemp.FieldByName('NewCoCode').asstring); + end else begin diff --git a/A02基础产品管理/U_TatClothInfoInput.dfm b/A02基础产品管理/U_TatClothInfoInput.dfm index 5d8d27c..71a4b97 100644 --- a/A02基础产品管理/U_TatClothInfoInput.dfm +++ b/A02基础产品管理/U_TatClothInfoInput.dfm @@ -28,7 +28,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput ParentColor = False ShowCaptions = True TabOrder = 0 - ExplicitWidth = 1442 object ToolButton1: TToolButton Tag = 1 Left = 0 @@ -461,16 +460,12 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Properties.ActivePage = cxTabSheet1 Properties.CustomButtons.Buttons = <> Properties.Style = 9 - ExplicitTop = 381 - ExplicitHeight = 356 ClientRectBottom = 462 ClientRectRight = 1546 ClientRectTop = 28 object cxTabSheet1: TcxTabSheet Caption = #32463#19997#32452#21512 ImageIndex = 0 - ExplicitWidth = 1442 - ExplicitHeight = 316 object GroupBox1: TGroupBox Left = 931 Top = 0 @@ -485,8 +480,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Font.Style = [fsBold] ParentFont = False TabOrder = 0 - ExplicitWidth = 511 - ExplicitHeight = 316 object Y_Note_PLJ: TMemo Tag = 2 Left = 2 @@ -495,8 +488,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Height = 401 Align = alClient TabOrder = 0 - ExplicitWidth = 507 - ExplicitHeight = 283 end end object Panel1: TPanel @@ -506,7 +497,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Height = 434 Align = alLeft TabOrder = 1 - ExplicitHeight = 316 object cxPageControl2: TcxPageControl Left = 1 Top = 1 @@ -526,7 +516,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Visible = False Properties.CustomButtons.Buttons = <> Properties.Style = 6 - ExplicitHeight = 314 ClientRectBottom = 432 ClientRectRight = 929 ClientRectTop = 0 @@ -539,9 +528,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Align = alClient PopupMenu = PM_1 TabOrder = 1 - ExplicitLeft = 142 - ExplicitTop = -9 - ExplicitHeight = 375 object TV1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> @@ -712,8 +698,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput object cxTabSheet2: TcxTabSheet Caption = #32428#19997#32452#21512 ImageIndex = 1 - ExplicitWidth = 1442 - ExplicitHeight = 316 object GroupBox2: TGroupBox Left = 961 Top = 0 @@ -728,8 +712,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Font.Style = [fsBold] ParentFont = False TabOrder = 0 - ExplicitWidth = 481 - ExplicitHeight = 316 object Y_Note_PLW: TMemo Tag = 2 Left = 2 @@ -738,8 +720,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Height = 401 Align = alClient TabOrder = 0 - ExplicitWidth = 477 - ExplicitHeight = 283 end end object Panel2: TPanel @@ -749,7 +729,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Height = 434 Align = alLeft TabOrder = 1 - ExplicitHeight = 316 object cxPageControl1: TcxPageControl Left = 1 Top = 1 @@ -769,7 +748,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Visible = False Properties.CustomButtons.Buttons = <> Properties.Style = 6 - ExplicitHeight = 314 ClientRectBottom = 432 ClientRectRight = 959 ClientRectTop = 0 @@ -782,7 +760,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Align = alClient PopupMenu = PM_2 TabOrder = 1 - ExplicitHeight = 314 object Tv2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> @@ -953,8 +930,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput object cxTabSheet3: TcxTabSheet Caption = #36215#32508#27861 ImageIndex = 3 - ExplicitWidth = 1442 - ExplicitHeight = 316 object Panel8: TPanel Left = 0 Top = 0 @@ -963,7 +938,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Align = alTop TabOrder = 0 Visible = False - ExplicitWidth = 1442 object ToolBar4: TToolBar Tag = 1 Left = 555 @@ -1034,15 +1008,11 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Align = alClient ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 1 - ExplicitWidth = 1442 - ExplicitHeight = 284 end end object cxTabSheet4: TcxTabSheet Caption = #31359#32508#27861 ImageIndex = 3 - ExplicitWidth = 1442 - ExplicitHeight = 316 object CZF: TMemo Tag = 2 Left = 0 @@ -1052,15 +1022,11 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Align = alClient ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 0 - ExplicitWidth = 1442 - ExplicitHeight = 316 end end object cxTabSheet5: TcxTabSheet Caption = #31359#31576#27861 ImageIndex = 3 - ExplicitWidth = 1442 - ExplicitHeight = 316 object CKF: TMemo Tag = 2 Left = 0 @@ -1070,8 +1036,6 @@ inherited frmTatClothInfoInput: TfrmTatClothInfoInput Align = alClient ImeName = #20013#25991'('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861 TabOrder = 0 - ExplicitWidth = 1442 - ExplicitHeight = 316 end end end diff --git a/A02基础产品管理/U_TatClothInfoInput.pas b/A02基础产品管理/U_TatClothInfoInput.pas index d6080de..b26dff7 100644 --- a/A02基础产品管理/U_TatClothInfoInput.pas +++ b/A02基础产品管理/U_TatClothInfoInput.pas @@ -208,7 +208,7 @@ type function SaveData(): Boolean; { Private declarations } public - FBCIID, FCTID: string; + FBCIID, FCTID, JSGG, WSGG, FC_Spec: string; CopyInt: Integer; { Public declarations } @@ -230,22 +230,6 @@ var myStream: TMemoryStream; begin myStream := TMemoryStream.Create(); - with ADOQueryTemp do - begin - Close; - SQL.Clear; - SQL.Add('select * from BS_Cloth_Info where BCIID=''' + Trim(FBCIID) + ''''); - Open; - end; - SCSHData(ADOQueryTemp, ScrollBox1, 2); - SCSHData(ADOQueryTemp, ScrollBox1, 0); - - QZF.Text := Trim(ADOQueryTemp.FieldByName('QZF').AsString); - CZF.Text := Trim(ADOQueryTemp.FieldByName('CZF').AsString); - CKF.Text := Trim(ADOQueryTemp.FieldByName('CKF').AsString); - - Y_Note_PLJ.Text := Trim(ADOQueryTemp.FieldByName('Y_Note_PLJ').AsString); - Y_Note_PLW.Text := Trim(ADOQueryTemp.FieldByName('Y_Note_PLW').AsString); with ADOQueryTemp do begin @@ -269,6 +253,23 @@ begin SCreateCDS(ADOQueryTemp, CDS_2); SInitCDSData(ADOQueryTemp, CDS_2); + with ADOQueryTemp do + begin + Close; + SQL.Clear; + SQL.Add('select * from BS_Cloth_Info where BCIID=''' + Trim(FBCIID) + ''''); + Open; + end; + SCSHData(ADOQueryTemp, ScrollBox1, 2); + SCSHData(ADOQueryTemp, ScrollBox1, 0); + + QZF.Text := Trim(ADOQueryTemp.FieldByName('QZF').AsString); + CZF.Text := Trim(ADOQueryTemp.FieldByName('CZF').AsString); + CKF.Text := Trim(ADOQueryTemp.FieldByName('CKF').AsString); + + Y_Note_PLJ.Text := Trim(ADOQueryTemp.FieldByName('Y_Note_PLJ').AsString); + Y_Note_PLW.Text := Trim(ADOQueryTemp.FieldByName('Y_Note_PLW').AsString); + ////////////////////////// ////////////////////////// // with ADOQueryTemp do @@ -432,6 +433,27 @@ begin // First; // EnableControls; // end; + + JSGG := ''; + with CDS_1 do + begin + first; + while not eof do + begin + if Trim(CDS_1.fieldbyname('Y_Name').AsString) <> '' then + begin + if POS(Trim(CDS_1.fieldbyname('Y_Name').AsString), JSGG) = 0 then + begin + JSGG := JSGG + Trim(CDS_1.fieldbyname('Y_Name').AsString) + '+'; + end; + end; + next; + end; + First; + end; + + JSGG := Copy(JSGG, 1, Length(JSGG) - 1); + end; procedure TfrmTatClothInfoInput.JSWS(); @@ -495,6 +517,27 @@ begin // First; // EnableControls; // end; + + + WSGG := ''; + with CDS_2 do + begin + first; + while not eof do + begin + if Trim(CDS_2.fieldbyname('Y_Name').AsString) <> '' then + begin + if POS(Trim(CDS_2.fieldbyname('Y_Name').AsString), WSGG) = 0 then + begin + WSGG := WSGG + Trim(CDS_2.fieldbyname('Y_Name').AsString) + '+'; + end; + end; + next; + end; + First; + end; + + WSGG := Copy(WSGG, 1, Length(WSGG) - 1); end; procedure TfrmTatClothInfoInput.MenuItem1Click(Sender: TObject); @@ -572,6 +615,15 @@ begin // end; // // C_GramWeight.text := floattostr(roundfloat((SumJS + SumWS) / 3, 2)); + + /////////////ɹ ///////////// + + FC_Spec := ''; + FC_Spec := '(' + JSGG + ')*(' + WSGG + ')'; + + C_Spec.text := trim(FC_Spec); + + /////////////ɹ ///////////// end; procedure TfrmTatClothInfoInput.FormShow(Sender: TObject); @@ -582,6 +634,9 @@ begin // readCxGrid(self.Caption + 'TV44', Tv4, 'Ʒ'); InitGrid(); + + JSJS(); + JSWS(); JSKZ(); if CopyInt = 1 then @@ -829,8 +884,6 @@ begin end; ////////////////////////// γ˿ȱ ////////////////////////// - - ////////////////////////// ////////////////////////// // with CDS_4 do // begin @@ -879,8 +932,6 @@ begin // end; ////////////////////////// ////////////////////////// - - // dxSpreadSheet1.SaveToFile('D:\FilesExcel.xlsx'); // with ADOQueryCmd do // begin @@ -912,8 +963,6 @@ begin // Post; // end; - - // if pos('ӿ쳣', JsonStr) > 0 then // begin // raise Exception.Create(pchar(JsonStr)); diff --git a/A05基础资料管理/BaseInfo.dproj.local b/A05基础资料管理/BaseInfo.dproj.local index 903b30d..2919d95 100644 --- a/A05基础资料管理/BaseInfo.dproj.local +++ b/A05基础资料管理/BaseInfo.dproj.local @@ -1,32 +1,32 @@  - 1899-12-30 00:00:00.000.272,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用窗体\U_EmployeeSel.pas - 1899-12-30 00:00:00.000.446,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas - 1899-12-30 00:00:00.000.657,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas - 1899-12-30 00:00:00.000.500,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKInput.pas - 1899-12-30 00:00:00.000.440,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_HLManage.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_MachineManage.pas - 1899-12-30 00:00:00.000.251,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_HLManage.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage.pas - 1899-12-30 00:00:00.000.260,D:\Dp10Repo\项目代码\RTBasics\A05基础资料管理\U_PositionList.pas=D:\Dp10Repo\项目代码\RTBasics\A05基础资料管理\U_KuWeiManage.pas + 1899-12-30 00:00:00.000.440,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_MachineManage.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_HLManage.dfm + 1899-12-30 00:00:00.000.144,=D:\Dp10RepoV1\项目代码\花蝴蝶\A05基础资料管理\U_MachineInPut.pas + 1899-12-30 00:00:00.000.872,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas=D:\Dp10Repo\项目代码\RTBasics\A05基础资料管理\U_LbaelMapList.pas + 1899-12-30 00:00:00.000.251,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_HLManage.pas + 1899-12-30 00:00:00.000.987,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage_CX.pas + 1899-12-30 00:00:00.000.185,D:\Dp10RepoV1\项目代码\花蝴蝶\A05基础资料管理\U_PositionInPut.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\A05基础资料管理\U_MachineInPut.dfm + 1899-12-30 00:00:00.000.260,D:\Dp10Repo\项目代码\RTBasics\A05基础资料管理\U_KuWeiManage.pas=D:\Dp10Repo\项目代码\RTBasics\A05基础资料管理\U_PositionList.pas + 1899-12-30 00:00:00.000.824,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas 1899-12-30 00:00:00.000.467,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas 1899-12-30 00:00:00.000.888,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A00通用窗体\U_CompanySel.pas - 1899-12-30 00:00:00.000.185,D:\Dp10RepoV1\项目代码\花蝴蝶\A05基础资料管理\U_MachineInPut.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\A05基础资料管理\U_PositionInPut.dfm - 1899-12-30 00:00:00.000.872,D:\Dp10Repo\项目代码\RTBasics\A05基础资料管理\U_LbaelMapList.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.dfm - 1899-12-30 00:00:00.000.824,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas - 1899-12-30 00:00:00.000.440,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_HLManage.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_MachineManage.dfm - 1899-12-30 00:00:00.000.251,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_HLManage.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage.dfm - 1899-12-30 00:00:00.000.260,D:\Dp10Repo\项目代码\RTBasics\A05基础资料管理\U_PositionList.dfm=D:\Dp10Repo\项目代码\RTBasics\A05基础资料管理\U_KuWeiManage.dfm - 1899-12-30 00:00:00.000.409,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas - 1899-12-30 00:00:00.000.185,D:\Dp10RepoV1\项目代码\花蝴蝶\A05基础资料管理\U_MachineInPut.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\A05基础资料管理\U_PositionInPut.pas - 1899-12-30 00:00:00.000.144,=D:\Dp10RepoV1\项目代码\花蝴蝶\A05基础资料管理\U_MachineInPut.pas - 1899-12-30 00:00:00.000.013,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas - 1899-12-30 00:00:00.000.872,D:\Dp10Repo\项目代码\RTBasics\A05基础资料管理\U_LbaelMapList.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas + 1899-12-30 00:00:00.000.440,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_MachineManage.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_HLManage.pas + 1899-12-30 00:00:00.000.185,D:\Dp10RepoV1\项目代码\花蝴蝶\A05基础资料管理\U_PositionInPut.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\A05基础资料管理\U_MachineInPut.pas + 1899-12-30 00:00:00.000.471,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKDRtInPut.pas + 1899-12-30 00:00:00.000.657,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas + 1899-12-30 00:00:00.000.116,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKDRList.pas + 1899-12-30 00:00:00.000.260,D:\Dp10Repo\项目代码\RTBasics\A05基础资料管理\U_KuWeiManage.dfm=D:\Dp10Repo\项目代码\RTBasics\A05基础资料管理\U_PositionList.dfm 1899-12-30 00:00:00.000.293,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用组件\FrameDateSel.pas - 2025-03-04 23:03:41.987,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage_CX.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage.pas - 2025-03-04 23:03:41.987,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage_CX.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage.dfm - 2025-03-04 23:12:55.116,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKDRList.pas - 2025-03-04 23:15:05.471,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKDRtInPut.pas - 2025-03-04 23:30:55.369,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage_Sel.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage_CX.pas - 2025-03-04 23:30:55.369,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage_Sel.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage_CX.dfm + 1899-12-30 00:00:00.000.872,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.dfm=D:\Dp10Repo\项目代码\RTBasics\A05基础资料管理\U_LbaelMapList.dfm + 1899-12-30 00:00:00.000.409,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas + 1899-12-30 00:00:00.000.013,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas + 1899-12-30 00:00:00.000.500,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKInput.pas + 1899-12-30 00:00:00.000.987,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage_CX.dfm + 1899-12-30 00:00:00.000.369,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage_CX.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage_Sel.dfm + 1899-12-30 00:00:00.000.446,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas + 1899-12-30 00:00:00.000.369,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage_CX.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage_Sel.pas + 1899-12-30 00:00:00.000.272,=D:\Dp10RepoV1\项目代码\D10szJinCheng\A00通用窗体\U_EmployeeSel.pas + 1899-12-30 00:00:00.000.251,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_GKManage.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\A05基础资料管理\U_HLManage.dfm diff --git a/A05基础资料管理/BaseInfo.identcache b/A05基础资料管理/BaseInfo.identcache index cfa51f157c0ea0fc7b763c7ccd39016f81667c2f..db7c23169264f7892e96145857bd98faae3ce5a9 100644 GIT binary patch delta 151 zcmdlbFkhHaej?+H$@keEC(mY*+IUNgadH8pHJ5XKZb4#RWpHZFGTocZ%c?t>lV$0|TZ$8RDNJ6+@{KWIav`JE;0QIM`F8atf>N jWO9e4l+AQ0GPfgUB6k diff --git a/A05基础资料管理/ProjectGroup1.groupproj.local b/A05基础资料管理/ProjectGroup1.groupproj.local index 72ac9e6..03abeb7 100644 --- a/A05基础资料管理/ProjectGroup1.groupproj.local +++ b/A05基础资料管理/ProjectGroup1.groupproj.local @@ -2,6 +2,6 @@ - + diff --git a/A05基础资料管理/testDll.identcache b/A05基础资料管理/testDll.identcache index a92e6cc9ecac3721b0f20a25b265cfb47bf1e3b5..81b161db6181d161a3bc14fe577106998dbfc295 100644 GIT binary patch delta 43 ncmdnOxQUUKiGhK^b7GtVyLVz{L}p~-L|yTTbHy3GQG^Tt`^5}d delta 42 mcmdnQxP_6GiGhK^XJWJhM`USgL}p@M`oty!MlTcr9X$a0C=9Ux diff --git a/B01基础合同管理/Contract.identcache b/B01基础合同管理/Contract.identcache index e6547cd09f361551643335c2c2ca84108b4a1672..c10e10fd3d64ae0264bb6028975a8aff28564894 100644 GIT binary patch delta 29 kcmew-^iOER38u-KoS~D?u`6wU#q@+_GcSh>Bamkg0KHxdQUCw| delta 29 kcmew-^iOER38u;RoJyPRnV+x#8TOl%Ib;|opI{0F0IjeJJOBUy diff --git a/B02基础纱线仓库/ProjectGroup1.groupproj.local b/B02基础纱线仓库/ProjectGroup1.groupproj.local index fc9383f..1c43418 100644 --- a/B02基础纱线仓库/ProjectGroup1.groupproj.local +++ b/B02基础纱线仓库/ProjectGroup1.groupproj.local @@ -2,6 +2,6 @@ - + diff --git a/B02基础纱线仓库/U_YarnInfoInPut.dfm b/B02基础纱线仓库/U_YarnInfoInPut.dfm index 6740e41..b1ea994 100644 --- a/B02基础纱线仓库/U_YarnInfoInPut.dfm +++ b/B02基础纱线仓库/U_YarnInfoInPut.dfm @@ -2,13 +2,13 @@ inherited frmYarnInfoInPut: TfrmYarnInfoInPut Left = 88 Top = 141 Caption = #32433#32447#20449#24687#24405#20837 - ClientHeight = 397 + ClientHeight = 490 ClientWidth = 1268 Color = clWhite Font.Height = -16 Position = poMainFormCenter ExplicitWidth = 1284 - ExplicitHeight = 436 + ExplicitHeight = 529 PixelsPerInch = 96 TextHeight = 21 object ToolBar1: TToolBar [0] @@ -61,7 +61,7 @@ inherited frmYarnInfoInPut: TfrmYarnInfoInPut Left = 0 Top = 30 Width = 1268 - Height = 367 + Height = 460 Align = alClient BevelInner = bvNone BevelOuter = bvNone @@ -80,169 +80,412 @@ inherited frmYarnInfoInPut: TfrmYarnInfoInPut ExplicitTop = 29 object Label2: TLabel Left = 16 - Top = 155 - Width = 28 - Height = 14 + Top = 156 + Width = 32 + Height = 21 Caption = #31867#22411 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False end object Label6: TLabel - Left = 390 - Top = 114 - Width = 28 - Height = 14 + Left = 16 + Top = 239 + Width = 32 + Height = 21 Caption = #21697#29260 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False end object Label7: TLabel Left = 16 - Top = 239 - Width = 28 - Height = 14 + Top = 285 + Width = 32 + Height = 21 Caption = #22791#27880 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False end object Label1: TLabel Left = 16 - Top = 31 - Width = 28 - Height = 14 + Top = 32 + Width = 32 + Height = 21 Caption = #21697#21517 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False end object Label3: TLabel - Left = 390 - Top = 31 - Width = 28 - Height = 14 + Left = 387 + Top = 32 + Width = 32 + Height = 21 Caption = #32534#21495 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False end object Label4: TLabel Left = 16 - Top = 71 - Width = 28 - Height = 14 + Top = 72 + Width = 32 + Height = 21 Caption = #35268#26684 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False end object Label8: TLabel - Left = 369 - Top = 71 - Width = 49 - Height = 14 + Left = 387 + Top = 72 + Width = 60 + Height = 21 Caption = #29702#35770'D'#25968 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False end object Label9: TLabel - Left = 390 - Top = 200 - Width = 28 - Height = 14 + Left = 387 + Top = 196 + Width = 32 + Height = 21 Caption = #39068#33394 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False end object Label5: TLabel Left = 16 - Top = 114 - Width = 28 - Height = 14 + Top = 115 + Width = 32 + Height = 21 Caption = #25104#20998 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False end object Label10: TLabel - Left = 390 - Top = 155 - Width = 28 - Height = 14 + Left = 387 + Top = 156 + Width = 32 + Height = 21 Caption = #32442#27861 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False end object Label11: TLabel Left = 16 - Top = 200 - Width = 28 - Height = 14 + Top = 196 + Width = 32 + Height = 21 Caption = #25467#24230 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False + end + object Label12: TLabel + Left = 387 + Top = 115 + Width = 32 + Height = 21 + Caption = #25903#25968 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False + end + object Label13: TLabel + Left = 374 + Top = 238 + Width = 64 + Height = 21 + Caption = #26631#26679#26085#26399 + Font.Charset = GB2312_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = #24494#36719#38597#40657 + Font.Style = [] + ParentFont = False end object Brand: TcxTextEdit Tag = 2 - Left = 424 - Top = 110 + Left = 68 + Top = 235 ParentColor = True + ParentFont = False + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.IsFontAssigned = True TabOrder = 0 Width = 300 end object Y_Name: TcxTextEdit Tag = 2 - Left = 48 - Top = 27 + Left = 68 + Top = 28 ParentColor = True + ParentFont = False + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.IsFontAssigned = True TabOrder = 1 + OnClick = Y_NameClick + OnExit = Y_NameExit Width = 300 end object Y_Code: TcxTextEdit Tag = 2 - Left = 424 - Top = 27 + Left = 458 + Top = 28 Enabled = False ParentColor = True + ParentFont = False + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.IsFontAssigned = True TabOrder = 2 Width = 300 end object Denier: TcxTextEdit Tag = 2 - Left = 424 - Top = 67 + Left = 458 + Top = 68 ParentColor = True + ParentFont = False + Properties.OnEditValueChanged = DenierPropertiesEditValueChanged + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.IsFontAssigned = True TabOrder = 3 - Width = 300 - end - object Y_Spec: TcxTextEdit - Tag = 2 - Left = 48 - Top = 67 - ParentColor = True - TabOrder = 4 - Width = 300 - end - object Y_Color: TcxTextEdit - Tag = 2 - Left = 424 - Top = 196 - TabOrder = 5 + OnClick = DenierClick + OnExit = DenierExit Width = 300 end object Note: TcxMemo Tag = 2 - Left = 48 - Top = 239 + Left = 68 + Top = 285 ParentColor = True - TabOrder = 6 + ParentFont = False + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.IsFontAssigned = True + TabOrder = 4 Height = 89 Width = 691 end - object Y_Type: TcxComboBox - Tag = 2 - Left = 48 - Top = 151 - ParentColor = True - Properties.DropDownListStyle = lsFixedList - TabOrder = 7 - Width = 300 - end - object Y_Composition: TcxTextEdit - Tag = 2 - Left = 48 - Top = 110 - ParentColor = True - TabOrder = 8 - Width = 300 - end object FF: TcxTextEdit Tag = 2 - Left = 424 - Top = 151 + Left = 458 + Top = 152 ParentColor = True - TabOrder = 9 + ParentFont = False + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.IsFontAssigned = True + TabOrder = 5 Width = 300 end object ND: TcxTextEdit Tag = 2 - Left = 48 - Top = 196 + Left = 68 + Top = 192 ParentColor = True + ParentFont = False + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.IsFontAssigned = True + TabOrder = 6 + Width = 300 + end + object ZS: TcxTextEdit + Tag = 2 + Left = 458 + Top = 111 + ParentColor = True + ParentFont = False + Properties.OnEditValueChanged = ZSPropertiesEditValueChanged + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.IsFontAssigned = True + TabOrder = 7 + OnClick = ZSClick + OnExit = ZSExit + Width = 300 + end + object BYDate: TcxDateEdit + Tag = 2 + Left = 458 + Top = 235 + ParentFont = False + Properties.ShowTime = False + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.IsFontAssigned = True + TabOrder = 8 + Width = 300 + end + object Y_Color: TcxButtonEdit + Tag = 2 + Left = 458 + Top = 192 + Hint = 'Y_Color/'#39068#33394 + ParentFont = False + Properties.Buttons = < + item + Default = True + Kind = bkEllipsis + end> + Properties.ReadOnly = True + Properties.OnButtonClick = ParentCoNamePropertiesButtonClick + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.ButtonStyle = btsDefault + Style.IsFontAssigned = True + TabOrder = 9 + OnDblClick = Y_ColorDblClick + Width = 300 + end + object Y_Type: TcxButtonEdit + Tag = 2 + Left = 68 + Top = 157 + Hint = 'Y_Type/'#31867#22411 + ParentFont = False + Properties.Buttons = < + item + Default = True + Kind = bkEllipsis + end> + Properties.ReadOnly = True + Properties.OnButtonClick = ParentCoNamePropertiesButtonClick + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.ButtonStyle = btsDefault + Style.IsFontAssigned = True TabOrder = 10 + OnDblClick = Y_ColorDblClick + Width = 300 + end + object Y_Composition: TcxButtonEdit + Tag = 2 + Left = 68 + Top = 111 + Hint = 'Y_Composition/'#25104#20998 + ParentFont = False + Properties.Buttons = < + item + Default = True + Kind = bkEllipsis + end> + Properties.ReadOnly = True + Properties.OnButtonClick = ParentCoNamePropertiesButtonClick + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.ButtonStyle = btsDefault + Style.IsFontAssigned = True + TabOrder = 11 + OnDblClick = Y_ColorDblClick + Width = 300 + end + object Y_Spec: TcxButtonEdit + Tag = 2 + Left = 68 + Top = 68 + Hint = 'Y_Spec/'#35268#26684 + ParentFont = False + Properties.Buttons = < + item + Default = True + Kind = bkEllipsis + end> + Properties.ReadOnly = True + Properties.OnButtonClick = ParentCoNamePropertiesButtonClick + Style.Font.Charset = GB2312_CHARSET + Style.Font.Color = clWindowText + Style.Font.Height = -16 + Style.Font.Name = #24494#36719#38597#40657 + Style.Font.Style = [] + Style.ButtonStyle = btsDefault + Style.IsFontAssigned = True + TabOrder = 12 + OnDblClick = Y_ColorDblClick Width = 300 end end diff --git a/B02基础纱线仓库/U_YarnInfoInPut.pas b/B02基础纱线仓库/U_YarnInfoInPut.pas index 8857016..1169421 100644 --- a/B02基础纱线仓库/U_YarnInfoInPut.pas +++ b/B02基础纱线仓库/U_YarnInfoInPut.pas @@ -12,7 +12,7 @@ uses cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, dxDateRanges, dxBarBuiltInMenu, U_BaseInput, U_BaseList, System.ImageList, Vcl.ImgList, cxContainer, cxMaskEdit, cxMemo, cxImageList, dxSkinsCore, - dxSkinsDefaultPainters; + dxSkinsDefaultPainters, dxCore, cxDateUtils; type TfrmYarnInfoInPut = class(TfrmBaseInput) @@ -35,23 +35,38 @@ type Label4: TLabel; Label8: TLabel; Denier: TcxTextEdit; - Y_Spec: TcxTextEdit; Label9: TLabel; - Y_Color: TcxTextEdit; Note: TcxMemo; - Y_Type: TcxComboBox; - Y_Composition: TcxTextEdit; Label5: TLabel; ADOConnection1: TADOConnection; Label10: TLabel; FF: TcxTextEdit; Label11: TLabel; ND: TcxTextEdit; + Label12: TLabel; + ZS: TcxTextEdit; + Label13: TLabel; + BYDate: TcxDateEdit; + Y_Color: TcxButtonEdit; + Y_Type: TcxButtonEdit; + Y_Composition: TcxButtonEdit; + Y_Spec: TcxButtonEdit; procedure FormClose(Sender: TObject; var Action: TCloseAction); procedure TBCloseClick(Sender: TObject); procedure FormShow(Sender: TObject); procedure TBSaveClick(Sender: TObject); procedure FormCreate(Sender: TObject); + procedure Y_NameClick(Sender: TObject); + procedure Y_NameExit(Sender: TObject); + procedure Y_SpecPropertiesChange(Sender: TObject); + procedure DenierClick(Sender: TObject); + procedure DenierExit(Sender: TObject); + procedure ZSClick(Sender: TObject); + procedure ZSExit(Sender: TObject); + procedure DenierPropertiesEditValueChanged(Sender: TObject); + procedure ZSPropertiesEditValueChanged(Sender: TObject); + procedure ParentCoNamePropertiesButtonClick(Sender: TObject; AButtonIndex: Integer); + procedure Y_ColorDblClick(Sender: TObject); private { Private declarations } function SaveData(): Boolean; @@ -70,6 +85,21 @@ uses {$R *.dfm} +procedure TfrmYarnInfoInPut.DenierClick(Sender: TObject); +begin + ZS.Style.Color := clMoneyGreen; +end; + +procedure TfrmYarnInfoInPut.DenierExit(Sender: TObject); +begin + ZS.Style.Color := clWhite; +end; + +procedure TfrmYarnInfoInPut.DenierPropertiesEditValueChanged(Sender: TObject); +begin + ZS.text := floattostr(roundfloat(9000 / strtofloatdef(Denier.text, 0), 2)); +end; + procedure TfrmYarnInfoInPut.FormClose(Sender: TObject; var Action: TCloseAction); begin inherited; @@ -178,8 +208,17 @@ var begin inherited; - fsj := ' select Code=ZDYNo,Name=ZDYName from KH_ZDY where Type=''YType'' and MainType=''ɴߵ'' '; - SInitTcxComBoxBySql(ADOQueryTemp, Y_Type, TRUE, fsj); +// fsj := ' select Code=ZDYNo,Name=ZDYName from KH_ZDY where Type=''YType'' and MainType=''ɴߵ'' '; +// SInitTcxComBoxBySql(ADOQueryTemp, Y_Type, false, fsj); +// +// fsj := ' select Code=ZDYNo,Name=ZDYName from KH_ZDY where Type=''Y_Spec'' and MainType=''ɴߵ'' '; +// SInitTcxComBoxBySql(ADOQueryTemp, Y_Spec, false, fsj); +// +// fsj := ' select Code=ZDYNo,Name=ZDYName from KH_ZDY where Type=''Y_Composition'' and MainType=''ɴߵ'' '; +// SInitTcxComBoxBySql(ADOQueryTemp, Y_Composition, false, fsj); +// +// fsj := ' select Code=ZDYNo,Name=ZDYName from KH_ZDY where Type=''Y_Color'' and MainType=''ɴߵ'' '; +// SInitTcxComBoxBySql(ADOQueryTemp, Y_Color, false, fsj); with ADOQueryTemp do begin @@ -187,11 +226,45 @@ begin SQL.Clear; sql.Add(' select * from BS_Yarn_Info '); sql.Add(' where BYIID=''' + Trim(FBYIID) + ''''); - Open; end; SCSHData(ADOQueryTemp, ScrollBox1, 2); + if FBYIID = '' then + begin + ByDate.Date := SGetServerDateTime(ADOQueryTemp); + end; + +end; + +procedure TfrmYarnInfoInPut.Y_ColorDblClick(Sender: TObject); +begin + TcxButtonEdit(Sender).Text := ''; + TcxButtonEdit(Sender).Properties.LookupItems.Text := ''; +end; + +procedure TfrmYarnInfoInPut.ParentCoNamePropertiesButtonClick(Sender: TObject; AButtonIndex: Integer); +var + fsj: string; + FWZ: Integer; +begin + fsj := Trim(TcxButtonEdit(Sender).Hint); + FWZ := Pos('/', fsj); + try + frmZDYHelp := TfrmZDYHelp.Create(Application); + with frmZDYHelp do + begin + MainType := 'Cust'; + flag := Copy(fsj, 1, FWZ - 1); + flagname := Copy(fsj, FWZ + 1, Length(fsj) - FWZ); + if ShowModal = 1 then + begin + TcxButtonEdit(Sender).Text := Trim(ClientDataSet1.fieldbyname('ZDYName').AsString); + end; + end; + finally + frmZDYHelp.Free; + end; end; procedure TfrmYarnInfoInPut.TBSaveClick(Sender: TObject); @@ -201,11 +274,13 @@ begin // Application.MessageBox('ŲΪ!', 'ʾ', 0); // Exit; // end; + Y_Name.SetFocus; if Trim(Y_Name.Text) = '' then begin Application.MessageBox('ƲΪ!', 'ʾ', 0); Exit; end; + if Trim(Denier.Text) <> '' then begin if StrToFloatdef(Denier.Text, 0) = 0 then @@ -222,5 +297,39 @@ begin end; end; +procedure TfrmYarnInfoInPut.Y_NameClick(Sender: TObject); +begin + Y_Spec.Style.Color := clMoneyGreen; + Y_Composition.Style.Color := clMoneyGreen; + Y_Color.Style.Color := clMoneyGreen; +end; + +procedure TfrmYarnInfoInPut.Y_NameExit(Sender: TObject); +begin + Y_Spec.Style.Color := clWhite; + Y_Composition.Style.Color := clWhite; + Y_Color.Style.Color := clWhite; +end; + +procedure TfrmYarnInfoInPut.Y_SpecPropertiesChange(Sender: TObject); +begin + Y_Name.text := Trim(Y_Spec.text) + Trim(Y_Composition.text) + Trim(Y_Color.text); +end; + +procedure TfrmYarnInfoInPut.ZSClick(Sender: TObject); +begin + Denier.Style.Color := clMoneyGreen; +end; + +procedure TfrmYarnInfoInPut.ZSExit(Sender: TObject); +begin + Denier.Style.Color := clWhite; +end; + +procedure TfrmYarnInfoInPut.ZSPropertiesEditValueChanged(Sender: TObject); +begin + Denier.text := floattostr(roundfloat(9000 / strtofloatdef(ZS.text, 0), 2)); +end; + end. diff --git a/B02基础纱线仓库/U_YarnInfoList.dfm b/B02基础纱线仓库/U_YarnInfoList.dfm index 5f127de..0636c0c 100644 --- a/B02基础纱线仓库/U_YarnInfoList.dfm +++ b/B02基础纱线仓库/U_YarnInfoList.dfm @@ -78,18 +78,46 @@ inherited frmYarnInfoList: TfrmYarnInfoList AutoSize = True Caption = #31867#22411#23450#20041 ImageIndex = 15 + Visible = False OnClick = ToolButton2Click end - object TBExport: TToolButton + object ToolButton3: TToolButton Left = 402 Top = 0 AutoSize = True + Caption = #35268#26684#23450#20041 + ImageIndex = 15 + Visible = False + OnClick = ToolButton3Click + end + object ToolButton4: TToolButton + Left = 489 + Top = 0 + AutoSize = True + Caption = #25104#20998#23450#20041 + ImageIndex = 15 + Visible = False + OnClick = ToolButton4Click + end + object ToolButton5: TToolButton + Left = 576 + Top = 0 + AutoSize = True + Caption = #39068#33394#23450#20041 + ImageIndex = 15 + Visible = False + OnClick = ToolButton5Click + end + object TBExport: TToolButton + Left = 663 + Top = 0 + AutoSize = True Caption = #23548#20986 ImageIndex = 20 OnClick = TBExportClick end object ToolButton1: TToolButton - Left = 465 + Left = 726 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 @@ -97,7 +125,7 @@ inherited frmYarnInfoList: TfrmYarnInfoList OnClick = ToolButton1Click end object TBClose: TToolButton - Left = 552 + Left = 813 Top = 0 AutoSize = True Caption = #20851#38381 @@ -124,54 +152,57 @@ inherited frmYarnInfoList: TfrmYarnInfoList Caption = #21697#21517 end object Label4: TLabel - Left = 416 + Left = 414 Top = 10 Width = 32 Height = 21 Caption = #35268#26684 end object Label5: TLabel - Left = 36 + Left = 34 Top = 10 Width = 32 Height = 21 - Caption = #21697#29260 + Caption = #32534#21495 end object lbl1: TLabel Left = 606 - Top = 11 + Top = 10 Width = 32 Height = 21 Caption = #31867#22411 end object Y_Name: TcxTextEdit Tag = 2 - Left = 262 - Top = 4 + Left = 264 + Top = 6 Properties.OnChange = BrandPropertiesChange TabOrder = 0 Width = 150 end - object Y_Spec: TcxTextEdit + object Y_Code: TcxTextEdit Tag = 2 - Left = 452 - Top = 4 + Left = 72 + Top = 6 Properties.OnChange = BrandPropertiesChange TabOrder = 1 Width = 150 end - object Brand: TcxTextEdit + object Y_Type: TcxComboBox Tag = 2 - Left = 72 - Top = 4 + Left = 644 + Top = 6 + Properties.DropDownListStyle = lsFixedList Properties.OnChange = BrandPropertiesChange TabOrder = 2 Width = 150 end - object Y_Type: TcxComboBox - Left = 642 - Top = 4 + object Y_Spec: TcxComboBox + Tag = 2 + Left = 450 + Top = 6 Properties.DropDownListStyle = lsFixedList + Properties.OnChange = BrandPropertiesChange TabOrder = 3 Width = 150 end @@ -339,6 +370,14 @@ inherited frmYarnInfoList: TfrmYarnInfoList VisibleForCustomization = False Width = 66 end + object Tv1Column7: TcxGridDBColumn + Caption = #25903#25968 + DataBinding.FieldName = 'ZS' + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Options.Editing = False + Width = 100 + end object Tv1Column4: TcxGridDBColumn Caption = #32442#27861 DataBinding.FieldName = 'FF' @@ -363,6 +402,14 @@ inherited frmYarnInfoList: TfrmYarnInfoList Options.Editing = False Width = 80 end + object Tv1Column8: TcxGridDBColumn + Caption = #26631#26679#26085#26399 + DataBinding.FieldName = 'BYDate' + DataBinding.IsNullValueType = True + HeaderAlignmentHorz = taCenter + Options.Editing = False + Width = 100 + end object v1Column12: TcxGridDBColumn Tag = 2 Caption = #22791#27880 @@ -388,7 +435,7 @@ inherited frmYarnInfoList: TfrmYarnInfoList inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_YarnStk.ADOLink Left = 113 - Top = 193 + Top = 192 end object ADOQueryCmd: TADOQuery Connection = DataLink_YarnStk.ADOLink diff --git a/B02基础纱线仓库/U_YarnInfoList.pas b/B02基础纱线仓库/U_YarnInfoList.pas index d90836c..36d61af 100644 --- a/B02基础纱线仓库/U_YarnInfoList.pas +++ b/B02基础纱线仓库/U_YarnInfoList.pas @@ -52,8 +52,7 @@ type Label4: TLabel; Label5: TLabel; Y_Name: TcxTextEdit; - Y_Spec: TcxTextEdit; - Brand: TcxTextEdit; + Y_Code: TcxTextEdit; ToolButton1: TToolButton; Tv1Column1: TcxGridDBColumn; ToolButton2: TToolButton; @@ -63,6 +62,12 @@ type Tv1Column4: TcxGridDBColumn; Tv1Column5: TcxGridDBColumn; Tv1Column6: TcxGridDBColumn; + Tv1Column7: TcxGridDBColumn; + ToolButton3: TToolButton; + ToolButton4: TToolButton; + ToolButton5: TToolButton; + Y_Spec: TcxComboBox; + Tv1Column8: TcxGridDBColumn; procedure FormClose(Sender: TObject; var Action: TCloseAction); procedure FormCreate(Sender: TObject); procedure TBRafreshClick(Sender: TObject); @@ -78,6 +83,9 @@ type procedure ToolButton1Click(Sender: TObject); procedure ToolButton2Click(Sender: TObject); procedure BrandPropertiesChange(Sender: TObject); + procedure ToolButton3Click(Sender: TObject); + procedure ToolButton4Click(Sender: TObject); + procedure ToolButton5Click(Sender: TObject); private canshu1, FSTKName, canshu3: string; procedure InitGrid(); @@ -163,6 +171,63 @@ begin end; end; +procedure TfrmYarnInfoList.ToolButton3Click(Sender: TObject); +begin + try + frmZDYHelp := TfrmZDYHelp.Create(Application); + with frmZDYHelp do + begin + flag := 'Y_Spec'; + flagname := ''; + MainType := 'ɴߵ'; + if ShowModal = 1 then + begin + + end; + end; + finally + frmZDYHelp.Free; + end; +end; + +procedure TfrmYarnInfoList.ToolButton4Click(Sender: TObject); +begin + try + frmZDYHelp := TfrmZDYHelp.Create(Application); + with frmZDYHelp do + begin + flag := 'Y_Composition'; + flagname := 'ɷ'; + MainType := 'ɴߵ'; + if ShowModal = 1 then + begin + + end; + end; + finally + frmZDYHelp.Free; + end; +end; + +procedure TfrmYarnInfoList.ToolButton5Click(Sender: TObject); +begin + try + frmZDYHelp := TfrmZDYHelp.Create(Application); + with frmZDYHelp do + begin + flag := 'Y_Color'; + flagname := 'ɫ'; + MainType := 'ɴߵ'; + if ShowModal = 1 then + begin + + end; + end; + finally + frmZDYHelp.Free; + end; +end; + procedure TfrmYarnInfoList.TBCloseClick(Sender: TObject); begin Close; @@ -178,6 +243,9 @@ begin fsj := ' select Code=ZDYNo,Name=ZDYName from KH_ZDY where Type=''YType'' and MainType=''ɴߵ'' '; SInitTcxComBoxBySql(ADOQueryTemp, Y_Type, false, fsj); + fsj := ' select Code=ZDYNo,Name=ZDYName from KH_ZDY where Type=''Y_SPec'' and MainType=''ɴߵ'' '; + SInitTcxComBoxBySql(ADOQueryTemp, Y_SPec, false, fsj); + InitGrid(); end; diff --git a/B02基础纱线仓库/YarnStk.dproj.local b/B02基础纱线仓库/YarnStk.dproj.local index 40ed8d8..01c0619 100644 --- a/B02基础纱线仓库/YarnStk.dproj.local +++ b/B02基础纱线仓库/YarnStk.dproj.local @@ -14,7 +14,7 @@ 1899-12-30 00:00:00.000.969,D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutList.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutReturnList.pas 1899-12-30 00:00:00.000.000,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnPurOutReturn1.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnPurOutReturn.dfm 1899-12-30 00:00:00.000.976,D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\U_ClothPurchasePlanList.dfm=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanList.dfm - 1899-12-30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas + 1899-12-30 00:00:00.000.376,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutEdit.pas 1899-12-30 00:00:00.000.224,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanSel.pas= 1899-12-30 00:00:00.000.517,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas 1899-12-30 00:00:00.000.334,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutList.pas @@ -30,11 +30,11 @@ 1899-12-30 00:00:00.000.065,D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\U_ClothPurchasePlanPut.pas=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanPut.pas 1899-12-30 00:00:00.000.688,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnOutReturnList1.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnOutReturnList.dfm 1899-12-30 00:00:00.000.642,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas - 1899-12-30 00:00:00.000.872,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnInList_RC.pas 1899-12-30 00:00:00.000.887,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas 1899-12-30 00:00:00.000.670,D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutInput1.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutEdit.pas + 1899-12-30 00:00:00.000.872,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnInList_RC.pas 1899-12-30 00:00:00.000.878,D:\Dp10Repo\项目代码\RTBasics\B04采购计划管理\U_ClothPurchasePlanPut.pas= - 1899-12-30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas= + 1899-12-30 00:00:00.000.800,=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_CPSelBig.pas 1899-12-30 00:00:00.000.670,D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutInput1.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutEdit.dfm 1899-12-30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas 1899-12-30 00:00:00.000.008,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\Unit1.pas @@ -43,7 +43,7 @@ 1899-12-30 00:00:00.000.267,=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanPut.pas 1899-12-30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas 1899-12-30 00:00:00.000.511,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothPurchasePlanSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnPurchasePlanSel.pas - 1899-12-30 00:00:00.000.800,=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_CPSelBig.pas + 1899-12-30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas= 1899-12-30 00:00:00.000.891,D:\Dp10RepoV1\项目代码\花蝴蝶\A00通用组件\FrameDateSel.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\Unit1.pas 1899-12-30 00:00:00.000.981,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnInList.pas 1899-12-30 00:00:00.000.000,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnPurOutReturn1.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnPurOutReturn.pas @@ -71,7 +71,7 @@ 1899-12-30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas 1899-12-30 00:00:00.000.891,D:\Dp10RepoV1\项目代码\花蝴蝶\A00通用组件\FrameDateSel.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\Unit1.dfm 1899-12-30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas - 1899-12-30 00:00:00.000.376,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnOutEdit.pas + 1899-12-30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas 1899-12-30 00:00:00.000.517,D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnPurchasePlanSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.dfm 1899-12-30 00:00:00.000.796,=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnStkList.pas 1899-12-30 00:00:00.000.803,=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnInfoList.pas @@ -80,8 +80,8 @@ 1899-12-30 00:00:00.000.344,D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnInList.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_YarnInList_Sel.dfm 1899-12-30 00:00:00.000.334,=D:\Dp10RepoV1\项目代码\花蝴蝶\A00通用窗体\U_InputBoxSingleNumber.pas 1899-12-30 00:00:00.000.111,=D:\Dp10Repo\项目代码\RTBasics\B02基础纱线仓库\U_YarnWeighing.pas - 1899-12-30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas= 1899-12-30 00:00:00.000.425,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas + 1899-12-30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas= 1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm 1899-12-30 00:00:00.000.420,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnInfoInPut.pas 1899-12-30 00:00:00.000.768,=D:\Dp10RepoV1\项目代码\花蝴蝶\B02基础纱线仓库\U_YarnPurOutReturn.pas @@ -129,7 +129,6 @@ - @@ -150,8 +149,6 @@ - - @@ -179,33 +176,33 @@ + + - - - - - - - - - - - - + + - - - - - - + + + + + + + + + + + + + + diff --git a/B02基础纱线仓库/YarnStk.identcache b/B02基础纱线仓库/YarnStk.identcache index 20be825d536fab92eb045a44e24ecfc4888754ea..d4a1a644de8b9faca2ce3bf3887d6d8a74754a22 100644 GIT binary patch delta 264 zcmZ1_vr2|lhk=11eDXpLjmhC$){`UHZ71h4hEM*?%&wEKv5HOR;dY|fNaU3UI>dUi0G|{95X@Ay delta 261 zcmZ1_vr2|hXYzekv&jXFN|Up>;wD$HZJW3>9LUt1#3VEM9J}OX2M(pl(M+pgzaR8QcYv*_q=fX4nGla-DpNRbp~Iul3|NOwyBYaBrM!z~eaC zfkgsnjpF1WE=iyf4wJ7lCQW2XnfOO>as-~Bi^Z2+WCof=*hjAr<>h;()CmS#e nO+Lb-0F=_6ctK$DdQO$elNeor)`S6#*PJZCVE}iz0G|{9R@YPT diff --git a/B02基础纱线仓库/testDll.identcache b/B02基础纱线仓库/testDll.identcache index 0992215c2316f7fb318724cc6c7fe9512785d801..bb3d02b4318324dd8ba0f704d42ee0263bb03304 100644 GIT binary patch delta 47 pcmdnOxQUUKiGhK^dt!_nXK|HxVrE2UWa30!@rkn~89mVi^#D7W4lMux delta 46 ocmdnQxP_6GiGhK^YhtV%S9-2TX<|lcN@nWB7ClBEG$9=W05!f2WdHyG diff --git a/E01梭织生产计划/TatPlan.dproj.local b/E01梭织生产计划/TatPlan.dproj.local index 9a275fe..1071158 100644 --- a/E01梭织生产计划/TatPlan.dproj.local +++ b/E01梭织生产计划/TatPlan.dproj.local @@ -1,76 +1,76 @@  - 1899-12-30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas - 1899-12-30 00:00:00.000.414,D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.pas=D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.pas - 1899-12-30 00:00:00.000.959,D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.pas= - 1899-12-30 00:00:00.000.220,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas - 1899-12-30 00:00:00.000.383,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard1.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard.dfm - 1899-12-30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_JHDTJ.dfm - 1899-12-30 00:00:00.000.577,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_FactoryInput2.pas - 1899-12-30 00:00:00.000.747,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanList.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYList.pas - 1899-12-30 00:00:00.000.555,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas - 1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas - 1899-12-30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899-12-30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899-12-30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899-12-30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas 1899-12-30 00:00:00.000.806,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\Unit1.pas= - 1899-12-30 00:00:00.000.759,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCard1.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.dfm - 1899-12-30 00:00:00.000.469,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanMachInput.pas - 1899-12-30 00:00:00.000.628,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas - 1899-12-30 00:00:00.000.957,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanInPut.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYInPut.dfm - 1899-12-30 00:00:00.000.308,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnInfoInPut.pas - 1899-12-30 00:00:00.000.460,=D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.pas - 1899-12-30 00:00:00.000.812,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatWBCardInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.pas - 1899-12-30 00:00:00.000.258,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas - 1899-12-30 00:00:00.000.747,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanList.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYList.dfm - 1899-12-30 00:00:00.000.709,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.pas - 1899-12-30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas - 1899-12-30 00:00:00.000.452,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\TatPlan.dproj=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\InformationBase.dproj - 1899-12-30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas + 1899-12-30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas + 1899-12-30 00:00:00.000.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas + 1899-12-30 00:00:00.000.555,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_YarnInfoSel.pas 1899-12-30 00:00:00.000.873,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas - 1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm + 1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm + 1899-12-30 00:00:00.000.577,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用窗体\U_FactoryInput2.pas + 1899-12-30 00:00:00.000.759,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCard1.dfm + 1899-12-30 00:00:00.000.383,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard1.dfm + 1899-12-30 00:00:00.000.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas + 1899-12-30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas + 1899-12-30 00:00:00.000.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas + 1899-12-30 00:00:00.000.452,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\TatPlan.dproj + 1899-12-30 00:00:00.000.220,=D:\Dp10RepoV1\public10\design\U_cxGridCustomSet.pas + 1899-12-30 00:00:00.000.959,D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.pas= + 1899-12-30 00:00:00.000.469,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanMachInput.pas + 1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas + 1899-12-30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas + 1899-12-30 00:00:00.000.460,=D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.pas + 1899-12-30 00:00:00.000.414,D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.pas=D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.pas + 1899-12-30 00:00:00.000.308,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\B02基础纱线仓库\U_YarnInfoInPut.pas + 1899-12-30 00:00:00.000.957,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYInPut.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanInPut.pas + 1899-12-30 00:00:00.000.258,=D:\Dp10RepoV1\public10\design\U_FormLayOutDesign.pas + 1899-12-30 00:00:00.000.709,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.pas + 1899-12-30 00:00:00.000.812,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.pas=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatWBCardInPut.pas + 1899-12-30 00:00:00.000.628,=D:\Dp10RepoV1\public10\design\U_BaseDataLink.pas + 1899-12-30 00:00:00.000.228,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas 1899-12-30 00:00:00.000.552,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatPlanCard.pas - 1899-12-30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas= 1899-12-30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas 1899-12-30 00:00:00.000.248,=D:\Dp10RepoV1\项目代码\花蝴蝶\T00贸易通用窗体\U_TradeSalesContractSel.pas - 1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas - 1899-12-30 00:00:00.000.926,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanList.pas - 1899-12-30 00:00:00.000.759,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCard1.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.pas - 1899-12-30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas= - 1899-12-30 00:00:00.000.957,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanInPut.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYInPut.pas - 1899-12-30 00:00:00.000.203,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_WBSpecSel.pas + 1899-12-30 00:00:00.000.383,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard1.pas + 1899-12-30 00:00:00.000.600,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatGYSel.pas + 1899-12-30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas + 1899-12-30 00:00:00.000.600,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatGYSel.dfm + 1899-12-30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas= 1899-12-30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas= + 1899-12-30 00:00:00.000.747,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYList.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanList.pas + 1899-12-30 00:00:00.000.812,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.dfm=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatWBCardInPut.dfm + 1899-12-30 00:00:00.000.926,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanList.pas + 1899-12-30 00:00:00.000.719,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.pas + 1899-12-30 00:00:00.000.203,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_WBSpecSel.pas + 1899-12-30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_JHDTJ.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.pas 1899-12-30 00:00:00.000.354,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas - 1899-12-30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas + 1899-12-30 00:00:00.000.414,D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.dfm=D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.dfm 1899-12-30 00:00:00.000.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas 1899-12-30 00:00:00.000.556,=D:\Dp10RepoV1\public10\ThreeFun\Fun\uSZHN_JSON.pas - 1899-12-30 00:00:00.000.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm - 1899-12-30 00:00:00.000.414,D:\Dp10Repo\项目代码\路尚\E02梭织经轴仓库\U_WBTatPlanSel.dfm=D:\Dp10Repo\项目代码\路尚\E00梭织通用窗体\U_TatPlanSel.dfm - 1899-12-30 00:00:00.000.416,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut1.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut.pas + 1899-12-30 00:00:00.000.306,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas + 1899-12-30 00:00:00.000.957,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYInPut.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanInPut.dfm + 1899-12-30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas + 1899-12-30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas= 1899-12-30 00:00:00.000.547,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanMachList.pas 1899-12-30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas - 1899-12-30 00:00:00.000.306,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas + 1899-12-30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas + 1899-12-30 00:00:00.000.747,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatGYList.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E01梭织生产计划\U_TatPlanList.dfm 1899-12-30 00:00:00.000.297,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A00通用组件\FrameDateSel.pas 1899-12-30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas - 1899-12-30 00:00:00.000.876,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanInPut.pas - 1899-12-30 00:00:00.000.561,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatCardInPut.pas - 1899-12-30 00:00:00.000.125,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_TatClothInfoSel.pas - 1899-12-30 00:00:00.000.812,D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatWBCardInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_PlanWBList.dfm + 1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas 1899-12-30 00:00:00.000.467,=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.pas 1899-12-30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas - 1899-12-30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_JHDTJ.pas - 1899-12-30 00:00:00.000.383,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard1.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanCard.pas + 1899-12-30 00:00:00.000.759,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.pas=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCard1.pas + 1899-12-30 00:00:00.000.125,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_TatClothInfoSel.pas + 1899-12-30 00:00:00.000.876,=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatPlanInPut.pas + 1899-12-30 00:00:00.000.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm + 1899-12-30 00:00:00.000.416,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut.pas=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut1.pas + 1899-12-30 00:00:00.000.416,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut1.dfm 1899-12-30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas - 1899-12-30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas - 1899-12-30 00:00:00.000.719,=D:\Dp10RepoV1\项目代码\D10gmHuahudie\A02基础产品管理\U_WBSpecInPut.pas - 1899-12-30 00:00:00.000.416,D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut1.dfm=D:\Dp10RepoV1\项目代码\花蝴蝶\E01梭织生产计划\U_TatCardInPut.dfm + 1899-12-30 00:00:00.000.561,=D:\Dp10Repo\项目代码\RTBasics\E01梭织生产计划\U_TatCardInPut.pas 1899-12-30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas + 1899-12-30 00:00:00.000.736,D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_JHDTJ.dfm=D:\Dp10RepoV1\项目代码\D10gmHuahudie\E01梭织生产计划\U_TatPlanCardWJY.dfm 1899-12-30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas - 2025-03-12 14:13:28.600,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatGYSel.dfm=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.dfm - 2025-03-12 14:13:28.600,D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatGYSel.pas=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas - 2025-03-12 14:13:59.228,=D:\Dp10RepoV1\项目代码\D10szKaiXiYa\E00梭织通用窗体\U_TatPlanSel.pas diff --git a/E01梭织生产计划/TatPlan.identcache b/E01梭织生产计划/TatPlan.identcache index d05f044ff26d9e680d89e34d42dd10b8457516be..d93a64d56eb7354d134f3c8e2260b226023608b2 100644 GIT binary patch delta 213 zcmbO#{z{xtZE_=<&gA#((oF7=69WP#{&k%AS8=inhr;B0Y@w5TxwI$hO9G`PH!zD% zKF8<^5fPhQ%q2Csj5Bd^F1zF8l}r;RD{yK84H27slU024RAxoS$(GD9lbBT}8?uT3 z)o4%N!38#@kWCn9uJPmwR;7t736slMbSKNQ9h^LcQE_qzyCl#Q>&YKkq=9^^$tfIh sK%J358f3EcWH!zMpyisAxQw8dNldP16y4m*#lZ+RQkt7{vOkj~0O!9%>Hq)$ delta 212 zcmaDQK2@Amm4SgFcyb|&#^eMpiOK7jxF;`V6PXxiJ6ViX6Dq{c;*(iiGVzSz#61d= z=QG<+F5?oPY|ddd`7ERBWLZYz$qnorlP_>fO+L@zIGLY$0#Iwr=C90(jFauTttZQH zNKZ~ ScrollbarAnnotations.CustomAnnotations = <> diff --git a/E02梭织经轴仓库/U_TatWBCardInPut.dfm b/E02梭织经轴仓库/U_TatWBCardInPut.dfm index 9dfa1c5..0c0775f 100644 --- a/E02梭织经轴仓库/U_TatWBCardInPut.dfm +++ b/E02梭织经轴仓库/U_TatWBCardInPut.dfm @@ -837,8 +837,8 @@ inherited frmTatWBCardInPut: TfrmTatWBCardInPut Left = 379 Top = 12 Properties.Items.Strings = ( - #22823#36135 - #35797#26679) + #27974#36724 + #32463#36724) TabOrder = 1 Width = 150 end @@ -1180,6 +1180,9 @@ inherited frmTatWBCardInPut: TfrmTatWBCardInPut end inherited cxImageList_bar: TcxImageList FormatVersion = 1 + Left = 628 + Top = 330 + DesignInfo = 21627508 end object ADOQueryCmd: TADOQuery Connection = DataLink_WarpBeamStk.ADOLink