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) 编辑