2009年5月24日
摘要: 在这里感谢 “端木飘零”procedure ConvertFeatureClassToShapesFile(pFeatureClass: IFeatureClass; pFilePath, pFileName: string);varpInDataSet, pOutDataSet: IDataSet;pInWorkSpace: IWorkSpace;pInFeatureCl... 阅读全文
posted @ 2009-05-24 14:21 知真道 阅读(2011) 评论(0) 推荐(1) 编辑
  2009年4月3日
摘要: function Annotation4Layer(aeMapControl: TMapControl; pLayer: ILayer; sField: string; pColor: IRgbColor; sWhere: string = ''; iTextSize: SmallInt = 9): Boolean;//带条件的 文字标注 ,指定图层 ,字段,颜色 和 条件表达式 ,文字大小 v... 阅读全文
posted @ 2009-04-03 12:06 知真道 阅读(1495) 评论(1) 推荐(1) 编辑
  2009年3月30日
摘要: //需要引用 printer,windows 单元 function PrintLayoutMap(pPageLayout: TPageLayoutControl): Boolean; var pPrinter: IPrinter; pPaper: IPaper; pPage: IPage; begin if Printer.Printers.Count > 0 then be... 阅读全文
posted @ 2009-03-30 21:29 知真道 阅读(533) 评论(0) 推荐(0) 编辑
摘要: //需要引用 printer,windows 单元 function PrintLayoutMap(pPageLayout: TPageLayoutControl): Boolean; var pPrinter: IPrinter; pPaper: IPaper; pPage: IPage; begin if Printer.Printers.Count > 0 then be... 阅读全文
posted @ 2009-03-30 21:22 知真道 阅读(455) 评论(0) 推荐(0) 编辑
摘要: function FlashElement(aeMapControl: TMapControl; iFlashCount, iInternal: Integer; pColor: IColor; pPoint: IPoint): Boolean; var pEnumElement: IEnumElement; pElement: IElement; pGraphicsContain... 阅读全文
posted @ 2009-03-30 20:39 知真道 阅读(825) 评论(0) 推荐(0) 编辑
  2009年3月27日
摘要: function ProportionalSymbolRenderer(pLayer: ILayer; sField: string; pFrontColor, pBackColor: IColor; iLegendCount: Integer): Boolean; //参数依次为 图形,该图层的某一个字段名称,前景色,背景色,图例分级数量 var pGeoLayer: IGeoFeat... 阅读全文
posted @ 2009-03-27 16:36 知真道 阅读(452) 评论(0) 推荐(0) 编辑
摘要: type UniqueValueType = (uvtFillSymbol, uvtMarkerSymbol); function UniqueValueRenderer(pLayer: ILayer; sField: string; estyle: UniqueValueType; iDotSize: Integer = 25): Boolean; var pGeoLayer: IGeoF... 阅读全文
posted @ 2009-03-27 16:08 知真道 阅读(632) 评论(10) 推荐(0) 编辑
  2009年3月24日
摘要: function InsertImage(pActiveView:IActiveView; pEnvelope: IEnvelope; sBmpFile: string): Boolean; //参数依次为 活动视图(可以是Mapcontrol或PageControl的ActiveView),绘制范围,位图文件名称的全路径 //调用方法 举例 InsertImage(MapControl1.A... 阅读全文
posted @ 2009-03-24 14:08 知真道 阅读(683) 评论(0) 推荐(0) 编辑
  2009年3月22日
摘要: type ChartType = (ctBarChart, ctPieChart, ctStackedChart); //创建柱状 饼状 stacked 专题 //参数依次为 图层,字段集合,专题样式,chart大小,是否垂直放置(默认为否) function ChartRenderer(pLayer: ILayer; sField: TStringList; eChartSyle:... 阅读全文
posted @ 2009-03-22 02:13 知真道 阅读(1173) 评论(1) 推荐(0) 编辑
  2009年3月21日
摘要: function DotDensityRenderer(pLayer: ILayer; sField: string; iDotSize: Integer; pRgbColor: IRgbColor; dDotValue: Double): Boolean; //参数说明 ,按顺序 指定的图层,字段 ,点大小,颜色,每个点代表的值 var pGeoLayer: IGeoFeature... 阅读全文
posted @ 2009-03-21 12:27 知真道 阅读(463) 评论(0) 推荐(0) 编辑