mapdll.dpr

来自「此代码是关于mapgis的在」· DPR 代码 · 共 77 行

library MapDLL;

{ Important note about DLL memory management: ShareMem must be the
  first unit in your library's USES clause AND your project's (select
  Project-View Source) USES clause if your DLL exports any procedures or
  functions that pass strings as parameters or function results. This
  applies to all strings passed to and from your DLL--even those that
  are nested in records and classes. ShareMem is the interface unit to
  the BORLNDMM.DLL shared memory manager, which must be deployed along
  with your DLL. To avoid using BORLNDMM.DLL, pass string information
  using PChar or ShortString parameters. }

uses
  SysUtils,
  Classes,
  UnitMainForm in 'UnitMainForm.pas' {Form_Main},
  MapXContainer in 'PublicUtils\MapXContainer.pas',
  UnitProjectOptions in 'UnitProjectOptions.pas' {Form_ProjectOptions},
  UnitEagleEye in 'UnitEagleEye.pas' {FrmEagleEye},
  UnitNavigation in 'UnitNavigation.pas' {FrmNavigation},
  TrackDraw in 'TrackDraw.pas',
  AppCmdCtrl in '..\..\Delphi库\MyUnits for Delphi7\AppCmdCtrl.pas',
  UnitFeatureClass in 'UnitFeatureClass.pas' {Form_FeatureClass},
  UnitSaveAs in 'UnitSaveAs.pas' {Form_SaveAs},
  BusinessDialogs in '..\..\Delphi库\MyUnits for Delphi7\BusinessDialogs.pas',
  UnitDMLinks in 'UnitDMLinks.pas' {dm_Links: TDataModule},
  UnitMainLinkObjects in 'UnitMainLinkObjects.pas' {dm_MainLinkObjects: TDataModule},
  UnitProject in 'UnitProject.pas',
  UnitLayerControl in 'UnitLayerControl.pas' {Form_LayerControl},
  UnitLayerInfo in 'UnitLayerInfo.pas' {Form_LayerInfo},
  frmTableDesigner in '..\..\工程\TableDesigner\CTRL\frmTableDesigner.pas' {Form_TableDesigner},
  LogicalTableStructExecuter in '..\..\Delphi库\MyUnits for Delphi7\LogicalTableStructExecuter.pas',
  MapXDrv in 'PublicUtils\MapXDrv.pas',
  StreamIOAPIs in '..\..\Delphi库\MyUnits for Delphi7\StreamIOAPIs.pas',
  OLEDataStore in '..\..\Delphi库\MyUnits for Delphi7\OLEDataStore.pas',
  GlobalUtils in '..\..\工程\TableDesigner\CTRL\GlobalUtils.pas',
  UnitFeatureConfig in 'UnitFeatureConfig.pas' {Form_FeatureConfig},
  UnitRecords in 'UnitRecords.pas' {Frame_Records: TFrame},
  MapXBase in 'PublicUtils\MapXBase.pas',
  MapXAPIs in 'PublicUtils\MapXAPIs.pas',
  UnitSearch in 'UnitSearch.pas' {Frame_Search: TFrame},
  MapXStyles in 'PublicUtils\MapXStyles.pas',
  MapXTools in 'PublicUtils\MapXTools.pas',
  MapXAdvance in 'PublicUtils\MapXAdvance.pas',
  UnitMapCoordSys in 'UnitMapCoordSys.pas' {Form2},
  UnitDrawShape in 'UnitDrawShape.pas' {Frame_DrawShape: TFrame},
  MapXMessages in 'PublicUtils\MapXMessages.pas',
  UnitMapXShapePropDialog in 'UnitMapXShapePropDialog.pas' {CustomMapXShapeDialog},
  UnitMapXShapeMultiPagePropDialog in 'UnitMapXShapeMultiPagePropDialog.pas' {MapXShapeMultiPagePropDialog},
  UnitMapXShapeBusinessFrame in 'UnitMapXShapeBusinessFrame.pas' {MapXShapeBusinessFrame: TFrame},
  UnitProjectTools in 'UnitProjectTools.pas',
  UnitLineInfo in '七厂实例\UnitLineInfo.pas' {Form_LineInfo},
  UnitPowerInfo in '七厂实例\UnitPowerInfo.pas' {Form_PowerInfo},
  Global in 'Global.pas',
  UnitChooseSDLine in '七厂实例\UnitChooseSDLine.pas' {Form_ChooseSDLine},
  DLControl in '七厂实例\DLControl.pas',
  UnitUpLoad in 'UnitUpLoad.pas' {Form_UpLoad},
  UnitDownLoad in 'UnitDownLoad.pas' {Form_DownLoad},
  UnitDLLCall in 'UnitDLLCall.pas';

{$R *.res}

exports
  IsReportDesignerExists,
  CreateReportDesigner,
  SetReportDesignerParent,
  ShowReportDesigner,
  HideReportDesigner,
  ReportDesignerReAlign,
  DestroyReportDesigner,
  ConnectToDataBase,
  SendSQLText,
  SetOwnerSQL;
  
begin
end.