formmgr.cpp

邮 电 公 司 erp源码

          hImhInst=LoadLibrary("sdinvent.dll");
          if(hImhInst==NULL)
            throw Exception("装载文件sdinvent.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hImhInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewInventForm=GetProcAddress(hImhInst,"NewClientForm");
          if(NewInventForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewInventForm(FormCode,FormRight);
      case 10802:
        if(hCmhInst==NULL)
        {
          hCmhInst=LoadLibrary("sdcost.dll");
          if(hCmhInst==NULL)
            throw Exception("装载文件sdcost.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hCmhInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewCostForm=GetProcAddress(hCmhInst,"NewClientForm");
          if(NewCostForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewCostForm(FormCode,FormRight);
      case 10801:
        if(hCmdInst==NULL)
        {
          hCmdInst=LoadLibrary("sdcostdoc.dll");
          if(hCmdInst==NULL)
            throw Exception("装载文件sdcostdoc.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hCmdInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewCostDocForm=GetProcAddress(hCmdInst,"NewClientForm");
          if(NewCostDocForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewCostDocForm(FormCode,FormRight);
      case 10901:
        if(hQmdInst==NULL)
        {
          hQmdInst=LoadLibrary("sdqualitydoc.dll");
          if(hQmdInst==NULL)
            throw Exception("装载文件sdqualitydoc.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hQmdInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewQualityDocForm=GetProcAddress(hQmdInst,"NewClientForm");
          if(NewQualityDocForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewQualityDocForm(FormCode,FormRight);
      case 10902:
        if(hQmhInst==NULL)
        {
          hQmhInst=LoadLibrary("sdquality.dll");
          if(hQmhInst==NULL)
            throw Exception("装载文件sdquality.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hQmhInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewQualityForm=GetProcAddress(hQmhInst,"NewClientForm");
          if(NewQualityForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewQualityForm(FormCode,FormRight);
      case 11001:
        if(hFmdInst==NULL)
        {
          hFmdInst=LoadLibrary("sdfnndoc.DLL");
          if(hFmdInst==NULL)
            throw Exception("装载文件sdfnndoc.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hFmdInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewFnnDocForm=GetProcAddress(hFmdInst,"NewClientForm");
          if(NewFnnDocForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewFnnDocForm(FormCode,FormRight);
      case 11002:
        if(hFmhInst==NULL)
        {
          hFmhInst=LoadLibrary("sdfinance");
          if(hFmhInst==NULL)
            throw Exception("装载文件sdfinance.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hFmhInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewFinanceForm=GetProcAddress(hFmhInst,"NewClientForm");
          if(NewFinanceForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewFinanceForm(FormCode,FormRight);
      case 11101:
        if(hPlndInst==NULL)
        {
          hPlndInst=LoadLibrary("sdplandoc.DLL");
          if(hPlndInst==NULL)
            throw Exception("装载文件sdplandoc.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hPlndInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewPlanDocForm=GetProcAddress(hPlndInst,"NewClientForm");
          if(NewPlanDocForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewPlanDocForm(FormCode,FormRight);
      case 11102:
        if(hPlnhInst==NULL)
        {
          hPlnhInst=LoadLibrary("sdplan.dll");
          if(hPlnhInst==NULL)
            throw Exception("装载文件sdplan.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hPlnhInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewPlanForm=GetProcAddress(hPlnhInst,"NewClientForm");
          if(NewPlanForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewPlanForm(FormCode,FormRight);
      case 11202:
        if(hCaphInst==NULL)
        {
          hCaphInst=LoadLibrary("sdcapacity.dll");
          if(hCaphInst==NULL)
            throw Exception("装载文件sdcapacity.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hCaphInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewCapacityForm=GetProcAddress(hCaphInst,"NewClientForm");
          if(NewCapacityForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewCapacityForm(FormCode,FormRight);
      case 11302:
        if(hHmhInst==NULL)
        {
          hHmhInst=LoadLibrary("sdhuman.dll");
          if(hHmhInst==NULL)
            throw Exception("装载文件sdhuman.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hHmhInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewHumanForm=GetProcAddress(hHmhInst,"NewClientForm");
          if(NewHumanForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewHumanForm(FormCode,FormRight);
      case 11301:
        if(hHmdInst==NULL)
        {
          hHmdInst=LoadLibrary("sdmandoc.DLL");
          if(hHmdInst==NULL)
            throw Exception("装载文件sdmandoc.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hHmdInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewHumanDocForm=GetProcAddress(hHmdInst,"NewClientForm");
          if(NewHumanDocForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewHumanDocForm(FormCode,FormRight);
      case 11501:
        if(hEmdInst==NULL)
        {
          hEmdInst=LoadLibrary("sdequipdoc.dll");
          if(hEmdInst==NULL)
            throw Exception("装载文件sdequipdoc.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hEmdInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewEquipDocForm=GetProcAddress(hEmdInst,"NewClientForm");
          if(NewEquipDocForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewEquipDocForm(FormCode,FormRight);
      case 11502:
        if(hEmhInst==NULL)
        {
          hEmhInst=LoadLibrary("sdequipment.dll");
          if(hEmhInst==NULL)
            throw Exception("装载文件sdequipment.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hEmhInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewEquipForm=GetProcAddress(hEmhInst,"NewClientForm");
          if(NewEquipForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewEquipForm(FormCode,FormRight);
      case 11601:
        if(hQryInst==NULL)
        {
          hQryInst=LoadLibrary("sdquery.DLL");
          if(hQryInst==NULL)
            throw Exception("装载文件sdquery.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hQryInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewQueryForm=GetProcAddress(hQryInst,"NewClientForm");
          if(NewQueryForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewQueryForm(FormCode,FormRight);
      case 11701:
        if(hRptInst==NULL)
        {
          hRptInst=LoadLibrary("sdreport.dll");
          if(hRptInst==NULL)
            throw Exception("装载文件sdreport.dll失败!");
          (FARPROC)InitClientModule=GetProcAddress(hRptInst,"InitModuleVar");
          if(InitClientModule==NULL)
            throw Exception("设置模块数据函数失败!");
          InitClientModule(g_IComServer,g_IComResultSet,g_sdRsGoods,g_sdRsGlkm);
          (FARPROC)NewReportForm=GetProcAddress(hRptInst,"NewClientForm");
          if(NewReportForm==NULL)
            throw Exception("设置创建窗体函数失败!");
        }
        return NewReportForm(FormCode,FormRight);
      default:
        throw Exception("该子模块尚未注册!");
    }
  }
  catch(Exception &e)
  {
    throw Exception("创建子模块窗体失败! 错误:"+e.Message);
  }
}