library CYMD; uses SysUtils, classes, forms, WinTypes, WinProcs, U_GetDllForm in 'U_GetDllForm.pas', U_RTFun in '..\..\..\RTFunAndForm\Fun\U_RTFun.pas', U_ModuleNote in 'U_ModuleNote.pas' {frmModuleNote}, U_DataLink in 'U_DataLink.pas' {DataLink_CYMD: TDataModule}, U_KHList in 'U_KHList.pas' {frmKHList}, U_ZDYHelpSel in 'U_ZDYHelpSel.pas' {frmZDYHelpSel}, U_iniParam in 'U_iniParam.pas', U_ZDYHelp in 'U_ZDYHelp.pas' {frmZDYHelp}, U_GYSSelList in 'U_GYSSelList.pas' {frmGYSSelList}, U_DJBRKList in 'U_DJBRKList.pas' {frmDJBRKList}, U_DJBCKInPut in 'U_DJBCKInPut.pas' {frmDJBCKInPut}, U_ZdyAttachGYS in 'U_ZdyAttachGYS.pas' {frmZdyAttachGYS}, U_BPShengChanListSel in 'U_BPShengChanListSel.pas' {frmBPShengChanListSel}, U_DJBCKOutPut in 'U_DJBCKOutPut.pas' {frmDJBCKOutPut}, U_ShaKCList in 'U_ShaKCList.pas' {frmShaKCList}, U_DJBCKOutList in 'U_DJBCKOutList.pas' {frmDJBCKOutList}, U_WJGCKKCList in 'U_WJGCKKCList.pas' {frmWJGCKKCList}, U_DJBCKKCList in 'U_DJBCKKCList.pas' {frmDJBCKKCList}, U_ZdyAttachCP in 'U_ZdyAttachCP.pas' {frmZdyAttachCP}, U_ShaRKList in 'U_ShaRKList.pas' {frmShaRKList}, U_ShaOutList in 'U_ShaOutList.pas' {frmShaOutList}, U_ShaKCSelList in 'U_ShaKCSelList.pas' {frmShaKCSelList}, U_ShaOutPut in 'U_ShaOutPut.pas' {frmShaOutPut}, U_ShaRKInPut in 'U_ShaRKInPut.pas' {frmShaRKInPut}, U_CYBCPCKInPut in 'U_CYBCPCKInPut.pas' {frmCYBCPCKInPut}, U_ProductOrderMainListOneSel in 'U_ProductOrderMainListOneSel.pas' {frmProductOrderMainListOneSel}, U_SXCKOutList in 'U_SXCKOutList.pas' {frmSXCKOutList}, U_CYPBCKOutPutW in 'U_CYPBCKOutPutW.pas' {frmCYPBCKOutPutW}, U_CYPBCKKCSelList in 'U_CYPBCKKCSelList.pas' {frmCYPBCKKCSelList}, U_PBCKKCList in 'U_PBCKKCList.pas' {frmPBCKKCList}, U_WJGMDList in 'U_WJGMDList.pas' {frmWJGMDList}, U_WJGCKInPut in 'U_WJGCKInPut.pas' {frmWJGCKInPut}, U_WJGCKOutList in 'U_WJGCKOutList.pas' {frmWJGCKOutList}, U_WJGCKKCSelList in 'U_WJGCKKCSelList.pas' {frmWJGCKKCSelList}, U_WJGCKOutPut in 'U_WJGCKOutPut.pas' {frmWJGCKOutPut}, U_DJBCKKCSelList in 'U_DJBCKKCSelList.pas' {frmDJBCKKCSelList}, U_CYBCPCKList in 'U_CYBCPCKList.pas' {frmCYBCPCKList}; {$R *.res} procedure DllEnterPoint(dwReason: DWORD);far;stdcall; 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; exports GetDllForm; begin try NewDllApp:=Application; DLLProc := @DLLUnloadProc; except end; end.