MapX常见问题解答
mapgis 6.x常见问题

问题:1、输入编辑图时,1:1(复位窗口)刷新,图不在窗口内。
答:窗口内有一个大坐标与小坐标所致。
线与区文件相差10倍。
2、点文件:子图地理位置(XY坐标值)如何生成属性?如何生成文本文件?答:投影变换:1、工具/点位转换属性。
2、工具/属性生成文本文件。
3、线文件:线地理位置如何显示坐标?如何生成文本文件?答:1、输入编辑:设置/参数设置。
2、文件转换:输出/输出MAPGIS明码格式。
4、根据属性赋参数?答:输入编辑:(举例--区文件)区编辑/根据属性赋参数.5、根据参数赋属性?答:输入编辑:(举例--区文件)区编辑/根据参数赋属性.6、高程赋值---矢量化?答:输入编辑:线文件建属性结构,矢量化/设置高程参数/交互矢量化---按F4,输入高程值。
7、矢量数据地形图如何自动生成剖面图?答:DTM分析:文件/打开数据文件/线数据文件//添加数据文件(剖面线文件);模型应用/高程剖面分析/分析指定线.8、影像数据与矢量数据叠加管理?答:地图库中实现。
9、如何将矢量数据内插等高线?答:需进行二次开发。
10、工程文件如何校正?答:在误差校正系统中对点、线、面矢量数据校正即可。
11、跨带图幅如何处理?答:投影变换:投影转换/进行投影变换。
37带中央经线为111度图幅与38带中央经线114度图幅相对空间位置重叠12、如何准确求面积?答:投影变换:投影转换/求区域实地面积.13、如何快速查找点、线、区文件中的某些要素?答:空间分析:检索、条件检索。
14、如何量出图中某一直线的角度?答:输入编辑:其他/整图变换/键盘输入参数。
15、造区有多种方法可以使用,他们各自有何特点?如基线造区、图形造区、拓扑重建。
答:输入编辑:现在的版本基线造区功能已经去掉;图形造区不能为分析服务,不具备拓扑功能;16、如何实现某一条线的旋转?就如旋转某一个点的方便快捷?17、在编辑中为何点圆圈填充的花纹、颜色看不清?18、如何实现GPS数据输入及转换?答、可在投影变换模块及数字测图模块中实施。
MapX4.0中存在的问题及查询性能研究

Ke od : S Ma X sf r;cmp n n ; p t l bet po et ; u r yw r s GI ; p t e o o e t sai jc; rp r q ey o wa ao y
地理信息系统 ( ega h f mao y— G o r i I o t nS s p cn r i
s se wa ic se .S mutn i y tm sdsu s d i l et a y,t ep a t a r be fp o et u r t a X 0 we ep itd h rci l o lmso r p ryq e ywihM p 4. r ne c p o o t n h o cees h m efrs lig t eep o lmswa l u g se . u ,a d t ec n rt c e ovn h s r be sas s g etd o o
维普资讯
第2 卷 第 2 8 期
200 6年 4 月
学
报
V0.8 o2 1 N . 2
J u n l fS e y n iest f c n lg o r a h n a g Unv riyo h oo y o Te
上的 G S功能组件嵌入到通用软件开发平台中, I 从而能够兼顾软件开发平 台的优 良特性和地理信
息 系统 的功 能 . 件式 具有 开 发速 度快 , 组 占用资 源
t s简称 G S 是 地学 、 e , m I) 计算机科学及信息科学
相融合的产物 , 它以地理空间数据库为基础 , 在计 算机软硬件的支持下对空 间相关数据进行采集 、 管理 、 操作、 分析 、 模拟和显示 , 能够展现多种空间 和动态的资源和环境信息 , 现已在土地管理 、 各种 资源清查 、 环境监测与管理 、 房地产 、 电力等多种
MAPGIS常见问题集锦

