Group_99/D7szYidui
5
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

1

Browse Source
This commit is contained in:
DESKTOP-E401PHE\Administrator 2025-09-23 09:02:42 +08:00
parent 8c221a3e7a
commit b5f091af83
16 changed files with 56 additions and 31 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
合同管理(ContractManagement.dll)/ContractManagement.dpr
View File

@ -7,7 +7,7 @@ uses
WinTypes, WinTypes,
WinProcs, WinProcs,
U_GetDllForm in 'U_GetDllForm.pas', U_GetDllForm in 'U_GetDllForm.pas',
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote},
U_DataLink in 'U_DataLink.pas' {DataLink_ContractManagement: TDataModule}, U_DataLink in 'U_DataLink.pas' {DataLink_ContractManagement: TDataModule},
U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel},
@ -17,7 +17,7 @@ uses
U_ColumnSet in '..\Z99Dependency\ThreeFun\Form\U_ColumnSet.pas' {frmColumnSet}, U_ColumnSet in '..\Z99Dependency\ThreeFun\Form\U_ColumnSet.pas' {frmColumnSet},
U_ColumnBandSet in '..\Z99Dependency\ThreeFun\Form\U_ColumnBandSet.pas' {frmColumnBandSet}, U_ColumnBandSet in '..\Z99Dependency\ThreeFun\Form\U_ColumnBandSet.pas' {frmColumnBandSet},
U_SelPrintFieldNew in '..\Z99Dependency\ThreeFun\Form\U_SelPrintFieldNew.pas' {frmSelPrintFieldNew}, U_SelPrintFieldNew in '..\Z99Dependency\ThreeFun\Form\U_SelPrintFieldNew.pas' {frmSelPrintFieldNew},
U_RTZDYHelp in '..\..\..\RTFunAndForm\Form\U_RTZDYHelp.pas' {frmRTZDYHelp}, U_RTZDYHelp in '..\Z99Dependency\RTFunAndForm\Form\U_RTZDYHelp.pas' {frmRTZDYHelp},
U_CompressionFun in '..\Z99Dependency\ThreeFun\Fun\U_CompressionFun.pas', U_CompressionFun in '..\Z99Dependency\ThreeFun\Fun\U_CompressionFun.pas',
U_SysLogHelp in '..\Z99Dependency\ThreeFun\Form\U_SysLogHelp.pas' {frmSysLogHelp}, U_SysLogHelp in '..\Z99Dependency\ThreeFun\Form\U_SysLogHelp.pas' {frmSysLogHelp},
U_FactoryGYS in 'U_FactoryGYS.pas' {frmFactoryGYS}, U_FactoryGYS in 'U_FactoryGYS.pas' {frmFactoryGYS},

2
基础资料(BaseInfo.dll)/BaseInfo.dpr
View File

@ -7,7 +7,7 @@ uses
WinTypes, WinTypes,
WinProcs, WinProcs,
U_GetDllForm in 'U_GetDllForm.pas', U_GetDllForm in 'U_GetDllForm.pas',
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote},
U_DataLink in 'U_DataLink.pas' {DataLink_BaseInfo: TDataModule}, U_DataLink in 'U_DataLink.pas' {DataLink_BaseInfo: TDataModule},
U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel},

2
客户供应商管理(Company.dll)/Company.dpr
View File

@ -7,7 +7,7 @@ uses
WinTypes, WinTypes,
WinProcs, WinProcs,
U_GetDllForm in 'U_GetDllForm.pas', U_GetDllForm in 'U_GetDllForm.pas',
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote},
U_DataLink in 'U_DataLink.pas' {DataLink_Company: TDataModule}, U_DataLink in 'U_DataLink.pas' {DataLink_Company: TDataModule},
U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel},

2
工资管理(Wage.dll)/Wage.dpr
View File

@ -7,7 +7,7 @@ uses
WinTypes, WinTypes,
WinProcs, WinProcs,
U_GetDllForm in 'U_GetDllForm.pas', U_GetDllForm in 'U_GetDllForm.pas',
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote},
U_DataLink in 'U_DataLink.pas' {DataLink_Wage: TDataModule}, U_DataLink in 'U_DataLink.pas' {DataLink_Wage: TDataModule},
U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel},

2
布匹检验(FabricInspection.dll)/FabricInspection.dpr
View File

