Delphi+MapX5中使用自定义字体符号

核心提示： MapX5中使用自定义字体符号 觉得现在使用自定义字体作为点符号的应用是越来越少了，近段时间在开发GPS车辆管理的GIS系统的时候要用到动态显示车辆位置，Delphi+MapX5中使用自定义字体符号，觉得用其他方式在地图上显示车辆可能会对性能有一定的影响，所以就使用的自定义字体， myStyle:=CoStyle.C

 

MapX5中使用自定义字体符号

　　　 觉得现在使用自定义字体作为点符号的应用是越来越少了，近段时间在开发GPS车辆管理的GIS系统的时候要用到动态显示车辆位置，觉得用其他方式在地图上显示车辆可能会对性能有一定的影响，所以就使用的自定义字体。

　　　 首先是创建自定义的字体。使用了字体编辑软件fontlab.v4.60。

　　　 其次就是在Delphi＋MapX中使用该字体了。

　　 myStyle:=CoStyle.Create;

　　 MyFont := TFont.Create;

　　 OleFontToFont(myStyle.SymbolFont, MyFont);

　　 MyFont.Size := 24;

　　 MyFont.Name := 'MapInfo Transportation';

　　 myStyle.SymbolFontColor:=clRed;

　　 myStyle.SymbolCharacter := 66;

　　　 其中要注意的一点就是一定要在Map1中将默认的点符号字体样式设置为其中任意一种自定义字体，否则将不能正确显示指定的字体。这应该是MapX5的一个Bug吧。