MapGis6.X操作技巧汇总1 、输入编辑模块中,新建工程背景为黑色?⑴、本地窗口,单击设置/选择背景颜色,在弹出的对话框中,选择灰色;⑵、右键单击“复位窗口”,背景恢复为灰色;2 、把“公路”错画到“河流层”里,如何将它改到“公路”层?法一:⑴、利用“输入编辑”子系统,“其它”菜单下的剪切,粘贴等命令;法二:⑴、“河流层”里的“公路”,在“修改线参数”对话框中,修改其所在层;⑵、工程管理窗口,单击“公路”文件,右键“根据图层分离文件”将分离出来的文件和原铁路文件,右键“合并所选项”;3 、在MAPGIS中,如何同时输出三幅图?⑴、在输出子系统中,用新建“拼版文件”,依次装入要输出的工程文件,在依次调整其输出参数;4 、如何将矢量化后的图形文件上载到SQL Server数据库中?⑴、新建空库:首先在SQL Server的数据库中,新建一个用来上载图形数据的空库aa;⑵、新建一个“等高线”线文件,赋以“高程”属性字段;⑶、新建数据源:在控制面板\管理工具\数据源,添加和SQL Server连接的数据源bb,注意连接的数据库选择aa;⑷、配置数据源:在MAPGIS主界面中,点击“设置”按钮,数据源类型选择“网络数据源”,然后点击“配置数据源”按钮,添加上步新建的数据源bb,测试数据源,确定,在主界面上,将缺省数据源设置为bb;⑸、接下来则有3条路可走:①、在输入编辑中,单击标题栏中的“打开工程或文件”按钮,在弹出的对话框下部文件类型中选择“图形文件”,而非“工程文件”,这样打开了一个点或线或面文件,单击菜单栏“工作区/换名存文件/换名存线文件”,在弹出的对话框的下部“网路数据”前打√,数据源选择bb,单击保存,完成;②、在输入编辑中,新建一工程,在左边工程管理窗口中,右键添加项目,将待上载的点或线或面文件打开,然后选择该文件,右键菜单选择“另存项目”,在弹出的对话框的下部“网路数据”前打√,数据源选择bb,单击保存,完成;③、打开属性库管理子系统,在文件\装入线文件,将第二步新建的“等高线”文件打开,然后单击文件\上载数据,在弹出的对话框的下部“网路数据”前打√,数据源选择bb,单击保存,完成;⑹、要注意的地方:①、待入库的点线面文件的名字不能以数字为开头;②、如果点线面文件已经如果库了,无论是否将其删除,再将其入库时,系统都会提示错误,或者出现数据丢失的现象,解决的方法,是将待入库的文件名字重命名即可;5 、用户提供了线文件,在输入编辑中打开,却看不到,会有那些原因?⑴、没有复位更新;⑵、线的颜色和窗口的背景色相同了;⑶、被别的地物如区文件遮住了;⑷、符号库中没有该条线的颜色;6、如何将*wb格式的数据导入到Excel或Access中去?⑴、新建一Excel或Access表;⑵、配置数据源:这里需注意的地方就是对数据源命名后,单击“选择工作簿”按钮,然后将数据源与上步新建的Excel文件连接起来;⑶、打开属性库/文件/导出,单击“打开”按钮,将系统自带的*wb表打开(在D:\mapgis67\sample 文件下),然后在下面的数据源中选择上步新建配置的数据源,并在表格名称对话框中对生成的表格命名,单击“导出”按钮;⑷、查看结果:打开Excel表,在最下面的sheet1/sheet2/sheet3后面可以看到我们导出的表文件;7、将图形文件的属性导入的Excel或Access表中与此类似⑴、在属性库/文件/装入线文件,然后打开属性/输入属性;⑵、下面的步骤和问题6的操作步骤基本类似;8、镶嵌融合的过程应有这样几种认识⑴、所有的栅格影像都是没有坐标点的;⑵、影像的镶嵌融合最关键的是波段的融合;⑶、其处理精度和非标准分幅的处理结果精度都可以,关键是看用途是什么;9、误差校正中,选择采集文件时,为什么一个是点文件(方里网.wt),一个则是线文件(标准.wl)?自动采集控制点:如果将线文件内的所有线交点都作为控制点,则选择该功能,系统自动搜索当前所选文件内所有的交点值,并将其作为控制点的实际值或理论值。
第一章MapX 入门

