麻烦各位帮我看看!(在线等待) (50分)

麻烦各位大哥帮我看看
怎么老是显示错误.我用其他的maptoolused 的时候都不会这样,新建图层就会??

procedure TMain_form.Open1Click(Sender: TObject);
var EditLayer : Variant;
path, fileName : String;
empty: Variant;
begin


path := edit2.Text;
fileName := edit1.Text+'.tab';
Main_form.Map1.Layers.CreateLayer(fileName,path + '/' + fileName, 1,
emptyparam, emptyparam);
showmessage('file has been created');
main_form.combobox1.Items.Add(newlayer_form.Edit1.Text);
main_form.ComboBox1.ItemIndex:=0;
if main_form.combobox1.text<>'' then

EditLayer:=main_form.Map1.ControlInterface.Layers.
Item(main_form.Combobox1.Text);


end;

为什么总是提示错误:'未找到使用指定索引的对象'

然后显示我Editlayer赋值语句错误
(既EditLayer:=main_form.Map1.ControlInterface.Layers.Item
(main_form.Combobox1.Text);出错)
麻烦各位大哥帮我看看

直接写EditLayer :=main_form.Map1..Layers.Item(main_form.Combobox1.Text);试试
另外，在mapx的帮助中说
Note:This is a 'deprecated' method that still works for backward compatability. The new way to create a layer is to use Layers.Add with a Layerinfo object.
所以最好不要用CreateLayer来添加层

to tianjh007
我试了一下,改成EDITLAYER:=MAP1.LAYERS.ITEM.......结果还是一样的,
如果不用creatrlayer那么用什么比较好呢?

var
LyrInfoTemp: LayerInfo;
Flds: Fields;
begin

LyrInfoTemp :=CoLayerInfo.Create;
LyrInfoTemp.Type_ :=miLayerInfoTypeNewTable;
LyrInfoTemp.AddParameter('FileSpec', '文件名包含路径');
LyrInfoTemp.AddParameter('NAME', 'test');
Flds :=CoFields.Create;
Flds.AddStringField('ID',10);
LyrInfoTemp.AddParameter('FielDs',Flds);
MapX.Layers.Add(LyrInfoTemp,2);
MapX.Refresh;
end;

to tianjh007
你的代码中的USES里是否还引入了其他单元,我运行不了,ADDSTRINGFILD出错
我用的是MAPX4.0和DELPHI6.0系统是WIN98

怎么还没有人教我呀,在加100份OK?

我的是MapX4.5,win2000，delphi6，就是上边的写法，没有问题啊

难道是……

TO Tianjh007:
我也觉得你的代码应该是没有错的，可就是运行不了，总是显示：
'没有ADDSTRINGFIELD 着个方法'
我用的是学校提供的Mapx4.50.78中文版，DELPHI6.0 在 WIN98 和WIN2K下我都
试过了就是不行，真是奇怪了，难道是D版的原因？

to mikecat
是李真吧，呵呵，MIKECAT，你上次问我的visual家族的东东是叫INTER DEV吧
好象是关于ASP的，我不清楚，也没有用过，我们专业好象也没有人用那东西，
你们那里怎么会用这个呢，到程序员联盟里发个贴看看吧

我的是Mapx4.50.78英文版，盗版破解的
你的破解过了吗？

to tianjh007
我用的是那个版本,我破解了,
和你的开发环境是一样的,不知道为什么用不了,估计是D的原因!

多人接受答案了。

是我，谢谢你的建议。我现在正头痛的是中地公司的MAPGIS的说明和使用扩展太少，
很多东西使用起来很不方便我又不知道怎么改进，国产的软件技术支持真的还不够啊！
如果你有机会认识中地公司的朋友别忘记介绍我认识啊！我有一大堆的问题想问。
另，保“重”，我最近又瘦了。