论坛 › Delphi交流 › 初学delphi 编译时说语法错误

ywwz 发表于 2014-1-15 19:20:26

初学delphi 编译时说语法错误

本帖最后由 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 搞不懂哪里语法不对

ywwz 发表于 2014-1-15 19:32:26

数组引用方式错了... 汗
应该是 类似
USERS

查看完整版本: 初学delphi 编译时说语法错误