www.gusucode.com > 精典源码Delphi131：某医院HIS管理系统 > 精典源码Delphi131：某医院HIS管理系统/11064某医院HIS管理系统delphi/住院收费工作站/kj/report/source/RMachine_cb5.cpp

    //---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
USERES("RMachine_cb5.res");
USEUNIT("RM_reg.pas");
USERES("RM_reg.dcr");
USEPACKAGE("vcl50.bpi");
USEPACKAGE("vclsmp50.bpi");
USEPACKAGE("vcldb50.bpi");
USEPACKAGE("vclbde50.bpi");
USEPACKAGE("vcljpg50.bpi");
USEPACKAGE("tee50.bpi");
USEPACKAGE("vclib50.bpi");
USEPACKAGE("dss50.bpi");
USEPACKAGE("vclado50.bpi");
USEPACKAGE("dsnide50.bpi");
USEPACKAGE("vclx50.bpi");
USEUNIT("RMD_RptExp.pas");
USEUNIT("RM_AngLbl.pas");
USEFORMNS("RM_BarC.pas", Rm_barc, RMBarCodeForm);
USEUNIT("RM_BarCode.pas");
USEFORMNS("RM_bnded.pas", Rm_bnded, RMBandEditorForm);
USEFORMNS("RM_btyp.pas", Rm_btyp, RMBandTypesForm);
USEFORMNS("RM_CalcEditor.pas", Rm_calceditor, RMCalcMemoEditorForm);
USEFORMNS("RM_chart.pas", Rm_chart, RMChartForm);
USEUNIT("RM_chbox.pas");
USEUNIT("RM_ChineseMoneyMemo.pas");
USEUNIT("RM_class.pas");
USEUNIT("RM_CmpReg.pas");
USEUNIT("RM_common.pas");
USEUNIT("RM_Const.pas");
USEUNIT("RM_Const1.pas");
USEFORMNS("RM_Cross.pas", Rm_cross, RMCrossForm);
USEUNIT("RM_DBCtrls.pas");
USEUNIT("RM_dbrel.pas");
USEUNIT("RM_DBSet.pas");
USEUNIT("RM_DCtrl.pas");
USEFORMNS("RM_Desgn.pas", Rm_desgn, RMDesignerForm);
USEFORMNS("RM_Dict.pas", Rm_dict, RMDictForm);
USEFORMNS("RM_DlgExpr.pas", Rm_dlgexpr, RMFormExpressionBuilder);
USEUNIT("RM_DSet.pas");
USEFORMNS("RM_dsopt.pas", Rm_dsopt, RMDesOptionsForm);
USEFORMNS("RM_e_bmp.pas", Rm_e_bmp, RMBMPExportForm);
USEFORMNS("RM_e_csv.pas", Rm_e_csv, RMCSVExportForm);
USEFORMNS("RM_e_emf.pas", Rm_e_emf, RMEMFExportForm);
USEFORMNS("RM_e_gif.pas", Rm_e_gif, RMGIFExportForm);
USEUNIT("RM_e_Graphic.pas");
USEFORMNS("RM_e_htm.pas", Rm_e_htm, RMHTMLExportForm);
USEFORMNS("RM_e_Jpeg.pas", Rm_e_jpeg, RMJPEGExportForm);
USEUNIT("RM_e_main.pas");
USEFORMNS("RM_e_pdf.pas", Rm_e_pdf, RMPDFExportForm);
USEFORMNS("RM_e_rtf.pas", Rm_e_rtf, RMRTFExportForm);
USEFORMNS("RM_e_txt.pas", Rm_e_txt, RMTXTExportForm);
USEFORMNS("RM_E_WMF.pas", Rm_e_wmf, RMWMFExportForm);
USEFORMNS("RM_Edit.pas", Rm_edit, RMEditorForm);
USEFORMNS("RM_flds.pas", Rm_flds, RMFieldsForm);
USEFORMNS("RM_flds1.pas", Rm_flds1, RMInsFieldsForm);
USEFORMNS("RM_fmted.pas", Rm_fmted, RMFmtForm);
USEUNIT("RM_FormReport.pas");
USEFORMNS("RM_FrameProp.pas", Rm_frameprop, RMFormFrameProp);
USEFORMNS("RM_gedit.pas", Rm_gedit, RMGEditorForm);
USEFORMNS("RM_grped.pas", Rm_grped, RMGroupEditorForm);
USEFORMNS("RM_hilit.pas", Rm_hilit, RMHilightForm);
USEFORMNS("RM_iflds.pas", Rm_iflds, RMInsertFieldsForm);
USEFORMNS("RM_Insp.pas", Rm_insp, RMInspForm);
USEUNIT("RM_Intrp.pas");
USEFORMNS("RM_ledit.pas", Rm_ledit, RMLinesEditorForm);
USEFORMNS("RM_Newrp.pas", Rm_newrp, RMTemplForm);
USEFORMNS("RM_ole.pas", Rm_ole, RMOleForm);
USEFORMNS("RM_PageF.pas", Rm_pagef, RMPageForm);
USEUNIT("RM_Pars.pas");
USEUNIT("RM_PdcsGrid.pas");
USEUNIT("RM_PEhGrid.pas");
USEFORMNS("RM_pgopt.pas", Rm_pgopt, RMPageSetupForm);
USEFORMNS("RM_prdlg.pas", Rm_prdlg, RMPrintForm);
USEUNIT("RM_prntr.pas");
USEFORMNS("RM_progr.pas", Rm_progr, RMProgressForm);
USEFORMNS("RM_PrvDlg.pas", Rm_prvdlg, RMPreviewForm);
USEUNIT("RM_PRxCtls.pas");
USEUNIT("RM_PwwGrid.pas");
USEFORMNS("RM_Restr.pas", Rm_restr, RMRestrictionsForm);
USEFORMNS("RM_Rich.pas", Rm_rich, RMRichForm);
USEUNIT("rm_RptWiz.pas");
USEFORMNS("RM_rrect.pas", Rm_rrect, RMRoundRectForm);
USEFORMNS("rm_RWzDlg.pas", Rm_rwzdlg, rmReportWizardDialog);
USEFORMNS("RM_rxrtf.pas", Rm_rxrtf, RMRxRichForm);
USEUNIT("RM_shape.pas");
USEFORMNS("RM_Srch.pas", Rm_srch, RMPreviewSearchForm);
USEFORMNS("RM_templ.pas", Rm_templ, RMTemplNewForm);
USEUNIT("RM_Utils.pas");
USEFORMNS("RM_vbnd.pas", Rm_vbnd, RMVBandEditorForm);
USEUNIT("RM_View.pas");
USEUNIT("rm_Wizard.pas");
USEFORMNS("RM_wwrtf.pas", Rm_wwrtf, RMwwRichForm);
USEFORMNS("RMD_ADO.pas", Rmd_ado, RMDFormADOConnEdit);
USEFORMNS("RMD_BDE.pas", Rmd_bde, RMDFormBDEDBProp);
USEFORMNS("RMD_DataPrv.pas", Rmd_dataprv, RMDFormPreviewData);
USEFORMNS("RMD_DBFldEditor.pas", Rmd_dbfldeditor, RMDFieldsEditorForm);
USEFORMNS("RMD_DBFldList.pas", Rmd_dbfldlist, RMDFieldsListForm);
USEFORMNS("RMD_DBNewLookup.pas", Rmd_dbnewlookup, RMDLookupFieldForm);
USEUNIT("RMD_DBWrap.pas");
USEFORMNS("RMD_Dbx.pas", Rmd_dbx, RMDFormDbxDBProp);
USEFORMNS("RMD_ExpFrm.pas", Rmd_expfrm, RMDFormReportExplorer);
USEFORMNS("RMD_IBX.pas", Rmd_ibx, RMDFormIBXPropEdit);
USEFORMNS("RMD_md.pas", Rmd_md, RMDFieldsLinkForm);
USEFORMNS("RMD_Qblnk.pas", Rmd_qblnk, RMDFormQBLink);
USEFORMNS("RMD_QryDesigner.pas", Rmd_qrydesigner, RMDQueryDesignerForm);
USEFORMNS("RMD_QueryParm.pas", Rmd_queryparm, RMDParamsForm);
USEFORMNS("RM_about.pas", Rm_about, RMFormAbout);
USEPACKAGE("vclmid50.bpi");
//---------------------------------------------------------------------------
#pragma package(smart_init)
//---------------------------------------------------------------------------

//   Package source.
//---------------------------------------------------------------------------

#pragma argsused
int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void*)
{
	return 1;
}
//---------------------------------------------------------------------------