11/12 17.30
This commit is contained in:
parent
95199bb77f
commit
dc16f304de
|
|
@ -2,6 +2,6 @@
|
||||||
<BorlandProject>
|
<BorlandProject>
|
||||||
<Transactions/>
|
<Transactions/>
|
||||||
<Default.Personality>
|
<Default.Personality>
|
||||||
<Projects ActiveProject="D:\Dp10Repo\项目代码\D10szXIANGYIN\E04梭织坯布仓库\TatClothStk.dproj"/>
|
<Projects ActiveProject="D:\Dp10Repo\项目代码\D10szXIANGYING\E04梭织坯布仓库\TatClothStk.dproj"/>
|
||||||
</Default.Personality>
|
</Default.Personality>
|
||||||
</BorlandProject>
|
</BorlandProject>
|
||||||
|
|
|
||||||
|
|
@ -4,7 +4,7 @@
|
||||||
<MainSource>TatClothStk.dpr</MainSource>
|
<MainSource>TatClothStk.dpr</MainSource>
|
||||||
<Base>True</Base>
|
<Base>True</Base>
|
||||||
<Config Condition="'$(Config)'==''">Debug</Config>
|
<Config Condition="'$(Config)'==''">Debug</Config>
|
||||||
<TargetedPlatforms>38017</TargetedPlatforms>
|
<TargetedPlatforms>1</TargetedPlatforms>
|
||||||
<AppType>Library</AppType>
|
<AppType>Library</AppType>
|
||||||
<FrameworkType>VCL</FrameworkType>
|
<FrameworkType>VCL</FrameworkType>
|
||||||
<ProjectVersion>19.2</ProjectVersion>
|
<ProjectVersion>19.2</ProjectVersion>
|
||||||
|
|
@ -13,16 +13,6 @@
|
||||||
<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
|
<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
|
||||||
<Base>true</Base>
|
<Base>true</Base>
|
||||||
</PropertyGroup>
|
</PropertyGroup>
|
||||||
<PropertyGroup Condition="('$(Platform)'=='Android64' and '$(Base)'=='true') or '$(Base_Android64)'!=''">
|
|
||||||
<Base_Android64>true</Base_Android64>
|
|
||||||
<CfgParent>Base</CfgParent>
|
|
||||||
<Base>true</Base>
|
|
||||||
</PropertyGroup>
|
|
||||||
<PropertyGroup Condition="('$(Platform)'=='iOSDevice64' and '$(Base)'=='true') or '$(Base_iOSDevice64)'!=''">
|
|
||||||
<Base_iOSDevice64>true</Base_iOSDevice64>
|
|
||||||
<CfgParent>Base</CfgParent>
|
|
||||||
<Base>true</Base>
|
|
||||||
</PropertyGroup>
|
|
||||||
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''">
|
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''">
|
||||||
<Base_Win32>true</Base_Win32>
|
<Base_Win32>true</Base_Win32>
|
||||||
<CfgParent>Base</CfgParent>
|
<CfgParent>Base</CfgParent>
|
||||||
|
|
@ -43,24 +33,6 @@
|
||||||
<CfgParent>Base</CfgParent>
|
<CfgParent>Base</CfgParent>
|
||||||
<Base>true</Base>
|
<Base>true</Base>
|
||||||
</PropertyGroup>
|
</PropertyGroup>
|
||||||
<PropertyGroup Condition="('$(Platform)'=='Android64' and '$(Cfg_2)'=='true') or '$(Cfg_2_Android64)'!=''">
|
|
||||||
<Cfg_2_Android64>true</Cfg_2_Android64>
|
|
||||||
<CfgParent>Cfg_2</CfgParent>
|
|
||||||
<Cfg_2>true</Cfg_2>
|
|
||||||
<Base>true</Base>
|
|
||||||
</PropertyGroup>
|
|
||||||
<PropertyGroup Condition="('$(Platform)'=='iOSDevice64' and '$(Cfg_2)'=='true') or '$(Cfg_2_iOSDevice64)'!=''">
|
|
||||||
<Cfg_2_iOSDevice64>true</Cfg_2_iOSDevice64>
|
|
||||||
<CfgParent>Cfg_2</CfgParent>
|
|
||||||
<Cfg_2>true</Cfg_2>
|
|
||||||
<Base>true</Base>
|
|
||||||
</PropertyGroup>
|
|
||||||
<PropertyGroup Condition="('$(Platform)'=='OSX64' and '$(Cfg_2)'=='true') or '$(Cfg_2_OSX64)'!=''">
|
|
||||||
<Cfg_2_OSX64>true</Cfg_2_OSX64>
|
|
||||||
<CfgParent>Cfg_2</CfgParent>
|
|
||||||
<Cfg_2>true</Cfg_2>
|
|
||||||
<Base>true</Base>
|
|
||||||
</PropertyGroup>
|
|
||||||
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win32)'!=''">
|
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win32)'!=''">
|
||||||
<Cfg_2_Win32>true</Cfg_2_Win32>
|
<Cfg_2_Win32>true</Cfg_2_Win32>
|
||||||
<CfgParent>Cfg_2</CfgParent>
|
<CfgParent>Cfg_2</CfgParent>
|
||||||
|
|
@ -84,13 +56,6 @@
|
||||||
<VerInfo_Locale>2052</VerInfo_Locale>
|
<VerInfo_Locale>2052</VerInfo_Locale>
|
||||||
<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
|
<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
|
||||||
</PropertyGroup>
|
</PropertyGroup>
|
||||||
<PropertyGroup Condition="'$(Base_Android64)'!=''">
|
|
||||||
<Android_LauncherIcon192>$(BDS)\bin\Artwork\Android\FM_LauncherIcon_192x192.png</Android_LauncherIcon192>
|
|
||||||
<EnabledSysJars>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</EnabledSysJars>
|
|
||||||
</PropertyGroup>
|
|
||||||
<PropertyGroup Condition="'$(Base_iOSDevice64)'!=''">
|
|
||||||
<iOS_AppStore1024>$(BDS)\bin\Artwork\iOS\iPhone\FM_ApplicationIcon_1024x1024.png</iOS_AppStore1024>
|
|
||||||
</PropertyGroup>
|
|
||||||
<PropertyGroup Condition="'$(Base_Win32)'!=''">
|
<PropertyGroup Condition="'$(Base_Win32)'!=''">
|
||||||
<DCC_Namespace>System.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
|
<DCC_Namespace>System.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
|
||||||
<BT_BuildType>Debug</BT_BuildType>
|
<BT_BuildType>Debug</BT_BuildType>
|
||||||
|
|
@ -113,18 +78,9 @@
|
||||||
<DCC_Optimize>false</DCC_Optimize>
|
<DCC_Optimize>false</DCC_Optimize>
|
||||||
<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
|
<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
|
||||||
</PropertyGroup>
|
</PropertyGroup>
|
||||||
<PropertyGroup Condition="'$(Cfg_2_Android64)'!=''">
|
|
||||||
<BT_BuildType>Debug</BT_BuildType>
|
|
||||||
</PropertyGroup>
|
|
||||||
<PropertyGroup Condition="'$(Cfg_2_iOSDevice64)'!=''">
|
|
||||||
<BT_BuildType>Debug</BT_BuildType>
|
|
||||||
</PropertyGroup>
|
|
||||||
<PropertyGroup Condition="'$(Cfg_2_OSX64)'!=''">
|
|
||||||
<BT_BuildType>Debug</BT_BuildType>
|
|
||||||
</PropertyGroup>
|
|
||||||
<PropertyGroup Condition="'$(Cfg_2_Win32)'!=''">
|
<PropertyGroup Condition="'$(Cfg_2_Win32)'!=''">
|
||||||
<VerInfo_Keys>CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName)</VerInfo_Keys>
|
<VerInfo_Keys>CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=$(MSBuildProjectName);ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName)</VerInfo_Keys>
|
||||||
<Debugger_HostApplication>D:\Dp10Repo\项目代码\D10szXIANGYIN\E04梭织坯布仓库\testDll.exe</Debugger_HostApplication>
|
<Debugger_HostApplication>D:\Dp10Repo\项目代码\D10szXIANGYING\E04梭织坯布仓库\testDll.exe</Debugger_HostApplication>
|
||||||
</PropertyGroup>
|
</PropertyGroup>
|
||||||
<ItemGroup>
|
<ItemGroup>
|
||||||
<DelphiCompile Include="$(MainSource)">
|
<DelphiCompile Include="$(MainSource)">
|
||||||
|
|
@ -237,10 +193,6 @@
|
||||||
</Source>
|
</Source>
|
||||||
</Delphi.Personality>
|
</Delphi.Personality>
|
||||||
<Platforms>
|
<Platforms>
|
||||||
<Platform value="Android64">True</Platform>
|
|
||||||
<Platform value="iOSDevice64">True</Platform>
|
|
||||||
<Platform value="Linux64">True</Platform>
|
|
||||||
<Platform value="OSX64">True</Platform>
|
|
||||||
<Platform value="Win32">True</Platform>
|
<Platform value="Win32">True</Platform>
|
||||||
<Platform value="Win64">False</Platform>
|
<Platform value="Win64">False</Platform>
|
||||||
</Platforms>
|
</Platforms>
|
||||||
|
|
|
||||||
|
|
@ -1,102 +1,74 @@
|
||||||
<?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.630,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.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.422,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.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.734,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.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.393,D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkHZListSEL.pas=D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkHZList.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.393,D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkHZListSEL.pas=D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkHZList.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.782,=D:\Dp10Repo\public10\ThreeFun\Fun\uSZHN_JSON.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.782,=D:\Dp10Repo\public10\ThreeFun\Fun\uSZHN_JSON.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.092,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_EmployeeSel.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.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.930,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothInList.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.930,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothInList.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.339,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.663,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRList.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.663,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRList.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.463,D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkHZList.pas=D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkList.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.463,D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkHZList.pas=D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkList.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.506,=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.506,=D:\Dp10Repo\项目代码\RTBasics\E00梭织通用窗体\U_TatPlanSel.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.123,=D:\Dp10Repo\public10\design\U_globalVar.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.659,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.dfm=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.dfm</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.659,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.dfm=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.dfm</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.538,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRtInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.dfm</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.538,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRtInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.dfm</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.390,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.dfm</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.390,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.dfm</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.538,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRtInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.538,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRtInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.999,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothStkList.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.999,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothStkList.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.752,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitPlanSel.pas=</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.752,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitPlanSel.pas=</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseDataLink.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.939,=D:\Dp10Repo\public10\design\U_BaseDataLink.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.471,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.dfm</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.471,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.dfm</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.463,D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkHZList.dfm=D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkList.dfm</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.463,D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkHZList.dfm=D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkList.dfm</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.376,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitDRtInPut.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.376,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitDRtInPut.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.692,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_ClothInfoSel.dfm</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.057,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitDRList.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.057,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitDRList.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.680,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.680,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LbaelMapSet.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.875,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.pas=</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.875,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.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.135,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ZDYHelp.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.832,=D:\Dp10Repo\public10\design\U_BaseHelp.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.094,D:\Dp10Repo\项目代码\RTBasics\E03梭织坯布仓库\KnitClothStk.dproj=D:\Dp10Repo\项目代码\RTBasics\E03梭织坯布仓库\TatClothStk.dproj</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.094,D:\Dp10Repo\项目代码\RTBasics\E03梭织坯布仓库\KnitClothStk.dproj=D:\Dp10Repo\项目代码\RTBasics\E03梭织坯布仓库\TatClothStk.dproj</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.187,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.pas=</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.187,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.pas=</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.390,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.390,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRtInPut.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRtInPut.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.439,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.439,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.471,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.471,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeDRList.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.393,D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkHZListSEL.dfm=D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkHZList.dfm</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.393,D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkHZListSEL.dfm=D:\Dp10Repo\项目代码\恒燕\E04梭织坯布仓库\U_TatClothStkHZList.dfm</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.442,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.442,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelPrint.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.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.pas=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.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.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.189,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothOutEdit.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.189,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothOutEdit.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.616,D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LablePrint.dfm=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_CompanySel.dfm</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.231,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.231,=D:\Dp10Repo\项目代码\RTBasics\A00通用窗体\U_LabelMapSet.pas</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.178,=D:\Dp10Repo\public10\design\U_WindowFormdesign.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.736,D:\Dp10Repo\项目代码\睿特\新DLL初始化(CSH.dll)\U_ModuleNote.pas=</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.038,D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\Unit1.pas=</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.038,D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\Unit1.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.720,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.720,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.378,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.pas=</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.378,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.pas=</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.720,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.720,D:\Dp10Repo\项目代码\RTBasics\H05涂层成品仓库\U_CoatDRList.pas=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.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.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.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.132,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitPlanSel.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.132,=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\U_KnitPlanSel.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.663,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.663,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_KnitDRList.dfm=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatDRList.dfm</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.231,=D:\Dp10Repo\项目代码\恒燕\A00通用窗体\U_TatClothInfoSel.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.231,=D:\Dp10Repo\项目代码\恒燕\A00通用窗体\U_TatClothInfoSel.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.813,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothOutList.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.411,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.pas=</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.669,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothInEdit.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.813,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothOutList.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.411,D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.pas=</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.669,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothInEdit.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.822,D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\KnitClothStk.dproj</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.822,D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\InformationBase.dproj=D:\Dp10Repo\项目代码\RTBasics\D03针织成品仓库\KnitClothStk.dproj</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.975,=D:\Dp10Repo\public10\ThreeFun\Fun\U_CompressionFun.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.267,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.659,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.pas=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.pas</Transaction>
|
||||||
<Transaction>1899-12-30 00:00:00.000.659,D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.pas=D:\Dp10Repo\项目代码\RTBasics\F06染色成品仓库\U_DyeClothDROutEdit.pas</Transaction>
|
<Transaction>1899/12/30 00:00:00.000.267,=D:\Dp10Repo\项目代码\RTBasics\E04梭织坯布仓库\U_TatClothDROutEdit.pas</Transaction>
|
||||||
</Transactions>
|
</Transactions>
|
||||||
<ProjectSortOrder AutoSort="0" SortType="0">
|
<ProjectSortOrder AutoSort="0" SortType="0">
|
||||||
<File Path="android-support-v4.dex.jar"/>
|
<File Path="..\..\D10szXIANGYING"/>
|
||||||
<File Path="cloud-messaging.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-ads-base.17.2.0.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-ads-identifier.16.0.0.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-ads-lite.17.2.0.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-ads.17.2.0.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-analytics-impl.16.0.8.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-analytics.16.0.8.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-base.16.0.1.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-basement.16.2.0.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-gass.17.2.0.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-identity.16.0.0.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-maps.16.1.0.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-measurement-base.16.4.0.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-measurement-sdk-api.16.4.0.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-stats.16.0.1.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-tagmanager-v4-impl.16.0.8.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-tasks.16.0.1.dex.jar"/>
|
|
||||||
<File Path="com-google-android-gms.play-services-wallet.16.0.1.dex.jar"/>
|
|
||||||
<File Path="com-google-firebase.firebase-analytics.16.4.0.dex.jar"/>
|
|
||||||
<File Path="com-google-firebase.firebase-common.16.1.0.dex.jar"/>
|
|
||||||
<File Path="com-google-firebase.firebase-iid-interop.16.0.1.dex.jar"/>
|
|
||||||
<File Path="com-google-firebase.firebase-iid.17.1.1.dex.jar"/>
|
|
||||||
<File Path="com-google-firebase.firebase-measurement-connector.17.0.1.dex.jar"/>
|
|
||||||
<File Path="com-google-firebase.firebase-messaging.17.5.0.dex.jar"/>
|
|
||||||
<File Path="fmx.dex.jar"/>
|
|
||||||
<File Path="google-play-billing.dex.jar"/>
|
|
||||||
<File Path="google-play-licensing.dex.jar"/>
|
|
||||||
<File Path="..\..\D10szXIANGYIN"/>
|
|
||||||
<File Path="..\A00通用窗体"/>
|
<File Path="..\A00通用窗体"/>
|
||||||
<File Path="..\A00通用窗体\U_AttachmentUpload.pas"/>
|
<File Path="..\A00通用窗体\U_AttachmentUpload.pas"/>
|
||||||
<File Path="..\A00通用窗体\U_AttachmentUpload.dfm"/>
|
<File Path="..\A00通用窗体\U_AttachmentUpload.dfm"/>
|
||||||
|
|
|
||||||
Binary file not shown.
Binary file not shown.
|
|
@ -59,16 +59,24 @@ inherited frmTatDRList: TfrmTatDRList
|
||||||
ImageIndex = 9
|
ImageIndex = 9
|
||||||
OnClick = TBAddClick
|
OnClick = TBAddClick
|
||||||
end
|
end
|
||||||
object ToolButton1: TToolButton
|
object TbGoodsEdit: TToolButton
|
||||||
Left = 213
|
Left = 213
|
||||||
Top = 0
|
Top = 0
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
|
Caption = #37197#36135#20462#25913
|
||||||
|
ImageIndex = 3
|
||||||
|
OnClick = TbGoodsEditClick
|
||||||
|
end
|
||||||
|
object ToolButton1: TToolButton
|
||||||
|
Left = 308
|
||||||
|
Top = 0
|
||||||
|
AutoSize = True
|
||||||
Caption = #26597#30475
|
Caption = #26597#30475
|
||||||
ImageIndex = 4
|
ImageIndex = 4
|
||||||
OnClick = ToolButton1Click
|
OnClick = ToolButton1Click
|
||||||
end
|
end
|
||||||
object TBDel: TToolButton
|
object TBDel: TToolButton
|
||||||
Left = 284
|
Left = 379
|
||||||
Top = 0
|
Top = 0
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
Caption = #21024#38500
|
Caption = #21024#38500
|
||||||
|
|
@ -76,7 +84,7 @@ inherited frmTatDRList: TfrmTatDRList
|
||||||
OnClick = TBDelClick
|
OnClick = TBDelClick
|
||||||
end
|
end
|
||||||
object TBEdit: TToolButton
|
object TBEdit: TToolButton
|
||||||
Left = 355
|
Left = 450
|
||||||
Top = 0
|
Top = 0
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
Caption = #20462#25913
|
Caption = #20462#25913
|
||||||
|
|
@ -84,7 +92,7 @@ inherited frmTatDRList: TfrmTatDRList
|
||||||
OnClick = TBEditClick
|
OnClick = TBEditClick
|
||||||
end
|
end
|
||||||
object TBPrint: TToolButton
|
object TBPrint: TToolButton
|
||||||
Left = 426
|
Left = 521
|
||||||
Top = 0
|
Top = 0
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
Caption = #25171#21360
|
Caption = #25171#21360
|
||||||
|
|
@ -92,7 +100,7 @@ inherited frmTatDRList: TfrmTatDRList
|
||||||
OnClick = TBPrintClick
|
OnClick = TBPrintClick
|
||||||
end
|
end
|
||||||
object ToolButton2: TToolButton
|
object ToolButton2: TToolButton
|
||||||
Left = 497
|
Left = 592
|
||||||
Top = 0
|
Top = 0
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
Caption = #30721#21333#25171#21360
|
Caption = #30721#21333#25171#21360
|
||||||
|
|
@ -100,7 +108,7 @@ inherited frmTatDRList: TfrmTatDRList
|
||||||
OnClick = ToolButton2Click
|
OnClick = ToolButton2Click
|
||||||
end
|
end
|
||||||
object ToolButton3: TToolButton
|
object ToolButton3: TToolButton
|
||||||
Left = 592
|
Left = 687
|
||||||
Top = 0
|
Top = 0
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
Caption = #21462#28040
|
Caption = #21462#28040
|
||||||
|
|
@ -108,7 +116,7 @@ inherited frmTatDRList: TfrmTatDRList
|
||||||
OnClick = ToolButton3Click
|
OnClick = ToolButton3Click
|
||||||
end
|
end
|
||||||
object ToolButton5: TToolButton
|
object ToolButton5: TToolButton
|
||||||
Left = 663
|
Left = 758
|
||||||
Top = 0
|
Top = 0
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
Caption = #25764#38144#21462#28040
|
Caption = #25764#38144#21462#28040
|
||||||
|
|
@ -196,6 +204,7 @@ inherited frmTatDRList: TfrmTatDRList
|
||||||
Height = 224
|
Height = 224
|
||||||
Align = alClient
|
Align = alClient
|
||||||
TabOrder = 3
|
TabOrder = 3
|
||||||
|
ExplicitTop = 142
|
||||||
object Tv1: TcxGridDBTableView
|
object Tv1: TcxGridDBTableView
|
||||||
Navigator.Buttons.CustomButtons = <>
|
Navigator.Buttons.CustomButtons = <>
|
||||||
ScrollbarAnnotations.CustomAnnotations = <>
|
ScrollbarAnnotations.CustomAnnotations = <>
|
||||||
|
|
@ -723,6 +732,27 @@ inherited frmTatDRList: TfrmTatDRList
|
||||||
HeaderAlignmentHorz = taCenter
|
HeaderAlignmentHorz = taCenter
|
||||||
Width = 70
|
Width = 70
|
||||||
end
|
end
|
||||||
|
object TV2Volume: TcxGridDBColumn
|
||||||
|
Caption = #37197#36135#30003#35831#21367#25968
|
||||||
|
DataBinding.FieldName = 'Volume'
|
||||||
|
DataBinding.IsNullValueType = True
|
||||||
|
HeaderAlignmentHorz = taCenter
|
||||||
|
Width = 102
|
||||||
|
end
|
||||||
|
object TV2Applicant: TcxGridDBColumn
|
||||||
|
Caption = #30003#35831#20154
|
||||||
|
DataBinding.FieldName = 'Applicant'
|
||||||
|
DataBinding.IsNullValueType = True
|
||||||
|
HeaderAlignmentHorz = taCenter
|
||||||
|
Width = 80
|
||||||
|
end
|
||||||
|
object TV2ApplicationReaon: TcxGridDBColumn
|
||||||
|
Caption = #37197#36135#30003#35831#21407#22240
|
||||||
|
DataBinding.FieldName = 'ApplicationReaon'
|
||||||
|
DataBinding.IsNullValueType = True
|
||||||
|
HeaderAlignmentHorz = taCenter
|
||||||
|
Width = 80
|
||||||
|
end
|
||||||
end
|
end
|
||||||
object cxGridLevel1: TcxGridLevel
|
object cxGridLevel1: TcxGridLevel
|
||||||
GridView = TV2
|
GridView = TV2
|
||||||
|
|
|
||||||
|
|
@ -98,6 +98,10 @@ type
|
||||||
TV2Column6: TcxGridDBColumn;
|
TV2Column6: TcxGridDBColumn;
|
||||||
TV2Column7: TcxGridDBColumn;
|
TV2Column7: TcxGridDBColumn;
|
||||||
Tv1Column6: TcxGridDBColumn;
|
Tv1Column6: TcxGridDBColumn;
|
||||||
|
TbGoodsEdit: TToolButton;
|
||||||
|
TV2Volume: TcxGridDBColumn;
|
||||||
|
TV2Applicant: TcxGridDBColumn;
|
||||||
|
TV2ApplicationReaon: TcxGridDBColumn;
|
||||||
//RMllPDFExport1: TRMllPDFExport;
|
//RMllPDFExport1: TRMllPDFExport;
|
||||||
procedure FormDestroy(Sender: TObject);
|
procedure FormDestroy(Sender: TObject);
|
||||||
procedure FormClose(Sender: TObject; var Action: TCloseAction);
|
procedure FormClose(Sender: TObject; var Action: TCloseAction);
|
||||||
|
|
@ -128,6 +132,7 @@ type
|
||||||
procedure ToolButton4Click(Sender: TObject);
|
procedure ToolButton4Click(Sender: TObject);
|
||||||
procedure ToolButton5Click(Sender: TObject);
|
procedure ToolButton5Click(Sender: TObject);
|
||||||
procedure ToolButton7Click(Sender: TObject);
|
procedure ToolButton7Click(Sender: TObject);
|
||||||
|
procedure TbGoodsEditClick(Sender: TObject);
|
||||||
private
|
private
|
||||||
procedure InitGrid();
|
procedure InitGrid();
|
||||||
procedure InitSubGrid();
|
procedure InitSubGrid();
|
||||||
|
|
@ -160,6 +165,7 @@ begin
|
||||||
btnWCCX.Enabled := False;
|
btnWCCX.Enabled := False;
|
||||||
ToolButton3.Enabled := False;
|
ToolButton3.Enabled := False;
|
||||||
ToolButton5.Enabled := False;
|
ToolButton5.Enabled := False;
|
||||||
|
TbGoodsEdit.Enabled := False;
|
||||||
if CANSHU1 = '²éѯ' then
|
if CANSHU1 = '²éѯ' then
|
||||||
begin
|
begin
|
||||||
ToolButton1.Enabled := True;
|
ToolButton1.Enabled := True;
|
||||||
|
|
@ -168,6 +174,7 @@ begin
|
||||||
ToolButton4.Enabled := True;
|
ToolButton4.Enabled := True;
|
||||||
TBExport.Enabled := True;
|
TBExport.Enabled := True;
|
||||||
ToolButton7.Enabled := True;
|
ToolButton7.Enabled := True;
|
||||||
|
TbGoodsEdit.Enabled := True;
|
||||||
|
|
||||||
TBAdd.Enabled := True;
|
TBAdd.Enabled := True;
|
||||||
TBEdit.Enabled := True;
|
TBEdit.Enabled := True;
|
||||||
|
|
@ -187,6 +194,7 @@ begin
|
||||||
0:
|
0:
|
||||||
begin
|
begin
|
||||||
ToolButton3.Enabled := true;
|
ToolButton3.Enabled := true;
|
||||||
|
// TbGoodsEdit.Enabled := True;
|
||||||
tchk.Enabled := true;
|
tchk.Enabled := true;
|
||||||
end;
|
end;
|
||||||
1:
|
1:
|
||||||
|
|
@ -284,6 +292,8 @@ begin
|
||||||
SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
|
SDofilter(ADOQueryMain, SGetFilters(Panel1, 1, 2));
|
||||||
SCreateCDS(ADOQueryMain, Order_Main);
|
SCreateCDS(ADOQueryMain, Order_Main);
|
||||||
SInitCDSData(ADOQueryMain, Order_Main);
|
SInitCDSData(ADOQueryMain, Order_Main);
|
||||||
|
|
||||||
|
|
||||||
finally
|
finally
|
||||||
ADOQueryMain.EnableControls;
|
ADOQueryMain.EnableControls;
|
||||||
TV1.DataController.Filter.Clear;
|
TV1.DataController.Filter.Clear;
|
||||||
|
|
@ -361,6 +371,7 @@ begin
|
||||||
with frmTatDRtInPut do
|
with frmTatDRtInPut do
|
||||||
begin
|
begin
|
||||||
PState := 1;
|
PState := 1;
|
||||||
|
|
||||||
FDRMID := Trim(Self.Order_Main.fieldbyname('DRMID').AsString);
|
FDRMID := Trim(Self.Order_Main.fieldbyname('DRMID').AsString);
|
||||||
if ShowModal = 1 then
|
if ShowModal = 1 then
|
||||||
begin
|
begin
|
||||||
|
|
@ -410,6 +421,44 @@ begin
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
procedure TfrmTatDRList.TbGoodsEditClick(Sender: TObject);
|
||||||
|
var
|
||||||
|
maxno: string;
|
||||||
|
begin
|
||||||
|
try
|
||||||
|
frmTatDRtInPut := TfrmTatDRtInPut.Create(Application);
|
||||||
|
with frmTatDRtInPut do
|
||||||
|
begin
|
||||||
|
PState := 2; ///Åä»õÐÞ¸Ä
|
||||||
|
FDRMID := Trim(Self.Order_Main.fieldbyname('DRMID').AsString);
|
||||||
|
canshu1 := self.canshu1;
|
||||||
|
|
||||||
|
ScrollBox1.Visible := False;
|
||||||
|
ToolBar2.Visible := false;
|
||||||
|
TbPHSave.visible := True;
|
||||||
|
TBSave.Visible := False;
|
||||||
|
|
||||||
|
// Tv1Applicant.Visible := True;
|
||||||
|
|
||||||
|
Tv1C_Name.Options.Editing := False;
|
||||||
|
Tv1C_code.Options.Editing := False;
|
||||||
|
Tv1C_width.Options.Editing := False;
|
||||||
|
Tv1C_GramWeight.Options.Editing := False;
|
||||||
|
Tv1c_Color.Options.Editing := False;
|
||||||
|
Tv1Piece.Options.Editing := False;
|
||||||
|
Tv1Qty.Options.Editing := False;
|
||||||
|
Tv1PINGFANG.Options.Editing := False;
|
||||||
|
|
||||||
|
if ShowModal = 1 then
|
||||||
|
begin
|
||||||
|
InitGrid();
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
finally
|
||||||
|
frmTatDRtInPut.Free;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
function TfrmTatDRList.DelData(): Boolean;
|
function TfrmTatDRList.DelData(): Boolean;
|
||||||
begin
|
begin
|
||||||
try
|
try
|
||||||
|
|
|
||||||
|
|
@ -48,16 +48,25 @@ object frmTatDRtInPut: TfrmTatDRtInPut
|
||||||
ImageIndex = 16
|
ImageIndex = 16
|
||||||
OnClick = TBSaveClick
|
OnClick = TBSaveClick
|
||||||
end
|
end
|
||||||
object ToolButton4: TToolButton
|
object TbPHSave: TToolButton
|
||||||
Left = 71
|
Left = 71
|
||||||
Top = 0
|
Top = 0
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
|
Caption = #37197#36135#20445#23384
|
||||||
|
ImageIndex = 16
|
||||||
|
Visible = False
|
||||||
|
OnClick = TbPHSaveClick
|
||||||
|
end
|
||||||
|
object ToolButton4: TToolButton
|
||||||
|
Left = 166
|
||||||
|
Top = 0
|
||||||
|
AutoSize = True
|
||||||
Caption = #20445#23384#26684#24335
|
Caption = #20445#23384#26684#24335
|
||||||
ImageIndex = 16
|
ImageIndex = 16
|
||||||
OnClick = ToolButton4Click
|
OnClick = ToolButton4Click
|
||||||
end
|
end
|
||||||
object TBClose: TToolButton
|
object TBClose: TToolButton
|
||||||
Left = 166
|
Left = 261
|
||||||
Top = 0
|
Top = 0
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
Caption = #20851#38381
|
Caption = #20851#38381
|
||||||
|
|
@ -210,7 +219,7 @@ object frmTatDRtInPut: TfrmTatDRtInPut
|
||||||
object Note: TEdit
|
object Note: TEdit
|
||||||
Tag = 1
|
Tag = 1
|
||||||
Left = 96
|
Left = 96
|
||||||
Top = 69
|
Top = 70
|
||||||
Width = 962
|
Width = 962
|
||||||
Height = 18
|
Height = 18
|
||||||
TabOrder = 2
|
TabOrder = 2
|
||||||
|
|
@ -363,6 +372,7 @@ object frmTatDRtInPut: TfrmTatDRtInPut
|
||||||
object Tv1: TcxGridDBTableView
|
object Tv1: TcxGridDBTableView
|
||||||
Navigator.Buttons.CustomButtons = <>
|
Navigator.Buttons.CustomButtons = <>
|
||||||
ScrollbarAnnotations.CustomAnnotations = <>
|
ScrollbarAnnotations.CustomAnnotations = <>
|
||||||
|
OnCellClick = Tv1CellClick
|
||||||
DataController.DataSource = DataSource1
|
DataController.DataSource = DataSource1
|
||||||
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
|
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
|
||||||
DataController.Summary.DefaultGroupSummaryItems = <
|
DataController.Summary.DefaultGroupSummaryItems = <
|
||||||
|
|
@ -381,11 +391,11 @@ object frmTatDRtInPut: TfrmTatDRtInPut
|
||||||
DataController.Summary.FooterSummaryItems = <
|
DataController.Summary.FooterSummaryItems = <
|
||||||
item
|
item
|
||||||
Kind = skSum
|
Kind = skSum
|
||||||
Column = Tv1Column2
|
Column = Tv1Piece
|
||||||
end
|
end
|
||||||
item
|
item
|
||||||
Kind = skSum
|
Kind = skSum
|
||||||
Column = cv1Column3
|
Column = Tv1Qty
|
||||||
end>
|
end>
|
||||||
DataController.Summary.SummaryGroups = <>
|
DataController.Summary.SummaryGroups = <>
|
||||||
OptionsBehavior.FocusCellOnTab = True
|
OptionsBehavior.FocusCellOnTab = True
|
||||||
|
|
@ -394,21 +404,23 @@ object frmTatDRtInPut: TfrmTatDRtInPut
|
||||||
OptionsCustomize.ColumnFiltering = False
|
OptionsCustomize.ColumnFiltering = False
|
||||||
OptionsView.Footer = True
|
OptionsView.Footer = True
|
||||||
OptionsView.GroupByBox = False
|
OptionsView.GroupByBox = False
|
||||||
object v1Column6: TcxGridDBColumn
|
object Tv1C_Name: TcxGridDBColumn
|
||||||
Caption = #20135#21697#21517#31216
|
Caption = #20135#21697#21517#31216
|
||||||
DataBinding.FieldName = 'C_Name'
|
DataBinding.FieldName = 'C_Name'
|
||||||
DataBinding.IsNullValueType = True
|
DataBinding.IsNullValueType = True
|
||||||
HeaderAlignmentHorz = taCenter
|
HeaderAlignmentHorz = taCenter
|
||||||
|
Options.Editing = False
|
||||||
Width = 71
|
Width = 71
|
||||||
end
|
end
|
||||||
object Tv1Column1: TcxGridDBColumn
|
object Tv1C_code: TcxGridDBColumn
|
||||||
Caption = #20135#21697#32534#21495
|
Caption = #20135#21697#32534#21495
|
||||||
DataBinding.FieldName = 'C_code'
|
DataBinding.FieldName = 'C_code'
|
||||||
DataBinding.IsNullValueType = True
|
DataBinding.IsNullValueType = True
|
||||||
HeaderAlignmentHorz = taCenter
|
HeaderAlignmentHorz = taCenter
|
||||||
|
Options.Editing = False
|
||||||
Width = 68
|
Width = 68
|
||||||
end
|
end
|
||||||
object v1Column1: TcxGridDBColumn
|
object Tv1C_width: TcxGridDBColumn
|
||||||
Caption = #38376#24133
|
Caption = #38376#24133
|
||||||
DataBinding.FieldName = 'C_width'
|
DataBinding.FieldName = 'C_width'
|
||||||
DataBinding.IsNullValueType = True
|
DataBinding.IsNullValueType = True
|
||||||
|
|
@ -416,28 +428,29 @@ object frmTatDRtInPut: TfrmTatDRtInPut
|
||||||
Options.Editing = False
|
Options.Editing = False
|
||||||
Width = 73
|
Width = 73
|
||||||
end
|
end
|
||||||
object Tv1Column4: TcxGridDBColumn
|
object Tv1C_GramWeight: TcxGridDBColumn
|
||||||
Caption = #20811#37325
|
Caption = #20811#37325
|
||||||
DataBinding.FieldName = 'C_GramWeight'
|
DataBinding.FieldName = 'C_GramWeight'
|
||||||
DataBinding.IsNullValueType = True
|
DataBinding.IsNullValueType = True
|
||||||
HeaderAlignmentHorz = taCenter
|
HeaderAlignmentHorz = taCenter
|
||||||
|
Options.Editing = False
|
||||||
Width = 69
|
Width = 69
|
||||||
end
|
end
|
||||||
object Tv1Column3: TcxGridDBColumn
|
object Tv1c_Color: TcxGridDBColumn
|
||||||
Caption = #39068#33394
|
Caption = #39068#33394
|
||||||
DataBinding.FieldName = 'c_Color'
|
DataBinding.FieldName = 'c_Color'
|
||||||
DataBinding.IsNullValueType = True
|
DataBinding.IsNullValueType = True
|
||||||
HeaderAlignmentHorz = taCenter
|
HeaderAlignmentHorz = taCenter
|
||||||
Width = 68
|
Width = 68
|
||||||
end
|
end
|
||||||
object Tv1Column2: TcxGridDBColumn
|
object Tv1Piece: TcxGridDBColumn
|
||||||
Caption = #30003#35831#21367#25968
|
Caption = #30003#35831#21367#25968
|
||||||
DataBinding.FieldName = 'Piece'
|
DataBinding.FieldName = 'Piece'
|
||||||
DataBinding.IsNullValueType = True
|
DataBinding.IsNullValueType = True
|
||||||
HeaderAlignmentHorz = taCenter
|
HeaderAlignmentHorz = taCenter
|
||||||
Width = 81
|
Width = 81
|
||||||
end
|
end
|
||||||
object cv1Column3: TcxGridDBColumn
|
object Tv1Qty: TcxGridDBColumn
|
||||||
Caption = #30003#35831#31859#25968
|
Caption = #30003#35831#31859#25968
|
||||||
DataBinding.FieldName = 'Qty'
|
DataBinding.FieldName = 'Qty'
|
||||||
DataBinding.IsNullValueType = True
|
DataBinding.IsNullValueType = True
|
||||||
|
|
@ -445,13 +458,35 @@ object frmTatDRtInPut: TfrmTatDRtInPut
|
||||||
HeaderAlignmentHorz = taCenter
|
HeaderAlignmentHorz = taCenter
|
||||||
Width = 90
|
Width = 90
|
||||||
end
|
end
|
||||||
object Tv1Column5: TcxGridDBColumn
|
object Tv1PINGFANG: TcxGridDBColumn
|
||||||
Caption = #30003#35831#24179#26041
|
Caption = #30003#35831#24179#26041
|
||||||
DataBinding.FieldName = 'PINGFANG'
|
DataBinding.FieldName = 'PINGFANG'
|
||||||
DataBinding.IsNullValueType = True
|
DataBinding.IsNullValueType = True
|
||||||
HeaderAlignmentHorz = taCenter
|
HeaderAlignmentHorz = taCenter
|
||||||
Width = 71
|
Width = 71
|
||||||
end
|
end
|
||||||
|
object Tv1Volume: TcxGridDBColumn
|
||||||
|
Caption = #37197#36135#30003#35831#21367#25968
|
||||||
|
DataBinding.FieldName = 'Volume'
|
||||||
|
DataBinding.IsNullValueType = True
|
||||||
|
HeaderAlignmentHorz = taCenter
|
||||||
|
Width = 100
|
||||||
|
end
|
||||||
|
object Tv1Applicant: TcxGridDBColumn
|
||||||
|
Caption = #30003#35831#20154
|
||||||
|
DataBinding.FieldName = 'Applicant'
|
||||||
|
DataBinding.IsNullValueType = True
|
||||||
|
Visible = False
|
||||||
|
HeaderAlignmentHorz = taCenter
|
||||||
|
Width = 80
|
||||||
|
end
|
||||||
|
object Tv1ApplicationReaon: TcxGridDBColumn
|
||||||
|
Caption = #37197#36135#30003#35831#21407#22240
|
||||||
|
DataBinding.FieldName = 'ApplicationReaon'
|
||||||
|
DataBinding.IsNullValueType = True
|
||||||
|
HeaderAlignmentHorz = taCenter
|
||||||
|
Width = 80
|
||||||
|
end
|
||||||
end
|
end
|
||||||
object cxGrid1Level1: TcxGridLevel
|
object cxGrid1Level1: TcxGridLevel
|
||||||
GridView = Tv1
|
GridView = Tv1
|
||||||
|
|
|
||||||
|
|
@ -37,14 +37,14 @@ type
|
||||||
Label12: TLabel;
|
Label12: TLabel;
|
||||||
Label11: TLabel;
|
Label11: TLabel;
|
||||||
ToCoName: TBtnEditC;
|
ToCoName: TBtnEditC;
|
||||||
v1Column1: TcxGridDBColumn;
|
Tv1C_width: TcxGridDBColumn;
|
||||||
cv1Column3: TcxGridDBColumn;
|
Tv1Qty: TcxGridDBColumn;
|
||||||
cxStyleRepository1: TcxStyleRepository;
|
cxStyleRepository1: TcxStyleRepository;
|
||||||
dazi1: TcxStyle;
|
dazi1: TcxStyle;
|
||||||
v1Column6: TcxGridDBColumn;
|
Tv1C_Name: TcxGridDBColumn;
|
||||||
Label2: TLabel;
|
Label2: TLabel;
|
||||||
DlyDate: TDateTimePicker;
|
DlyDate: TDateTimePicker;
|
||||||
Tv1Column2: TcxGridDBColumn;
|
Tv1Piece: TcxGridDBColumn;
|
||||||
ToolButton3: TToolButton;
|
ToolButton3: TToolButton;
|
||||||
ToolButton4: TToolButton;
|
ToolButton4: TToolButton;
|
||||||
Label27: TLabel;
|
Label27: TLabel;
|
||||||
|
|
@ -53,16 +53,20 @@ type
|
||||||
SHDANWEI: TBtnEditC;
|
SHDANWEI: TBtnEditC;
|
||||||
ToolButton5: TToolButton;
|
ToolButton5: TToolButton;
|
||||||
ToolButton6: TToolButton;
|
ToolButton6: TToolButton;
|
||||||
Tv1Column1: TcxGridDBColumn;
|
Tv1C_code: TcxGridDBColumn;
|
||||||
Label4: TLabel;
|
Label4: TLabel;
|
||||||
Seal: TEdit;
|
Seal: TEdit;
|
||||||
Label5: TLabel;
|
Label5: TLabel;
|
||||||
tube: TEdit;
|
tube: TEdit;
|
||||||
Label6: TLabel;
|
Label6: TLabel;
|
||||||
Packaging: TEdit;
|
Packaging: TEdit;
|
||||||
Tv1Column3: TcxGridDBColumn;
|
Tv1c_Color: TcxGridDBColumn;
|
||||||
Tv1Column4: TcxGridDBColumn;
|
Tv1C_GramWeight: TcxGridDBColumn;
|
||||||
Tv1Column5: TcxGridDBColumn;
|
Tv1PINGFANG: TcxGridDBColumn;
|
||||||
|
Tv1Volume: TcxGridDBColumn;
|
||||||
|
Tv1Applicant: TcxGridDBColumn;
|
||||||
|
Tv1ApplicationReaon: TcxGridDBColumn;
|
||||||
|
TbPHSave: TToolButton;
|
||||||
procedure TBCloseClick(Sender: TObject);
|
procedure TBCloseClick(Sender: TObject);
|
||||||
procedure FormShow(Sender: TObject);
|
procedure FormShow(Sender: TObject);
|
||||||
procedure TBSaveClick(Sender: TObject);
|
procedure TBSaveClick(Sender: TObject);
|
||||||
|
|
@ -77,10 +81,13 @@ type
|
||||||
procedure SHDANWEIBtnDnClick(Sender: TObject);
|
procedure SHDANWEIBtnDnClick(Sender: TObject);
|
||||||
procedure ToolButton5Click(Sender: TObject);
|
procedure ToolButton5Click(Sender: TObject);
|
||||||
procedure ToolButton6Click(Sender: TObject);
|
procedure ToolButton6Click(Sender: TObject);
|
||||||
|
procedure TbPHSaveClick(Sender: TObject);
|
||||||
|
procedure Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
|
||||||
private
|
private
|
||||||
fuserName: string;
|
fuserName: string;
|
||||||
procedure InitData();
|
procedure InitData();
|
||||||
function SaveData(): Boolean;
|
function SaveData(): Boolean;
|
||||||
|
function SavePHData(): Boolean;
|
||||||
{ Private declarations }
|
{ Private declarations }
|
||||||
public
|
public
|
||||||
PState, CopyInt: Integer;
|
PState, CopyInt: Integer;
|
||||||
|
|
@ -106,6 +113,34 @@ begin
|
||||||
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
procedure TfrmTatDRtInPut.TbPHSaveClick(Sender: TObject);
|
||||||
|
var
|
||||||
|
Freal: Double;
|
||||||
|
begin
|
||||||
|
ToolBar1.SetFocus;
|
||||||
|
|
||||||
|
if Trim(OutType.Text) = '' then
|
||||||
|
begin
|
||||||
|
Application.MessageBox('出库类型不能为空！', '提示', 0);
|
||||||
|
Exit;
|
||||||
|
end;
|
||||||
|
if Trim(ToCoName.Text) = '' then
|
||||||
|
begin
|
||||||
|
Application.MessageBox('客户不能为空！', '提示', 0);
|
||||||
|
Exit;
|
||||||
|
end;
|
||||||
|
if (Order_Sub.Locate('Piece', null, [])) and (Order_Sub.Locate('Qty', null, [])) = True then
|
||||||
|
begin
|
||||||
|
Application.MessageBox('细码申请匹数和数量不能全为空！', '提示', 0);
|
||||||
|
Exit;
|
||||||
|
end;
|
||||||
|
if SavePHData() then
|
||||||
|
begin
|
||||||
|
Application.MessageBox('配货保存成功！', '提示', 0);
|
||||||
|
ModalResult := 1;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
procedure TfrmTatDRtInPut.InitData();
|
procedure TfrmTatDRtInPut.InitData();
|
||||||
var
|
var
|
||||||
fsj: string;
|
fsj: string;
|
||||||
|
|
@ -121,11 +156,11 @@ begin
|
||||||
SQL.Clear;
|
SQL.Clear;
|
||||||
sql.Add(' select A.* ');
|
sql.Add(' select A.* ');
|
||||||
sql.Add(' from Tat_Cloth_DR_Sub A');
|
sql.Add(' from Tat_Cloth_DR_Sub A');
|
||||||
if PState = 1 then
|
if (PState = 1) or (PState = 2) then ////查看和修改
|
||||||
begin
|
begin
|
||||||
sql.Add('where DRMID=''' + Trim(FDRMID) + '''');
|
sql.Add('where DRMID=''' + Trim(FDRMID) + '''');
|
||||||
end;
|
end;
|
||||||
if PState = 0 then
|
if PState = 0 then ////新增
|
||||||
begin
|
begin
|
||||||
sql.Add(' where 1<>1');
|
sql.Add(' where 1<>1');
|
||||||
end;
|
end;
|
||||||
|
|
@ -191,6 +226,66 @@ begin
|
||||||
InitData();
|
InitData();
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
function TfrmTatDRtInPut.SavePHData(): Boolean;
|
||||||
|
var
|
||||||
|
MaxSid: string;
|
||||||
|
CurrentYear: string;
|
||||||
|
begin
|
||||||
|
try
|
||||||
|
ADOCmd.Connection.BeginTrans;
|
||||||
|
///////////////// 保存子表 /////////////////
|
||||||
|
Order_Sub.DisableControls;
|
||||||
|
with Order_Sub do
|
||||||
|
begin
|
||||||
|
First;
|
||||||
|
while not Eof do
|
||||||
|
begin
|
||||||
|
if Trim(Order_Sub.fieldbyname('DRSID').AsString) = '' then
|
||||||
|
begin
|
||||||
|
if GetLSNo(ADOCmd, MaxSid, 'TDS', 'Tat_Cloth_DR_Sub', 4, 1) = False then
|
||||||
|
raise Exception.Create('取子流水号失败！');
|
||||||
|
end
|
||||||
|
else
|
||||||
|
begin
|
||||||
|
MaxSid := Trim(Order_Sub.fieldbyname('DRSID').AsString);
|
||||||
|
end;
|
||||||
|
|
||||||
|
with ADOCmd do
|
||||||
|
begin
|
||||||
|
Close;
|
||||||
|
SQL.Clear;
|
||||||
|
sql.Add('select * from Tat_Cloth_DR_Sub ');
|
||||||
|
sql.Add(' where DRMID=''' + Trim(FDRMID) + '''');
|
||||||
|
sql.Add(' and DRSID=''' + Trim(MaxSid) + '''');
|
||||||
|
Open;
|
||||||
|
if ADOCmd.IsEmpty then
|
||||||
|
begin
|
||||||
|
Append;
|
||||||
|
end
|
||||||
|
else
|
||||||
|
begin
|
||||||
|
Edit;
|
||||||
|
end;
|
||||||
|
FieldByName('Volume').Value := Order_Sub.fieldbyname('Volume').Value;
|
||||||
|
FieldByName('Applicant').Value := trim(DName);
|
||||||
|
FieldByName('ApplicationReaon').Value := Order_Sub.fieldbyname('ApplicationReaon').Value;
|
||||||
|
Post;
|
||||||
|
end;
|
||||||
|
Next;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
Order_Sub.EnableControls;
|
||||||
|
///////////////// 保存子表 /////////////////
|
||||||
|
FDRMID := Trim(FDRMID);
|
||||||
|
ADOCmd.Connection.CommitTrans;
|
||||||
|
Result := True;
|
||||||
|
except
|
||||||
|
ADOCmd.Connection.RollbackTrans;
|
||||||
|
application.MessageBox(PChar(Exception(ExceptObject).Message), '提示信息', 0);
|
||||||
|
Result := False;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
function TfrmTatDRtInPut.SaveData(): Boolean;
|
function TfrmTatDRtInPut.SaveData(): Boolean;
|
||||||
var
|
var
|
||||||
MaxMid, MaxSid: string;
|
MaxMid, MaxSid: string;
|
||||||
|
|
@ -415,6 +510,7 @@ end;
|
||||||
procedure TfrmTatDRtInPut.ToolButton3Click(Sender: TObject);
|
procedure TfrmTatDRtInPut.ToolButton3Click(Sender: TObject);
|
||||||
var
|
var
|
||||||
FConMainId, FMPRTCode: string;
|
FConMainId, FMPRTCode: string;
|
||||||
|
LocateValues: variant;
|
||||||
begin
|
begin
|
||||||
// try
|
// try
|
||||||
// frmTatPlanSel := TfrmTatPlanSel.Create(Application);
|
// frmTatPlanSel := TfrmTatPlanSel.Create(Application);
|
||||||
|
|
@ -462,8 +558,16 @@ begin
|
||||||
begin
|
begin
|
||||||
while cds_sub.locate('SSel', true, []) do
|
while cds_sub.locate('SSel', true, []) do
|
||||||
begin
|
begin
|
||||||
// if not self.Order_Sub.locate('C_Code', trim(frmTatClothInfoSel.CDS_1.Fieldbyname('C_Code').AsString), []) then
|
LocateValues := VarArrayOf([trim(frmTatClothInfoSel.CDS_1.Fieldbyname('C_Name').AsString), trim(frmTatClothInfoSel.cds_sub.Fieldbyname('C_MXMF').AsString), trim(frmTatClothInfoSel.CDS_1.Fieldbyname('C_GramWeight').AsString)]);
|
||||||
// begin
|
|
||||||
|
if self.Order_Sub.locate('C_name;C_width;C_GramWeight', LocateValues, []) then
|
||||||
|
begin
|
||||||
|
// 三个字段都匹配，执行编辑 - 这里已经定位到相同记录的那一条数据
|
||||||
|
|
||||||
|
end
|
||||||
|
else
|
||||||
|
begin
|
||||||
|
// 三个字段不完全匹配，添加新记录
|
||||||
with Self.Order_Sub do
|
with Self.Order_Sub do
|
||||||
begin
|
begin
|
||||||
Append;
|
Append;
|
||||||
|
|
@ -476,10 +580,12 @@ begin
|
||||||
// FieldByName('C_ColorNo').Value := frmTatClothInfoSel.CDS_1.fieldbyname('C_ColorNo').Value;
|
// FieldByName('C_ColorNo').Value := frmTatClothInfoSel.CDS_1.fieldbyname('C_ColorNo').Value;
|
||||||
// FieldByName('C_Pattern').Value := frmTatClothInfoSel.CDS_1.fieldbyname('C_Pattern').Value;
|
// FieldByName('C_Pattern').Value := frmTatClothInfoSel.CDS_1.fieldbyname('C_Pattern').Value;
|
||||||
end;
|
end;
|
||||||
// end;
|
end;
|
||||||
|
|
||||||
cds_sub.Edit;
|
cds_sub.Edit;
|
||||||
cds_sub.fieldbyname('SSel').value := false;
|
cds_sub.fieldbyname('SSel').value := false;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
finally
|
finally
|
||||||
|
|
@ -537,6 +643,8 @@ begin
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TfrmTatDRtInPut.ToolButton6Click(Sender: TObject);
|
procedure TfrmTatDRtInPut.ToolButton6Click(Sender: TObject);
|
||||||
|
var
|
||||||
|
LocateValues: variant;
|
||||||
begin
|
begin
|
||||||
try
|
try
|
||||||
frmTatClothStkHZListSEL := tfrmTatClothStkHZListSEL.Create(Application);
|
frmTatClothStkHZListSEL := tfrmTatClothStkHZListSEL.Create(Application);
|
||||||
|
|
@ -546,22 +654,53 @@ begin
|
||||||
begin
|
begin
|
||||||
while CDS_1.locate('SSel', true, []) do
|
while CDS_1.locate('SSel', true, []) do
|
||||||
begin
|
begin
|
||||||
if not self.Order_Sub.locate('C_name', trim(frmTatClothStkHZListSEL.CDS_1.Fieldbyname('C_Name').AsString), []) then
|
// if not self.Order_Sub.locate('C_name', trim(frmTatClothStkHZListSEL.CDS_1.Fieldbyname('C_Name').AsString), []) then
|
||||||
|
// begin
|
||||||
|
// with Self.Order_Sub do
|
||||||
|
// begin
|
||||||
|
// Append;
|
||||||
|
// FieldByName('C_code').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_code').Value;
|
||||||
|
// FieldByName('C_Name').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_Name').Value;
|
||||||
|
// FieldByName('C_width').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_width').Value;
|
||||||
|
//
|
||||||
|
// FieldByName('C_GramWeight').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_GramWeight').Value;
|
||||||
|
// FieldByName('C_color').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_color').Value;
|
||||||
|
// FieldByName('Piece').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('js').Value;
|
||||||
|
// FieldByName('Qty').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('stkmeter').Value;
|
||||||
|
//
|
||||||
|
// end;
|
||||||
|
// end;
|
||||||
|
|
||||||
|
LocateValues := VarArrayOf([trim(frmTatClothStkHZListSEL.CDS_1.Fieldbyname('C_Name').AsString), trim(frmTatClothStkHZListSEL.CDS_1.Fieldbyname('C_width').AsString), trim(frmTatClothStkHZListSEL.CDS_1.Fieldbyname('C_GramWeight').AsString)]);
|
||||||
|
|
||||||
|
if self.Order_Sub.locate('C_name;C_width;C_GramWeight', LocateValues, []) then
|
||||||
begin
|
begin
|
||||||
|
// 三个字段都匹配，执行编辑 - 这里已经定位到相同记录的那一条数据
|
||||||
|
with Self.Order_Sub do
|
||||||
|
begin
|
||||||
|
Edit;
|
||||||
|
FieldByName('Piece').AsFloat := FieldByName('Piece').AsFloat + frmTatClothStkHZListSEL.CDS_1.fieldbyname('js').AsFloat;
|
||||||
|
FieldByName('Qty').AsFloat := FieldByName('Qty').AsFloat + frmTatClothStkHZListSEL.CDS_1.fieldbyname('stkmeter').AsFloat;
|
||||||
|
Post; // 建议加上Post保存编辑
|
||||||
|
end;
|
||||||
|
end
|
||||||
|
else
|
||||||
|
begin
|
||||||
|
// 三个字段不完全匹配，添加新记录
|
||||||
with Self.Order_Sub do
|
with Self.Order_Sub do
|
||||||
begin
|
begin
|
||||||
Append;
|
Append;
|
||||||
FieldByName('C_code').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_code').Value;
|
FieldByName('C_code').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_code').Value;
|
||||||
FieldByName('C_Name').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_Name').Value;
|
FieldByName('C_Name').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_Name').Value;
|
||||||
FieldByName('C_width').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_width').Value;
|
FieldByName('C_width').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_width').Value;
|
||||||
|
|
||||||
FieldByName('C_GramWeight').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_GramWeight').Value;
|
FieldByName('C_GramWeight').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_GramWeight').Value;
|
||||||
FieldByName('C_color').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_color').Value;
|
FieldByName('C_color').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('C_color').Value;
|
||||||
FieldByName('Piece').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('js').Value;
|
FieldByName('Piece').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('js').Value;
|
||||||
FieldByName('Qty').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('stkmeter').Value;
|
FieldByName('Qty').Value := frmTatClothStkHZListSEL.CDS_1.fieldbyname('stkmeter').Value;
|
||||||
|
Post; // 建议加上Post保存添加
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
end;
|
|
||||||
end;
|
|
||||||
CDS_1.Edit;
|
CDS_1.Edit;
|
||||||
CDS_1.fieldbyname('SSel').value := false;
|
CDS_1.fieldbyname('SSel').value := false;
|
||||||
end;
|
end;
|
||||||
|
|
@ -572,6 +711,23 @@ begin
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
procedure TfrmTatDRtInPut.Tv1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean);
|
||||||
|
begin
|
||||||
|
if (Order_Sub.FieldByName('DlyQty').AsString = '') and (Order_Sub.FieldByName('Volume').AsString = '') then
|
||||||
|
begin
|
||||||
|
Tv1Piece.Options.Editing := True;
|
||||||
|
Tv1Qty.Options.Editing := True;
|
||||||
|
Tv1PINGFANG.Options.Editing := True;
|
||||||
|
end
|
||||||
|
else
|
||||||
|
begin
|
||||||
|
Tv1Piece.Options.Editing := False;
|
||||||
|
Tv1Qty.Options.Editing := False;
|
||||||
|
Tv1PINGFANG.Options.Editing := False;
|
||||||
|
end;
|
||||||
|
|
||||||
|
end;
|
||||||
|
|
||||||
procedure TfrmTatDRtInPut.ToCoNameBtnUpClick(Sender: TObject);
|
procedure TfrmTatDRtInPut.ToCoNameBtnUpClick(Sender: TObject);
|
||||||
begin
|
begin
|
||||||
|
|
||||||
|
|
|
||||||
Binary file not shown.
Binary file not shown.
Loading…
Reference in New Issue
Block a user