2025-07-19 09:32:10 +08:00
library YSYF;
uses
SysUtils,
classes,
forms,
WinTypes,
WinProcs,
2026-02-12 10:41:08 +08:00
midaslib,
2025-07-19 09:32:10 +08:00
U_DataLink in 'U_DataLink.pas' {DataLink_YSYF: TDataModule} ,
U_GetDllForm in 'U_GetDllForm.pas' ,
2025-07-19 14:23:30 +08:00
U_ZDYHelpSel in '..\Z99Dependency\ThreeFun\Form\U_ZDYHelpSel.pas' {frmZDYHelpSel} ,
U_SelExportField in '..\Z99Dependency\ThreeFun\Fun\U_SelExportField.pas' {frmSelExportField} ,
U_ColumnSet in '..\Z99Dependency\ThreeFun\Form\U_ColumnSet.pas' {frmColumnSet} ,
U_ZDYHelp in '..\Z99Dependency\ThreeFun\Form\U_ZDYHelp.pas' {frmZDYHelp} ,
U_ColumnBandSet in '..\Z99Dependency\ThreeFun\Form\U_ColumnBandSet.pas' {frmColumnBandSet} ,
U_SelPrintFieldNew in '..\Z99Dependency\ThreeFun\Form\U_SelPrintFieldNew.pas' {frmSelPrintFieldNew} ,
2025-07-19 09:32:10 +08:00
U_ProductOrderCost in 'U_ProductOrderCost.pas' {frmProductOrderCost} ,
U_YSSKList in 'U_YSSKList.pas' {frmYSSKList} ,
U_SKCROLJ in 'U_SKCROLJ.pas' {frmSKCROLJ} ,
U_YSCROL in 'U_YSCROL.pas' {frmYSCROL} ,
U_FKCRLZ in 'U_FKCRLZ.pas' {frmFKCRLZ} ,
U_YSFP in 'U_YSFP.pas' {frmYSFP} ,
U_ProductOrderList in 'U_ProductOrderList.pas' {frmProductOrderList} ,
U_YSZDList_MX in 'U_YSZDList_MX.pas' {frmYSZDList_MX} ,
U_PbProductList in 'U_PbProductList.pas' {frmPbProductList} ,
U_ProductOrderListOLJ in 'U_ProductOrderListOLJ.pas' {frmProductOrderListOLJ} ,
U_YSCRJZC in 'U_YSCRJZC.pas' {frmYSCRJZC} ,
U_SKCRLZ in 'U_SKCRLZ.pas' {frmSKCRLZ} ,
U_YSHZMXView in 'U_YSHZMXView.pas' {frmYSHZMXView} ,
U_YFCRLZView in 'U_YFCRLZView.pas' {frmYFCRLZView} ,
U_YFCRLZQty in 'U_YFCRLZQty.pas' {frmYFCRLZQty} ,
2025-07-19 14:23:30 +08:00
U_Fun10 in '..\Z99Dependency\ThreeFun\Fun\U_Fun10.pas' ,
2025-07-19 09:32:10 +08:00
U_YFMXlist in 'U_YFMXlist.pas' {frmYFMXlist} ,
U_ZdyAttachCP in 'U_ZdyAttachCP.pas' {frmZdyAttachCP} ,
U_ZdyAttachGYS in 'U_ZdyAttachGYS.pas' {frmZdyAttachGYS} ,
U_ZdyAttachment in 'U_ZdyAttachment.pas' {frmZdyAttachment} ,
U_BpGdCklist in 'U_BpGdCklist.pas' {frmBpGdCklist} ,
U_YSSCList in 'U_YSSCList.pas' {frmYSSCList} ,
U_ProductOrderListSel in 'U_ProductOrderListSel.pas' {frmProductOrderListSel} ,
2026-02-12 10:41:08 +08:00
// U_XXFPINVOICE_TJD in '..\..\..\..\<5C> <> ־<EFBFBD> <D6BE> <EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD> <EFBFBD> \<5C> <> Ŀ<EFBFBD> <C4BF> <EFBFBD> <EFBFBD> \<5C> <> <EFBFBD> <EFBFBD> \<5C> <> <EFBFBD> <EFBFBD> ͳ<EFBFBD> Ʋ<EFBFBD> ѯ(Statistics.dll)\U_XXFPINVOICE_TJD.pas' {frmXXFPInvoice_TJd},
2025-07-19 09:32:10 +08:00
U_FDINVOICE_S in 'U_FDINVOICE_S.pas' {frmFDINVOICE_S} ,
U_FDINVOICE_Sub_S in 'U_FDINVOICE_Sub_S.pas' {FrmInvoice_Sub_S} ,
2025-07-19 14:23:30 +08:00
U_Fun in '..\Z99Dependency\ThreeFun\Fun\U_Fun.pas' ,
2025-07-19 09:32:10 +08:00
U_CPManageSel in 'U_CPManageSel.pas' {frmCPManageSel} ,
U_YF_Money_LL in 'U_YF_Money_LL.pas' {frmMoney_LL} ,
2025-07-19 14:23:30 +08:00
U_FjList10 in '..\Z99Dependency\ThreeFun\Form\U_FjList10.pas' {frmFjList10} ,
U_CompressionFun in '..\Z99Dependency\ThreeFun\Fun\U_CompressionFun.pas' ,
U_RTFun in '..\Z99Dependency\ThreeFun\Fun\U_RTFun.pas' ,
2025-07-19 09:32:10 +08:00
U_YFFKInput in 'U_YFFKInput.pas' {frmYFFKInput} ;
// U_SelfForm in '..\..\SelfForm\U_SelfForm.pas',
// U_SelExportField in '..\..\SelfForm\U_SelExportField.pas' {frmSelExportField},
// U_SelPrintField in '..\..\SelfForm\U_SelPrintField.pas' {frmSelPrintField},
// U_SelPrintFieldNew in '..\..\SelfForm\U_SelPrintFieldNew.pas' {frmSelPrintFieldNew},
//U_FormPas in '..\CommonPas\formPas\U_FormPas.pas',
//U_CxGridSet in '..\CommonPas\cxgridPas\U_CxGridSet.pas';
//U_RSFormPas in '..\CommonPas\RSCommon\U_RSFormPas.pas';
{$R *.res}
2026-02-12 10:41:08 +08:00
procedure DllEnterPoint( dwReason: DWORD) ; far ; stdcall ;
2025-07-19 09:32:10 +08:00
begin
DLLProc : = @ DLLEnterPoint;
DllEnterPoint( DLL_PROCESS_ATTACH) ;
end ;
procedure DLLUnloadProc( Reason: Integer ) ; register ;
begin
// if (Reason = DLL_PROCESS_DETACH) or (Reason=DLL_THREAD_DETACH) then
// Application:=NewDllApp;
end ;
2026-02-12 10:41:08 +08:00
2025-07-19 09:32:10 +08:00
exports
2026-02-12 10:41:08 +08:00
GetDllForm;
2025-07-19 09:32:10 +08:00
begin
2026-02-12 10:41:08 +08:00
try
NewDllApp : = Application;
DLLProc : = @ DLLUnloadProc;
except
2025-07-19 09:32:10 +08:00
2026-02-12 10:41:08 +08:00
end ;
2025-07-19 09:32:10 +08:00
end .