DELPHI XE,E2010 Incompatible types: 'string' and 'Integer'错误

chatm 2011-03-29 11:41:41
请DX们看看哪里不对:
程序中所有Providers[I]、Providers[FCount]……等等指定Providers数组下标的语句(类似于红字部分的),都出现“E2010 Incompatible types: 'string' and 'Integer'”错误;而同样定义和使用的、指定Adoqs数组下标的语句(类似于蓝字部分的)却没问题。

const
gMaxPoolSize = 100;

type
TCSDAL6Sai = class(TDSServerModule)
……
private
FCount: integer;
……
end;

……

var
Providers: array [1..gMaxPoolSize] of TDataSetProvider;
Adoqs: array [1..gMaxPoolSize] of TADOQuery;

implementation

{$R *.dfm}

procedure TCSDAL6Sai.DSServerModuleDestroy(Sender: TObject);
var
I: integer;
begin
for I := 1 to FCount do
begin
FreeAndNil(Providers[I]);
FreeAndNil(Adoqs[I]);
end;
end;
...全文
627 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
Frank.WU 2011-04-01
  • 打赏
  • 举报
回复
应该命名有重复。可能是是引用的单元有不同的类型,但是命名一样
iamduo 2011-03-31
  • 打赏
  • 举报
回复
Providers 是你的 Unit 名字?
bdmh 2011-03-30
  • 打赏
  • 举报
回复
是不是你其他地方还有Providers的其他类型声明呢
chatm 2011-03-29
  • 打赏
  • 举报
回复
再补充:所有的Providers改个名字,比如Ps,结果就OK了,难道Providers是保留字?
chatm 2011-03-29
  • 打赏
  • 举报
回复
补充:又试了一下,直接把[I]改为[0],还是Providers[0]报错,而Adoqs[0]没问题

16,743

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