MapX的问题

hanjason996

导入MapX控件后，想做添加图元的程序。可是发现很多问题。不知是代码问题还是什么原因，请人帮忙看看。代码是：
procedure TForm1.Button4Click(Sender: TObject);
var
cs:CMapXStyle;
pnt:CMapXPoint;
lyr:layer;//层
ftr:feature;//特征
pt:point;//点
mstyle:style;//样式
x,y:double;
begin
cs:=costyle.create;
cs.SymbolType :=1;
cs.SymbolBitmapSize:=48;
cs.SymbolBitmapName:='RAIL1-32.BMP';
cs.SymbolBitmapTransparent:=true;
pnt:=copoint.Create;
pnt.Set_(50,10);
ftr:=cofeature.Create ;
ftr:=map1.ControlInterface.FeatureFactory.CreateSymbol(pnt,cs);
map1.ControlInterface.Layers['高速公路_50m'].AddFeature(ftr,EmptyParam);
end;
错误]Biz:\YKWLZHXXPT\YSGL\GIS\YWGN1.FUNC.DIR\MAINFORM.FORM.PAS(183, 25): Undeclared identifier "create"
[错误]Biz:\YKWLZHXXPT\YSGL\GIS\YWGN1.FUNC.DIR\MAINFORM.FORM.PAS(188, 14): 不能隐式转换 "CoPoint" 成为 "CMapXPoint"
[错误]Biz:\YKWLZHXXPT\YSGL\GIS\YWGN1.FUNC.DIR\MAINFORM.FORM.PAS(190, 16): 不能隐式转换 "CoFeature" 成为 "CMapXFeature"
[错误]Biz:\YKWLZHXXPT\YSGL\GIS\YWGN1.FUNC.DIR\MAINFORM.FORM.PAS(192, 61): Undeclared identifier "EmptyParam"

hanjason996

错误贴错了，是：
[错误]Biz:\YKWLZHXXPT\YSGL\GIS\YWGN1.FUNC.DIR\MAINFORM.FORM.PAS(183, 13): 不能隐式转换 "CoStyle" 成为 "CMapXStyle"
[错误]Biz:\YKWLZHXXPT\YSGL\GIS\YWGN1.FUNC.DIR\MAINFORM.FORM.PAS(188, 14): 不能隐式转换 "CoPoint" 成为 "CMapXPoint"
[错误]Biz:\YKWLZHXXPT\YSGL\GIS\YWGN1.FUNC.DIR\MAINFORM.FORM.PAS(190, 16): 不能隐式转换 "CoFeature" 成为 "CMapXFeature"
[错误]Biz:\YKWLZHXXPT\YSGL\GIS\YWGN1.FUNC.DIR\MAINFORM.FORM.PAS(192, 61): Undeclared identifier "EmptyParam"
如果强制转换CMapXStyle(costyle).creat，就会显示Undeclared identifier"creat"

aDragon

对你们使用的控件不熟悉，你使用的类costyle，CMapXStyle之间的继承关系如何？把声明和实现先一致起来试试。
再有组件导入后，很多函数和类型，都要注意所属单元，有必要的话，前面加上单元名！

hanjason996

这是在MapXLib_TLB.pas里写的他们的继承关系：
CoPoint = class
    class function Create: CMapXPoint;
    class function CreateRemote(const MachineName: string): CMapXPoint;
  end;
  CoStyle = class
    class function Create: CMapXStyle;
    class function CreateRemote(const MachineName: string): CMapXStyle;
  end;
  CoFeatures = class
    class function Create: CMapXFeatures;
    class function CreateRemote(const MachineName: string): CMapXFeatures;
  end;
怎么一致？在哪加单元名？我已经在uses里加了MapXLib_TLB啊？

hanjason996

这是在MapXLib_TLB.pas里写的他们的继承关系：
CoPoint = class
    class function Create: CMapXPoint;
    class function CreateRemote(const MachineName: string): CMapXPoint;
  end;
  CoStyle = class
    class function Create: CMapXStyle;
    class function CreateRemote(const MachineName: string): CMapXStyle;
  end;
  CoFeatures = class
    class function Create: CMapXFeatures;
    class function CreateRemote(const MachineName: string): CMapXFeatures;
  end;
怎么一致？在哪加单元名？我已经在uses里加了MapXLib_TLB啊？

aDragon

cs:=costyle.create;
cs:CMapXStyle;
声明和实现用一个类试试

lixy

CMapXStyle(costyle).creat，就会显示Undeclared identifier"creat"
CMapXStyle是怎么定义的，另外creat是不是少写了一个e？

hanjason996

第二个帖子发的有问题，CMapXStyle(costyle).create，就会显示Undeclared identifier"create" ，程序上没少写。