var
GuildRank: pTGuildRank;
GuildUserInfo: pTGuildUserInfo;
i: Integer;
begin
for GuildRank in RankList do //出现 Operator not applicable to this operand type
begin // 出现 [Error] Expression expected but 'BEGIN' found
for I := 0 to GuildRank.MembersList.Count - 1 do
begin
GuildUserInfo := pTGuildUserInfo(GuildRank.MembersList.Objects[I]);
Dispose(GuildUserInfo);
end;
GuildRank.MembersList.Free;
Dispose(GuildRank);
end;
RankList.Clear;
end;
应该如何处理??
GuildRank: pTGuildRank;
GuildUserInfo: pTGuildUserInfo;
i: Integer;
begin
for GuildRank in RankList do //出现 Operator not applicable to this operand type
begin // 出现 [Error] Expression expected but 'BEGIN' found
for I := 0 to GuildRank.MembersList.Count - 1 do
begin
GuildUserInfo := pTGuildUserInfo(GuildRank.MembersList.Objects[I]);
Dispose(GuildUserInfo);
end;
GuildRank.MembersList.Free;
Dispose(GuildRank);
end;
RankList.Clear;
end;
应该如何处理??
if GuildRank in RankList then 也不行
则表示:B是一个集合,A是B的成员自己看看类型是啥...