第一章MapX 入门概述MapInfo MapX是一个用来做地图化工作的OCX控件,它可以很容易地在您的应用程序中加入强大的制图功能。
它可以把您的数据用地图的形式显示出来,更易于理解。
地图形式可以比简单的图表、图形提供更多的信息,而且描述地图比描述数据表更加简单迅速。
本章主要对mapx 的安装和在编程语言中的使用进行讲解。
第一节 MapX 入门MapX是一个提供给应用程序开发人员的工具。
它提供了一个最简单和最节约成本的方法,用来将地图化功能嵌入到新的和现有的应用中。
MapX是一个OCX组件,可以被快速集成到使用Visual Basic、PowerBuilder、Delphi、Visual C++或其他面向对象的语言的客户端应用程序以及使用Lotus Script的Lotus Notes (v4.5)中。
开发人员可以在他们熟悉的环境中工作,最终用户可以通过他们熟悉的应用程序来访问地图数据。
通过MapX,可以完全按照您的意愿在应用程序中加入强大的制图功能。
您可以按点、按专题渲染区域、按饼图或直方图等等来显示数据。
启用MapX的分析功能,可以分组和组织数据、执行搜索或在一个指定的半径、矩形区域或指定的点的周围选择地图图元。
例如,MapX能够显示哪一分店最接近您最大的客户,可以计算客户和商店之间的距离;还可以显示去年花销最大的客户;并按销售额给表示商店的符号进行颜色编码。
所有这些结合在一起就是您的数据在地图上的直观显示。
第二节MapX 的功能概述MapX不仅仅是一个“地图浏览器”。
通过MapX,可以分析并直观地显示业务数据,创建或编辑地图图元,并按地理位置显示数据结果。
MapX的主要功能如下:•专题制图—使用专题制图显现数据。
联合数据和地图中的每个图元,并在地图中用颜色编码(或其他样式)来表示数据。
可使用六种不同的样式来观察数据(色彩范围、点密度、独立值、等级符号、饼图、直方图)。
•逐层细化制图—可以通过简单的定点和单击来浏览数据,在OLAP/DSS环境下,可以允许用户通过定点和单击逐层细化地图的某个区域。
mapx学习笔记资料手册

