diff --git a/F01染色坯布仓库/DyeGreyClothStk.dproj b/F01染色坯布仓库/DyeGreyClothStk.dproj index ccc04f3..ba0dd18 100644 --- a/F01染色坯布仓库/DyeGreyClothStk.dproj +++ b/F01染色坯布仓库/DyeGreyClothStk.dproj @@ -4,7 +4,7 @@ DyeGreyClothStk.dpr True Debug - 38017 + 1 Library VCL 19.2 @@ -13,16 +13,6 @@ true - - true - Base - true - - - true - Base - true - true Base @@ -43,24 +33,6 @@ Base true - - true - Cfg_2 - true - true - - - true - Cfg_2 - true - true - - - true - Cfg_2 - true - true - true Cfg_2 @@ -84,13 +56,6 @@ 2052 CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments= - - $(BDS)\bin\Artwork\Android\FM_LauncherIcon_192x192.png - android-support-v4.dex.jar;cloud-messaging.dex.jar;com-google-android-gms.play-services-ads-base.17.2.0.dex.jar;com-google-android-gms.play-services-ads-identifier.16.0.0.dex.jar;com-google-android-gms.play-services-ads-lite.17.2.0.dex.jar;com-google-android-gms.play-services-ads.17.2.0.dex.jar;com-google-android-gms.play-services-analytics-impl.16.0.8.dex.jar;com-google-android-gms.play-services-analytics.16.0.8.dex.jar;com-google-android-gms.play-services-base.16.0.1.dex.jar;com-google-android-gms.play-services-basement.16.2.0.dex.jar;com-google-android-gms.play-services-gass.17.2.0.dex.jar;com-google-android-gms.play-services-identity.16.0.0.dex.jar;com-google-android-gms.play-services-maps.16.1.0.dex.jar;com-google-android-gms.play-services-measurement-base.16.4.0.dex.jar;com-google-android-gms.play-services-measurement-sdk-api.16.4.0.dex.jar;com-google-android-gms.play-services-stats.16.0.1.dex.jar;com-google-android-gms.play-services-tagmanager-v4-impl.16.0.8.dex.jar;com-google-android-gms.play-services-tasks.16.0.1.dex.jar;com-google-android-gms.play-services-wallet.16.0.1.dex.jar;com-google-firebase.firebase-analytics.16.4.0.dex.jar;com-google-firebase.firebase-common.16.1.0.dex.jar;com-google-firebase.firebase-iid-interop.16.0.1.dex.jar;com-google-firebase.firebase-iid.17.1.1.dex.jar;com-google-firebase.firebase-measurement-connector.17.0.1.dex.jar;com-google-firebase.firebase-messaging.17.5.0.dex.jar;fmx.dex.jar;google-play-billing.dex.jar;google-play-licensing.dex.jar - - - $(BDS)\bin\Artwork\iOS\iPhone\FM_ApplicationIcon_1024x1024.png - System.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) Debug @@ -113,18 +78,9 @@ false true - - Debug - - - Debug - - - Debug - CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) - D:\Dp10Repo\项目代码\D10sxYilai\F01染色坯布仓库\testDll.exe + D:\Dp10Repo\项目代码\D10sxYilanbuyi\F01染色坯布仓库\testDll.exe @@ -213,10 +169,6 @@ - True - True - True - True True False diff --git a/F01染色坯布仓库/DyeGreyClothStk.dproj.local b/F01染色坯布仓库/DyeGreyClothStk.dproj.local index ea100c4..93483d8 100644 --- a/F01染色坯布仓库/DyeGreyClothStk.dproj.local +++ b/F01染色坯布仓库/DyeGreyClothStk.dproj.local @@ -1,46 +1,46 @@  - 1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.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.844,=D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothOutEdit.pas - 1899/12/30 00:00:00.000.394,D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothOutEdit.pas=D:\Dp10Repo\项目代码\RTBasics\B03基础物料仓库\U_BSPrtMachOutEdit.pas 1899/12/30 00:00:00.000.048,=D:\Dp10Repo\public10\design\U_BaseList.pas + 1899/12/30 00:00:00.000.440,=D:\Dp10Repo\项目代码\RTBasics\F00染色通用窗体\U_DyePlanCardSel.pas + 1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas= 1899/12/30 00:00:00.000.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas 1899/12/30 00:00:00.000.865,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas 1899/12/30 00:00:00.000.844,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_AttachmentUpload.pas 1899/12/30 00:00:00.000.796,=D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothInEdit.pas - 1899/12/30 00:00:00.000.398,D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothInEdit.pas=D:\Dp10Repo\项目代码\RTBasics\B03基础物料仓库\U_BSPrtMachInEdit.pas - 1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas + 1899/12/30 00:00:00.000.832,=D:\Dp10Repo\public10\design\U_BaseHelp.pas 1899/12/30 00:00:00.000.149,=D:\Dp10Repo\public10\ThreeFun\Form\U_ZDYHelp.pas - 1899/12/30 00:00:00.000.951,D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\DyeGreyClothStk.dproj + 1899/12/30 00:00:00.000.398,D:\Dp10Repo\项目代码\RTBasics\B03基础物料仓库\U_BSPrtMachInEdit.pas=D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothInEdit.pas 1899/12/30 00:00:00.000.817,=D:\Dp10Repo\public10\design\U_BaseDataLink.pas 1899/12/30 00:00:00.000.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas - 1899/12/30 00:00:00.000.440,=D:\Dp10Repo\项目代码\RTBasics\F00染色通用窗体\U_DyePlanCardSel.pas - 1899/12/30 00:00:00.000.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.pas= - 1899/12/30 00:00:00.000.070,D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothStkSel.dfm=D:\Dp10Repo\项目代码\RTBasics\B03基础物料仓库\U_BSPrtMacStkSel.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.939,=D:\Dp10Repo\public10\design\U_BaseInput.pas - 1899/12/30 00:00:00.000.398,D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothInEdit.dfm=D:\Dp10Repo\项目代码\RTBasics\B03基础物料仓库\U_BSPrtMachInEdit.dfm + 1899/12/30 00:00:00.000.394,D:\Dp10Repo\项目代码\RTBasics\B03基础物料仓库\U_BSPrtMachOutEdit.pas=D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothOutEdit.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.070,D:\Dp10Repo\项目代码\RTBasics\B03基础物料仓库\U_BSPrtMacStkSel.dfm=D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothStkSel.dfm + 1899/12/30 00:00:00.000.493,=D:\Dp10Repo\项目代码\RTBasics\A00通用模板\Unit1.pas 1899/12/30 00:00:00.000.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.pas + 1899/12/30 00:00:00.000.951,D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\DyeGreyClothStk.dproj=D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\InformationBase.dproj 1899/12/30 00:00:00.000.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.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.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas 1899/12/30 00:00:00.000.791,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.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.015,=D:\Dp10Repo\public10\ThreeFun\Fun\U_RTFun.pas + 1899/12/30 00:00:00.000.070,D:\Dp10Repo\项目代码\RTBasics\B03基础物料仓库\U_BSPrtMacStkSel.pas=D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothStkSel.pas 1899/12/30 00:00:00.000.086,=D:\Dp10Repo\public10\design\U_cxGridCustomCss.pas 1899/12/30 00:00:00.000.123,=D:\Dp10Repo\public10\design\U_globalVar.pas - 1899/12/30 00:00:00.000.070,D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothStkSel.pas=D:\Dp10Repo\项目代码\RTBasics\B03基础物料仓库\U_BSPrtMacStkSel.pas + 1899/12/30 00:00:00.000.278,=D:\Dp10Repo\public10\ThreeFun\Fun\uSZHN_JSON.pas 1899/12/30 00:00:00.000.492,=D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothStkSel.pas 1899/12/30 00:00:00.000.716,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ProcessSel.pas - 1899/12/30 00:00:00.000.487,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelpSel.pas= - 1899/12/30 00:00:00.000.069,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas + 1899/12/30 00:00:00.000.398,D:\Dp10Repo\项目代码\RTBasics\B03基础物料仓库\U_BSPrtMachInEdit.dfm=D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothInEdit.dfm + 1899/12/30 00:00:00.000.394,D:\Dp10Repo\项目代码\RTBasics\B03基础物料仓库\U_BSPrtMachOutEdit.dfm=D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothOutEdit.dfm 1899/12/30 00:00:00.000.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.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.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas + 1899/12/30 00:00:00.000.069,=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.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.pas - 1899/12/30 00:00:00.000.278,=D:\Dp10Repo\public10\ThreeFun\Fun\uSZHN_JSON.pas - 1899/12/30 00:00:00.000.394,D:\Dp10Repo\项目代码\RTBasics\F01染色坯布仓库\U_DyeGreyClothOutEdit.dfm=D:\Dp10Repo\项目代码\RTBasics\B03基础物料仓库\U_BSPrtMachOutEdit.dfm diff --git a/F01染色坯布仓库/DyeGreyClothStk.identcache b/F01染色坯布仓库/DyeGreyClothStk.identcache index c1c3155..d61a0a1 100644 Binary files a/F01染色坯布仓库/DyeGreyClothStk.identcache and b/F01染色坯布仓库/DyeGreyClothStk.identcache differ diff --git a/F01染色坯布仓库/DyeGreyClothStk.res b/F01染色坯布仓库/DyeGreyClothStk.res index ad6eb9d..9042e0a 100644 Binary files a/F01染色坯布仓库/DyeGreyClothStk.res and b/F01染色坯布仓库/DyeGreyClothStk.res differ diff --git a/F01染色坯布仓库/DyeGreyClothStk.skincfg b/F01染色坯布仓库/DyeGreyClothStk.skincfg new file mode 100644 index 0000000..c0891d9 --- /dev/null +++ b/F01染色坯布仓库/DyeGreyClothStk.skincfg @@ -0,0 +1,5 @@ +[ExpressSkins] +Default=1 +ShowNotifications=1 +Enabled=1 +dxSkinsDefaultPainters=1 diff --git a/F01染色坯布仓库/U_DyeGreyClothInEdit.pas b/F01染色坯布仓库/U_DyeGreyClothInEdit.pas index 0d0f74c..3a8db39 100644 --- a/F01染色坯布仓库/U_DyeGreyClothInEdit.pas +++ b/F01染色坯布仓库/U_DyeGreyClothInEdit.pas @@ -130,7 +130,7 @@ begin FieldByName('IOTime').Value := Trim(FormatDateTime('yyyy-MM-dd', Now)); FieldByName('StkCoNo').Value := 'ֿ'; FieldByName('StkCoName').Value := 'ֿ'; - FieldByName('QtyUnit').Value := 'KG'; + FieldByName('QtyUnit').Value := 'M'; Post; end; end; diff --git a/F01染色坯布仓库/U_GetDllForm.pas b/F01染色坯布仓库/U_GetDllForm.pas index 7e42b24..88b2542 100644 --- a/F01染色坯布仓库/U_GetDllForm.pas +++ b/F01染色坯布仓库/U_GetDllForm.pas @@ -70,10 +70,10 @@ begin if trim(DataBaseStr) = '' then begin - server := '101.132.143.144,7781'; - dtbase := 'yilaibuyidata'; - user := 'rtsa'; - pswd := 'rightsoft@5740'; + server := '112.14.44.145'; + dtbase := 'yilanbuyidata'; + user := 'yilansa'; + pswd := 'yilanbuyi@123'; DConString := 'Provider=SQLOLEDB.1;Password=' + pswd + ';Persist Security Info=True;User ID=' + user + ';Initial Catalog=' + dtbase + ';Data Source=' + server; Parameters1 := ''; DName := 'ADMIN'; diff --git a/F01染色坯布仓库/testDll.res b/F01染色坯布仓库/testDll.res index 2465ca0..e116c48 100644 Binary files a/F01染色坯布仓库/testDll.res and b/F01染色坯布仓库/testDll.res differ diff --git a/F02染色计划单/U_DyePlanCardInput.pas b/F02染色计划单/U_DyePlanCardInput.pas index 2e40d78..c2e76f0 100644 --- a/F02染色计划单/U_DyePlanCardInput.pas +++ b/F02染色计划单/U_DyePlanCardInput.pas @@ -517,16 +517,8 @@ var i, k, fhxInt: integer; maxId, maxno: string; begin - if trim(C_Color.Text) = '' then - begin - application.MessageBox('ɫΪգ', 'ʾϢ', MB_ICONERROR); - exit; - end; -// if trim(C_Width.Text) = '' then -// begin -// application.MessageBox('ŷΪգ', 'ʾϢ', MB_ICONERROR); -// exit; -// end; + + // if trim(C_GramWeight.Text) = '' then // begin // application.MessageBox('زΪգ', 'ʾϢ', MB_ICONERROR); diff --git a/F02染色计划单/U_DyePlanInPut.dfm b/F02染色计划单/U_DyePlanInPut.dfm index 81626b3..708f245 100644 --- a/F02染色计划单/U_DyePlanInPut.dfm +++ b/F02染色计划单/U_DyePlanInPut.dfm @@ -648,6 +648,7 @@ object frmDyePlanInPut: TfrmDyePlanInPut Font.Style = [] ParentFont = False TabOrder = 4 + ExplicitTop = 397 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> @@ -777,9 +778,9 @@ object frmDyePlanInPut: TfrmDyePlanInPut PropertiesClassName = 'TcxComboBoxProperties' Properties.DropDownListStyle = lsEditFixedList Properties.Items.Strings = ( - #21305 - #20214 - #21367) + '' + 'M' + 'Kg') HeaderAlignmentHorz = taCenter Width = 92 end diff --git a/F02染色计划单/U_DyePlanInPut.pas b/F02染色计划单/U_DyePlanInPut.pas index fb23853..649fdf7 100644 --- a/F02染色计划单/U_DyePlanInPut.pas +++ b/F02染色计划单/U_DyePlanInPut.pas @@ -421,7 +421,7 @@ begin FieldByName('AntcpPiece').Value := 0; FieldByName('AntcpQty').Value := 0; FieldByName('OrdUnit').Value := 'M'; - FieldByName('AntcpUnit').Value := 'ƥ'; + FieldByName('AntcpUnit').Value := 'M'; Post; end; diff --git a/F02染色计划单/U_DyeProcessDefin.dfm b/F02染色计划单/U_DyeProcessDefin.dfm index d0e75fb..bc78f4b 100644 --- a/F02染色计划单/U_DyeProcessDefin.dfm +++ b/F02染色计划单/U_DyeProcessDefin.dfm @@ -2962,22 +2962,24 @@ object frmDyeProcessDefin: TfrmDyeProcessDefin Height = 37 Align = alClient TabOrder = 2 + ExplicitTop = 44 object Label5: TLabel - Left = 193 + Left = 465 Top = 9 Width = 24 Height = 12 Caption = #24037#26102 + Visible = False end object Label2: TLabel - Left = 327 + Left = 192 Top = 9 Width = 36 Height = 12 Caption = #26426#21488#21517 end object Label1: TLabel - Left = 469 + Left = 334 Top = 9 Width = 24 Height = 12 @@ -3001,15 +3003,16 @@ object frmDyeProcessDefin: TfrmDyeProcessDefin end object WorkHour: TEdit Tag = 2 - Left = 221 - Top = 8 + Left = 493 + Top = 9 Width = 90 Height = 20 TabOrder = 2 + Visible = False end object MachineName: TEdit Tag = 2 - Left = 367 + Left = 232 Top = 8 Width = 90 Height = 20 @@ -3017,7 +3020,7 @@ object frmDyeProcessDefin: TfrmDyeProcessDefin end object note: TEdit Tag = 2 - Left = 498 + Left = 363 Top = 8 Width = 90 Height = 20 diff --git a/F02染色计划单/U_DyeProcessList.dfm b/F02染色计划单/U_DyeProcessList.dfm index f0ccf88..654af47 100644 --- a/F02染色计划单/U_DyeProcessList.dfm +++ b/F02染色计划单/U_DyeProcessList.dfm @@ -24,6 +24,7 @@ inherited frmDyeProcessList: TfrmDyeProcessList ParentColor = False ShowCaptions = True TabOrder = 0 + ExplicitTop = 2 object TBRafresh: TToolButton Left = 0 Top = 0 @@ -149,11 +150,12 @@ inherited frmDyeProcessList: TfrmDyeProcessList Color = clSkyBlue TabOrder = 1 object Label5: TLabel - Left = 191 + Left = 326 Top = 12 Width = 24 Height = 12 Caption = #24037#26102 + Visible = False end object Label1: TLabel Left = 31 @@ -163,7 +165,7 @@ inherited frmDyeProcessList: TfrmDyeProcessList Caption = #24037#24207#21517#31216 end object Label2: TLabel - Left = 325 + Left = 183 Top = 12 Width = 36 Height = 12 @@ -171,11 +173,12 @@ inherited frmDyeProcessList: TfrmDyeProcessList end object WorkHour: TEdit Tag = 2 - Left = 219 + Left = 354 Top = 8 Width = 89 Height = 20 TabOrder = 0 + Visible = False OnChange = ZdyNameChange end object PSName: TEdit @@ -189,7 +192,7 @@ inherited frmDyeProcessList: TfrmDyeProcessList end object MachineName: TEdit Tag = 2 - Left = 365 + Left = 223 Top = 8 Width = 89 Height = 20 @@ -204,6 +207,7 @@ inherited frmDyeProcessList: TfrmDyeProcessList Height = 455 Align = alClient TabOrder = 2 + ExplicitTop = 110 object TV2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False @@ -277,6 +281,7 @@ inherited frmDyeProcessList: TfrmDyeProcessList Caption = #24037#26102 DataBinding.FieldName = 'WorkHour' DataBinding.IsNullValueType = True + Visible = False HeaderAlignmentHorz = taCenter Width = 70 end