@ -7,7 +7,7 @@ uses
WinTypes, WinTypes,
WinProcs, WinProcs,
U_GetDllForm in 'U_GetDllForm.pas', U_GetDllForm in 'U_GetDllForm.pas',
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote},
U_DataLink in 'U_DataLink.pas' {DataLink_FabricInspection: TDataModule}, U_DataLink in 'U_DataLink.pas' {DataLink_FabricInspection: TDataModule},
U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel},

5
成品仓库(FinishedClothWarehouse.dll)/FinishedClothWarehouse.dpr
View File

@ -8,7 +8,7 @@ uses
WinProcs, WinProcs,
MidasLib, MidasLib,
U_GetDllForm in 'U_GetDllForm.pas', U_GetDllForm in 'U_GetDllForm.pas',
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote},
U_DataLink in 'U_DataLink.pas' {DataLink_FinishedClothWarehouse: TDataModule}, U_DataLink in 'U_DataLink.pas' {DataLink_FinishedClothWarehouse: TDataModule},
U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel},
@ -21,7 +21,8 @@ uses
U_SysLogHelp in '..\Z99Dependency\ThreeFun\Form\U_SysLogHelp.pas' {frmSysLogHelp}, U_SysLogHelp in '..\Z99Dependency\ThreeFun\Form\U_SysLogHelp.pas' {frmSysLogHelp},
U_ContractListNXSel in 'U_ContractListNXSel.pas' {frmContractListNXSel}, U_ContractListNXSel in 'U_ContractListNXSel.pas' {frmContractListNXSel},
U_ZdyAttachment in 'U_ZdyAttachment.pas' {frmZdyAttachment}, U_ZdyAttachment in 'U_ZdyAttachment.pas' {frmZdyAttachment},
U_Fun in '..\Z99Dependency\ThreeFun\Fun\U_Fun.pas'; U_Fun in '..\Z99Dependency\ThreeFun\Fun\U_Fun.pas',
U_CPCKMdList in 'U_CPCKMdList.pas' {frmCPCKMdList};
{$R *.res} {$R *.res}

21
成品仓库(FinishedClothWarehouse.dll)/U_CPCKMdList.dfm
View File

