10楼#
发布于:2004-02-16 20:43
目前我还没有得到MapX只能陪大家走了
|
|
11楼#
发布于:2004-03-12 15:33
thanks
|
|
12楼#
发布于:2004-03-17 15:44
真是爽,让俺少走了弯路,常来!!!!!!!!
|
|
13楼#
发布于:2004-05-13 14:06
<P>在delphi中怎么样实现gis中的i功能呀?</P>
|
|
|
14楼#
发布于:2004-05-13 14:54
顶!
|
|
15楼#
发布于:2004-06-17 14:07
<P>前面有人问的winsock的实现</P><P>procedure TFrmMain.sockGPSServerConnectionRequest(ASender: TObject;
requestID: Integer); begin if sockGPSServer.State<>sckClosed then sockGPSServer.close; sockGPSServer.Accept(requestID); end;</P><P>procedure TFrmMain.sockGPSServerDataArrival(ASender: TObject; bytesTotal: Integer); var strData:olevariant; strGPS:string; strLongitude,strLatitude:string; begin sockGPSServer.GetData(strData,8); strGPS:=strData; dealStrLocation(strGPS,strLongitude,strLatitude);//接收GPS信息进行处理 GPSLocation(strLongitude,strLatitude);// end;</P> |
|
16楼#
发布于:2004-06-18 09:34
有没有实现修改图元属性的例子呀?
|
|
|
17楼#
发布于:2004-07-02 14:51
<P>我有个插入图元的例子,你看有用没有咯</P><P> Lyr1:=map1.Layers.Item('图层名);
Lyr1.Editable:=True; pnt:=copoint.Create; feafrc := map1.FeatureFactory; newstyle := Costyle.Create; pnt.Set_(x1,y1); newstyle.SymbolType:=2; newstyle.SymbolCharacter:=35; newstyle.SymbolVectorColor:=micolorBlue; newstyle.SymbolVectorSize:=20; Ftr := feafrc.CreateSymbol(pnt,newstyle); Lyr1.AddFeature(Ftr,emptyparam);</P> |
|
18楼#
发布于:2004-07-17 18:47
非常感谢
|
|
19楼#
发布于:2004-07-18 10:40
<P>Map1.Geoset := ExtractFilePath(Application.ExeName) + 'Maps\beijingmap.gst';
Map1.SearchPath := ExtractFilePath(Application.ExeName) + 'Maps\'; 引入地图的例子。</P><P>我还请问。查询怎么做呢?</P> |
|