www.gusucode.com > 精典源码Delphi131:某医院HIS管理系统 > 精典源码Delphi131:某医院HIS管理系统/11064某医院HIS管理系统delphi/住院收费工作站/kj/report/source/RMachine_cb6.cpp
#include <vcl.h> #pragma hdrstop USEFORMNS("RM_BarC.pas", Rm_barc, RMBarCodeForm); 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); USEFORMNS("RM_Cross.pas", Rm_cross, RMCrossForm); USEFORMNS("RM_Desgn.pas", Rm_desgn, RMDesignerForm); USEFORMNS("RM_Dict.pas", Rm_dict, RMDictForm); USEFORMNS("RM_DlgExpr.pas", Rm_dlgexpr, RMFormExpressionBuilder); 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); USEFORMNS("RM_e_htm.pas", Rm_e_htm, RMHTMLExportForm); USEFORMNS("RM_e_Jpeg.pas", Rm_e_jpeg, RMJPEGExportForm); 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); 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); 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); USEFORMNS("RM_pgopt.pas", Rm_pgopt, RMPageSetupForm); USEFORMNS("RM_prdlg.pas", Rm_prdlg, RMPrintForm); USEFORMNS("RM_progr.pas", Rm_progr, RMProgressForm); USEFORMNS("RM_PrvDlg.pas", Rm_prvdlg, RMPreviewForm); USEFORMNS("RM_Restr.pas", Rm_restr, RMRestrictionsForm); USEFORMNS("RM_Rich.pas", Rm_rich, RMRichForm); USEFORMNS("RM_rrect.pas", Rm_rrect, RMRoundRectForm); USEFORMNS("rm_RWzDlg.pas", Rm_rwzdlg, rmReportWizardDialog); USEFORMNS("RM_rxrtf.pas", Rm_rxrtf, RMRxRichForm); USEFORMNS("RM_Srch.pas", Rm_srch, RMPreviewSearchForm); USEFORMNS("RM_templ.pas", Rm_templ, RMTemplNewForm); USEFORMNS("RM_vbnd.pas", Rm_vbnd, RMVBandEditorForm); 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); 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); //--------------------------------------------------------------------------- #pragma package(smart_init) //--------------------------------------------------------------------------- // Package source. //--------------------------------------------------------------------------- int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void*) { return 1; } //---------------------------------------------------------------------------