@ -1,8 +1,8 @@
object frmCPCKMdList: TfrmCPCKMdList object frmCPCKMdList: TfrmCPCKMdList
Left = 248 Left = 411
Top = 179 Top = 204
Width = 1128 Width = 1624
Height = 516 Height = 968
Caption = #30721#21333#25171#21360 Caption = #30721#21333#25171#21360
Color = clBtnFace Color = clBtnFace
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
@ -20,7 +20,7 @@ object frmCPCKMdList: TfrmCPCKMdList
object ToolBar1: TToolBar object ToolBar1: TToolBar
Left = 0 Left = 0
Top = 0 Top = 0
Width = 1120 Width = 1616
AutoSize = True AutoSize = True
ButtonHeight = 30 ButtonHeight = 30
ButtonWidth = 95 ButtonWidth = 95
@ -81,7 +81,8 @@ object frmCPCKMdList: TfrmCPCKMdList
Items.Strings = ( Items.Strings = (
#25104#21697#30721#21333'1' #25104#21697#30721#21333'1'
#25104#21697#30721#21333'2' #25104#21697#30721#21333'2'
#25104#21697#30721#21333'3') #25104#21697#30721#21333'3'
#26080#25260#22836#25104#21697#30721#21333'1')
end end
object ToolButton2: TToolButton object ToolButton2: TToolButton
Left = 361 Left = 361
@ -111,7 +112,7 @@ object frmCPCKMdList: TfrmCPCKMdList
object Panel1: TPanel object Panel1: TPanel
Left = 0 Left = 0
Top = 32 Top = 32
Width = 1120 Width = 1616
Height = 93 Height = 93
Align = alTop Align = alTop
BevelInner = bvRaised BevelInner = bvRaised
@ -321,8 +322,8 @@ object frmCPCKMdList: TfrmCPCKMdList
object cxGrid1: TcxGrid object cxGrid1: TcxGrid
Left = 0 Left = 0
Top = 147 Top = 147
Width = 1120 Width = 1616
Height = 338 Height = 790
Align = alClient Align = alClient
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET
Font.Color = clWindowText Font.Color = clWindowText
@ -684,7 +685,7 @@ object frmCPCKMdList: TfrmCPCKMdList
object cxTabControl1: TcxTabControl object cxTabControl1: TcxTabControl
Left = 0 Left = 0
Top = 125 Top = 125
Width = 1120 Width = 1616
Height = 22 Height = 22
Align = alTop Align = alTop
Font.Charset = GB2312_CHARSET Font.Charset = GB2312_CHARSET

19
成品仓库(FinishedClothWarehouse.dll)/U_CPCKMdList.pas
View File

@ -12,7 +12,20 @@ uses
cxDropDownEdit, RM_Common, RM_Class, RM_e_Xls, RM_Dataset, RM_System, cxDropDownEdit, RM_Common, RM_Class, RM_e_Xls, RM_Dataset, RM_System,
RM_GridReport, cxCheckBox, Menus, MovePanel, BtnEdit, cxCalendar, RM_GridReport, cxCheckBox, Menus, MovePanel, BtnEdit, cxCalendar,
cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, dxBarBuiltInMenu, cxPC, cxLookAndFeels, cxLookAndFeelPainters, cxNavigator, dxBarBuiltInMenu, cxPC,
dxSkinsCore, dxSkinsDefaultPainters, dxSkinscxPCPainter; dxSkinsCore, dxSkinsDefaultPainters, dxSkinscxPCPainter, dxSkinBlack,
dxSkinBlue, dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee, dxSkinDarkRoom,
dxSkinDarkSide, dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle,
dxSkinFoggy, dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary,
dxSkinLilian, dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin,
dxSkinMetropolis, dxSkinMetropolisDark, dxSkinMoneyTwins,
dxSkinOffice2007Black, dxSkinOffice2007Blue, dxSkinOffice2007Green,
dxSkinOffice2007Pink, dxSkinOffice2007Silver, dxSkinOffice2010Black,
dxSkinOffice2010Blue, dxSkinOffice2010Silver, dxSkinOffice2013DarkGray,
dxSkinOffice2013LightGray, dxSkinOffice2013White, dxSkinPumpkin,
dxSkinSeven, dxSkinSevenClassic, dxSkinSharp, dxSkinSharpPlus,
dxSkinSilver, dxSkinSpringTime, dxSkinStardust, dxSkinSummer2008,
dxSkinTheAsphaltWorld, dxSkinValentine, dxSkinVS2010, dxSkinWhiteprint,
dxSkinXmas2008Blue;
type type
TfrmCPCKMdList = class(TForm) TfrmCPCKMdList = class(TForm)
@ -126,7 +139,7 @@ var
implementation implementation
uses uses
U_DataLink, U_Fun, U_ZDYHelp, U_FinishedClothOutList_MX; U_DataLink, U_RTFun, U_ZDYHelp, U_FinishedClothOutList_MX;
{$R *.dfm} {$R *.dfm}
@ -817,7 +830,7 @@ begin
// SInitCDSData20(ADOQueryTemp, CDS_JuanPRT); // SInitCDSData20(ADOQueryTemp, CDS_JuanPRT);
// end; // end;
if (trim(ComboBox1.Text) = '成品码单2') or (trim(ComboBox1.Text) = '成品码单1') then if (trim(ComboBox1.Text) = '成品码单2') or (trim(ComboBox1.Text) = '成品码单1' or (trim(ComboBox1.Text) = '无抬头成品码单1') then
begin begin
with ADOQueryTemp do with ADOQueryTemp do
begin begin

16
成品仓库(FinishedClothWarehouse.dll)/U_DataLink.pas
View File

@ -16,9 +16,19 @@ uses
dxSkinOffice2013White, dxSkinOffice2013White,
dxSkinSharpPlus, dxSkinSharpPlus,
dxSkinSpringTime, dxSkinSpringTime, dxSkinBlack, dxSkinBlue, dxSkinBlueprint,
dxSkinCaramel, dxSkinCoffee, dxSkinDarkSide, dxSkinDevExpressDarkStyle,
; dxSkinDevExpressStyle, dxSkinFoggy, dxSkinGlassOceans,
dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian, dxSkinLiquidSky,
dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMetropolis,
dxSkinMetropolisDark, dxSkinMoneyTwins, dxSkinOffice2007Black,
dxSkinOffice2007Blue, dxSkinOffice2007Green, dxSkinOffice2007Pink,
dxSkinOffice2007Silver, dxSkinOffice2010Black, dxSkinOffice2010Blue,
dxSkinOffice2010Silver, dxSkinOffice2013DarkGray,
dxSkinOffice2013LightGray, dxSkinPumpkin, dxSkinSeven,
dxSkinSevenClassic, dxSkinSharp, dxSkinSilver, dxSkinStardust,
dxSkinSummer2008, dxSkinTheAsphaltWorld, dxSkinValentine, dxSkinVS2010,
dxSkinWhiteprint, dxSkinXmas2008Blue;
var var
DConString:String; {全局连接字符串} DConString:String; {全局连接字符串}
server, dtbase, user, pswd: String; {数据库连接参数} server, dtbase, user, pswd: String; {数据库连接参数}

2
样品(YPGL.dll)/YPGL.dpr
View File

@ -19,7 +19,7 @@ uses
U_Fun in '..\Z99Dependency\ThreeFun\Fun\U_Fun.pas', U_Fun in '..\Z99Dependency\ThreeFun\Fun\U_Fun.pas',
U_Fun10 in '..\Z99Dependency\ThreeFun\Fun\U_Fun10.pas', U_Fun10 in '..\Z99Dependency\ThreeFun\Fun\U_Fun10.pas',
U_CPSel in 'U_CPSel.pas' {frmCPSel}, U_CPSel in 'U_CPSel.pas' {frmCPSel},
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_SLT in 'U_SLT.pas' {frmSLT: TFrame}, U_SLT in 'U_SLT.pas' {frmSLT: TFrame},
U_ZdyAttachGYS in 'U_ZdyAttachGYS.pas' {frmZdyAttachGYS}; U_ZdyAttachGYS in 'U_ZdyAttachGYS.pas' {frmZdyAttachGYS};

2
梭织计划单(ShuttleSchedule.dll)/ShuttleSchedule.dpr
View File

@ -7,7 +7,7 @@ uses
WinTypes, WinTypes,
WinProcs, WinProcs,
U_GetDllForm in 'U_GetDllForm.pas', U_GetDllForm in 'U_GetDllForm.pas',
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote},
U_DataLink in 'U_DataLink.pas' {DataLink_ShuttleSchedule: TDataModule}, U_DataLink in 'U_DataLink.pas' {DataLink_ShuttleSchedule: TDataModule},
U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel},

2
消息提醒(MessageAlert.dll)/MessageAlert.dpr
View File

@ -7,7 +7,7 @@ uses
WinTypes, WinTypes,
WinProcs, WinProcs,
U_GetDllForm in 'U_GetDllForm.pas', U_GetDllForm in 'U_GetDllForm.pas',
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote},
U_DataLink in 'U_DataLink.pas' {DataLink_MessageAlert: TDataModule}, U_DataLink in 'U_DataLink.pas' {DataLink_MessageAlert: TDataModule},
U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel},

