鱼C论坛

 找回密码
 立即注册
查看: 2280|回复: 1

初学delphi 编译时说语法错误

[复制链接]
发表于 2014-1-15 19:20:26 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能^_^

您需要 登录 才可以下载或查看,没有账号?立即注册

x
本帖最后由 ywwz 于 2014-1-15 20:07 编辑
procedure TForm1.readUsers();
var
  i: Integer;
begin
  i := 0;
  while true do
  begin
    if (CONFIGFILE.ReadString('USER', 'name' + IntToStr(i), '') <> '') then
    begin
      SetLength(USERS, i + 1, 3);
      USERS(i, 0) := CONFIGFILE.ReadString('USER', 'name' + IntToStr(i), '');
      USERS(i, 1) := CONFIGFILE.ReadString('USER', 'password' + IntToStr(i), '');
      USERS(i, 2) := CONFIGFILE.ReadString('USER', 'nickname' + IntToStr(i), '');
    end
    else
    begin
      break;
    end;    Inc(i);
  end;
//showmessage(inttostr(length(USERS)));
end;
 

CONFIGFILE 和 USERS 是全局变量 已经定义过

USERS(i, 0) := CONFIGFILE.ReadString('USER', 'name' + IntToStr(i), '');
这里编译说 缺少操作或者分号 "missing operator or semicolon"

之前学过C 初学delphi 搞不懂哪里语法不对

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

 楼主| 发表于 2014-1-15 19:32:26 | 显示全部楼层
数组引用方式错了... 汗
应该是 类似
USERS[i]
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2024-11-25 14:48

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表