MAPX学习使用笔记资料Mapxtreme 下面应该有三种图层一种是固定图层当你新建一个固定图层的时候会生成*.tab等文件一种是临时图层不生成*.tab文件一种是用户绘制图层用户自己使用CDC(Graphics)进行绘图如果你想对多边形进行编辑至少你要响应Mapxtreme的鼠标事件通过鼠标事件来确定当前用户在进行何种操作。
一般的过程是这样的:1.新建一个图层(建议临时图层或者用户绘制图层)2.根据多边形的点的位置绘制图元或者用CDC绘制过变形同时确定各个点在Mapxtreme地图窗口的位置建立各个点的鼠标响应区域3.通过鼠标落下的时候通过各个点的响应区域判断那个点被选中鼠标移动和抬起时要做响应的处理来改变多边形选中点的位置重重新给多边形的点赋值如果使用临时图层需要对临时图层里面的多边形图元的点参数进行更改如果是CDC绘图的话只要更改CDC绘图即可整个过程中需要考虑到地图坐标与Mapxtreme窗口坐标之间的转化。
{通过对象编辑工具,用户可以在地图图层中创建和修改图元。
有四种标准的对象创建工具:“添加点”、“添加线条”、“添加折线”和“添加区域”。
注:若要设置所使用的工具,请设置Map.CurrentTool 属性。
对象编辑工具将新图元添加到在Layers.InsertionLayer 属性中指定的任何图层中。
只能有一个插入图层,并且默认情况下是没有插入图层。
在没有任何插入图层时将当前工具设置为对象创建工具将导致错误。
MapX 还支持对现有地图图元的修改。
若要编辑图元,则对于您要更改的任何图层,必须将Layer.Editable 属性设置为真。
然后,可以使用内置的“箭头”工具,在当前选择中移动图元或调整图元的大小。
若要移动选定图元,只需单击并在选}lyrnew:CMapxLayer;ds: CMapxDataset;rvs: CMapxRowvalues;rv: CMapxRowvalue;ptNew: CMapXpoint;ftrNew: CmapXFeature;beginlyrNew := yers.item(1);ds := Map1.Datasets.Add(miDataSetLayer, lyrNew,emptyparam,emptyparam,emptyparam,emptypara m,emptyparam,emptyparam);//rvs := ds.Rowvalues[1].Clone ;rv:= CoRowvalue.Create;rvs:=CoRowvalues.Create;rv.Dataset:=ds;rv.Field:=ds.Fields.Item(1); //假设mi表有两个字段,填充之rv.value :='item1';rvs.Add(rv);rv.Field:=ds.Fields.Item(2);rv.value :='item2';rvs.Add(rv);ptNew:=CoPoint.Create;ptNew.Set_(map1.centerx, map1.centery);ftrNew := map1.FeatureFactory .CreateSymbol(ptNew,emptyparam);ftrNew := lyrNew.AddFeature(ftrNew, rvs); // 图元+属性,即feature+Rowvalues//ftrNew = lyrNew.AddFeature(ftrNew);//ftrNew.Update (True, rvs);end.作者/收集者:zlx开发环境:Delphi + MapX代码:MapX图元分三种类型:1、线(Line),即miFeatureTypeLine2、区域(Region),即miFeatureTypeRegion3、点符号(Symbol),即miFeatureTypeSymbol加入一个时钟控件,并在时钟控件中实现以下代码:procedure TMapFrm.tmFlashSelectTimer(Sender: TObject);varft: CMapXFindFeature;lyr: CMapXLayer;bExist: Boolean;i: Integer;str: String;ds: CMapXDataset;beginbExist := False;for i := 1 to yers.Count dobeginif yers.Item[i].Name = m_strSelLyr thenbeginbExist := True;break;end;end;if not bExist thenbegintmFlashSelect.Enabled := False;MsgFrm := TMsgFrm.Create(Self);MsgFrm.m_strMsg := Format('图层[%s]信息不存在!',[m_strSelLyr]);MsgFrm.ShowModal;MsgFrm.Free;Exit;end;lyr := yers._Item(m_strSelLyr);ds := mapCity.Datasets.Add(miDataSetLayer, lyr ,EmptyParam, EmptyParam, EmptyParam, EmptyPa ram,EmptyParam, EmptyParam);lyr.Find.FindDataset := ds;lyr.Find.FindField := ds.Fields.Item[1];str := Format('%d',[m_nSelID]);ft := lyr.Find.Search(str,EmptyParam);if ft.FindRC mod 10 <> 1 thenbegintmFlashSelect.Enabled := False;MsgFrm := TMsgFrm.Create(Self);MsgFrm.m_strMsg := Format('单位点[%s]信息不存在!',[m_strCorpName]);MsgFrm.ShowModal;MsgFrm.Free;Exit;end;case ft.type_ ofmiFeatureTypeLine:beginif ft.Style.LineColor = miColorWhite then ft.Style.LineColor := miColorRedelseft.Style.LineColor := miColorWhite;end;miFeatureTypeRegion:beginif ft.Style.RegionColor = miColorGreen then ft.Style.RegionColor := miColorRedelseft.Style.RegionColor := miColorGreen;end;miFeatureTypeSymbol:beginif not m_bFlashSel thenlyr.Selection.Replace(ft)elselyr.Selection.ClearSelection;m_bFlashSel := not m_bFlashSel;end;end;ft.Update(EmptyParam, EmptyParam);if not m_bCenter thenbeginm_bCenter := True;mapCity.CenterX := ft.CenterX;mapCity.CenterY := ft.CenterY;mapCity.Refresh;end;end;我这里是把选中的图元实现闪烁,并把图元居中实现图元闪烁的另一个方法:假设图元原大小是20,改变后大小是15if ft.Style.SymbolBitmapSize=20 thenft.Style.SymbolBitmapSize:=15elseft.Style.SymbolBitmapSize:=20;ft.Update(EmptyParam, EmptyParam);ft是symbol类型的代码名称:画多边形、直线1,画多边形,画线procedure TForm1.Map1PolyToolUsed(Sender: TObject; ToolNum: Smallint; Flags: I nteger; const Points: IDispatch;bShift, bCtrl: WordBool; var EnableDefault: WordBool);varStyle: CMapXStyle;f: CMapXFeature;begincase Flags ofmiPolyToolBegin: ;{ 某些用户开始使用 PolyTool.. }miPolyToolEnd:{ 用户通过双击完成 PolyTool 的使用 }if ToolNum = MY_POLYGON_TOOL thenbegin{ 它们使用 MY_POLYGON_TOOL!制作新的区域图元并将其添加到第一个图层 }Style := Map1.DefaultStyle.Clone;Style.RegionPattern := miPatternSolid;Style.RegionColor := 255;Style.RegionBorderColor := 0;Style.RegionBorderWidth := 2;Style.RegionBorderStyle := 1;{ 使用由事件为我提供的点。
GIS应用开发_MAPX1_

MapX的缺陷
MapX 控件仍存在一些功能欠缺和不成熟之处:
与专业化的GIS客户端软件相比,效率相对低下。
支持的空间数据量有限,无法直接操作除 MapInfo格式之外的数据,更适合中小型的GIS应 用开发。 功能有限,只覆盖了GIS系统的部分功能,限制 了其在特殊领域的应用。
MapX 的对象模型结构
4 GeoDictionary 管理器
Geodictionary进行管理的程序可用于在数 据绑定或创建专题地图时将外部数据源与一地图 图层匹配。 在GeoSet Manager中运行 GeoDictionary Manager先注册Tab文件, 再指定哪些图层可以匹配及哪些字段用于匹配。 用于匹配的字段须是可索引的字段(在MapInfo 图表文件维护->图表文件结构中设置)。 没有 必要将每个表都注册。
2. 逐层细化制图 — 可以通过简单的定点和单击来 浏览数据,在OLAP/DSS(联机事务处理/决策支持 系统)环境下,可以允许用户通过定点和单击逐层细 化地图的某个区域。
3. 数据绑定 — 地图可合并来自嵌套OCX的容器、 ODBC或DAO数据源(例如MS Access)的数据。 MapX提供多种不同类型数据的绑定,包括邮政编码 级别的地理编码。
MapX的对象模型是分层的树状结构。位于最顶 层的是MapX对象,每一个MapX的对象、属性 和方法都从Map对象派生而来。一般来说Map 对 象 是 靠 数 据 集 对 象 DataSets 、 图 层 对 象 Layers和注释对象Annotations三者来定义 的。
MapX组件的部分模型结构
当MapX需要在数据和地图之间指定某个匹 配时,该匹配是通过称为自动匹配/自动绑定的 处理过程来确定的。如要利用自动匹配/自动绑 定,首先必须在GeoDictionary中注册地图。 一旦将数据和地图绑定,就可以看到相关的地理 化信息。
MapX学习基本教程

Flds.AddStringField "ID", 12 Flds.AddStringField "Name", 50 Flds.AddNumericField "Deptch", 12, 2 Flds.AddIntegerField "Length"
′ LayerInfo.Type = miLayerInfoTypeNewTable LayerInfo.AddParameter "FileSpec", FilePath + "" + FileName LayerInfo.AddParameter "NAME", LayerName LayerInfo.AddParameter "Fields", Flds
单独修改某个图元的样式:SET Ftr.Style=NewStyle,再用 Update 即可 2、 创建一个线矩形 Dim Pnts AS MapXLib.Points
MapGIS6X常见问题及解答(分模块)

MapGIS6X常见问题及解答(分模块)ID版本类别功能模块MapGis6.x USB加密狗安装要点MapGis6.x服务启动不了MapGis6.x系统库文件MapGis6.x 关于主菜单的“设置”MapGis6.x系统目录设置MapGis6.x QQ插件与MapGIS 冲突MapGis6.x服务启不来MapGis6.xMapGis6.x 数据库配置连接问题MapGis6.x找不到加密狗MapGis6.x找不到加密狗MapGis6.xMapGis6.x找不到加密狗MapGis6.xMapGis6.x找不到加密狗MapGis6.x找不到加密狗MapGis6.x安装光盘MapGis6.x安装使用数据上载到数据库MapGis6.x非系统文件MapGis6.x非系统文件MapGis6.x数据非法MapGis6.x数据非法MapGis6.xMapGis6.x 多用户版与网络版区别MapGis6.x系统不兼容MapGis6.x MapGIS系列丛书单价常见问题USB加密狗的安装使用要注意以下几点:启动MapGIS licence Servies服务时,提示如下错误:这可能是一个Windows 内部错误或服务内部错误.MapGIS系统库文件说明MapGIS6.7不能进入,一进入就提醒:不能打开汉字库,请重新设置系统库目录或重新安装汉字库我们下载安装了MapGIS桌面主菜单,也能和USB狗连接上,但是系统目录设置有问题,用一些工具的时候不能打开子图库之类的数据库。
现在请教大家下怎么设置一下那个系统目录QQ2005与MapGIS67冲突问题解决方案MapGIS6.7无法启动,进入系统时,总是无法找到加密狗。
启动服务时,总是提示启动后又自动停止MapGIS与oracle连接的问题以前65的狗。
每次总是用一段时间就不能用了。
总提示找不到狗!从新装软件又可以了。
但是还是用不了多久又不能用。
我查看那个硬件管理器里面还是有人体学输入设备。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
时间:2005-1-7 11:12:18作者:MICROGERM点击:69评论
在阅读以下资料之前,请仔细查看本站资料使用条款及版权申明,如果您不接受本站相关条款申明,请离开本页面。
MapX常见问题解答
1.对栅格图象的支持。
在mapx3.0中对对栅格图象的支持很弱。
在mapx4.0中对对栅格图象的支持得到增强。支持BMP,GIF,TIF,JPG,PSD,PNG, MrSID file format (*.sid),网格文件(*.mig)等。但是需要将这些格式的文件现存成*.TAB才可以调用。
Set rv = Nothing
Set rvs = Nothing
Set lyr = Nothing
注意:BeginAccess,以及EndAccess可以明显ind对象的Search方法。在mapx3.5中只能作到完全匹配查找,在MapX4.0中SearchEx方法则可以找到多个匹配的记录,其结果由FindResult.Matches获取。详细请参看有关Find.SearchEx方法的文档以及示例。
3.关于Infotip–信息提示。
1.由tipSupport = True设置使能Infotip.
2.由tipPopupDelay = 500(millisecond)设置延迟时间。
3.由LabelProperties.DataField来设置用做InfoTip的字段
Set ds = Formmain.Map1.Datasets(bo2.Text)
Set thm = ds.Themes.add(0, "aa", "aa", False)
pact = False
thm.AutoRecompute = False
'puteTheme = False
Set ftrs = lyrUSA.Search("TOTPOP > 1000000"
注意:1。字符串外加两个双引号。2。首先将图层加入数据集Datasets才能使用查询。
6.自定义范围专题图
Dim ds As New MapXLib.Dataset
Dim thm As New MapXLib.Theme
4.如何在MapX下读取属性值。
有三种方法:
1.由Layer对象的KeyField属性来设立要读取属性值的字段名。
接着,由Feature对象的keyValue读取此行的属性值。
2.将图层加入到Datasets,由Dataset对象的Value(x,y)属性,通过设置行号,列号来获得属性值。
3.将图层加入到Datasets,之后由RowValues(ftr)获取整行的值。
thm.DataMax = 700
thm.DataMin = 100
thm.ThemeProperties.AllowEmptyRanges = True
thm.ThemeProperties.NumRanges = 7
thm.ThemeProperties.DistMethod = miCustomRanges
Dim ds As MapXLib.Dataset, lyr As yer
Dim ftrs As Features
Dim ftr As Feature
Dim rv As RowValue
Dim rvs As RowValues
Dim DsName As String‘数据集名
Dim DsRows As Long, DsCols As Long
thm.ThemeProperties.RangeCategories(1).Max = 150
thm.ThemeProperties.RangeCategories(1).Min = 50
thm.ThemeProperties.RangeCategories(2).Max = 250
thm.ThemeProperties.RangeCategories(2).Min = 150
Dim i As Long, j As Long
Set ds = Formmain.Map1.Datasets.Item(DsName)
Set lyr = yer
Set ftrs = lyr.AllFeatures
DsCols = ds.Fields.Count
DsCols = DsCols + 1
j = j + 1
Next
Grid1.TextArray(i * DsCols + j) = ftr.FeatureKey
i = i + 1
Next
lyr.EndAccess miAccessEnd
Set ftr = Nothing
Set ftrs = Nothing
Set ds = Nothing
DsRows = ftrs.Count
Grid1.Rows = DsRows + 1
Grid1.Cols = DsCols
Grid1.Row = 0
For i = 0 To DsCols - 1
Grid1.Col = i
Grid1.Text = ds.Fields.Item(i + 1).Name
Next i
2.使用Layer对象的OBJECT.Search (strWhere)方法。其参数为SQL查询的WHERE子句。例如:
Setftrs = lyr.Search("Character_Name like ""%市""" ;模糊查询
Set ftrs = lyr.Search("Character_Name =""北京市""" ;
Grid1.Col = DsCols - 1
Grid1.Text = "Fkey"
lyr.BeginAccess miAccessRead
i = 1
For Each ftr In ftrs
Set rvs = ds.RowValues(ftr)
j = 0
For Each rv In rvs
If Not IsNull(rv.Value) Then Grid1.TextArray(i * DsCols + j) = Trim(rv.Value)