2
纱线仓库/Yarn.dpr
View File

@ -7,7 +7,7 @@ uses
WinTypes, WinTypes,
WinProcs, WinProcs,
U_GetDllForm in 'U_GetDllForm.pas', U_GetDllForm in 'U_GetDllForm.pas',
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote},
U_DataLink in 'U_DataLink.pas' {DataLink_Yarn: TDataModule}, U_DataLink in 'U_DataLink.pas' {DataLink_Yarn: TDataModule},
U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel},

2
经轴仓库(Warehouse.dll)/Warehouse.dpr
View File

@ -7,7 +7,7 @@ uses
WinTypes, WinTypes,
WinProcs, WinProcs,
U_GetDllForm in 'U_GetDllForm.pas', U_GetDllForm in 'U_GetDllForm.pas',
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote},
U_DataLink in 'U_DataLink.pas' {DataLink_Warehouse: TDataModule}, U_DataLink in 'U_DataLink.pas' {DataLink_Warehouse: TDataModule},
U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel},

2
进度统计查询(Statistics.dll)/Statistics.dpr
View File

@ -7,7 +7,7 @@ uses
WinTypes, WinTypes,
WinProcs, WinProcs,
U_GetDllForm in 'U_GetDllForm.pas', U_GetDllForm in 'U_GetDllForm.pas',
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote},
U_DataLink in 'U_DataLink.pas' {DataLink_Statistics: TDataModule}, U_DataLink in 'U_DataLink.pas' {DataLink_Statistics: TDataModule},
U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel},

2
进度统计查询2(Statistics.dll)(1)/Statistics.dpr
View File

@ -7,7 +7,7 @@ uses
WinTypes, WinTypes,
WinProcs, WinProcs,
U_GetDllForm in 'U_GetDllForm.pas', U_GetDllForm in 'U_GetDllForm.pas',
U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_RTFun in '..\Z99Dependency\RTFunAndForm\Fun\U_RTFun.pas',
U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote},
U_DataLink in 'U_DataLink.pas' {DataLink_Statistics: TDataModule}, U_DataLink in 'U_DataLink.pas' {DataLink_Statistics: TDataModule},
U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel},