delphi - Delphi：缺少运算符或分号

Question

我正在使用 Indy 10(TIdTcpServer) 并收到以下错误：

[DCC Error] MainForm.pas(88): E2066 Missing operator or semicolon

尝试运行此代码时：

procedure TForm1.SendMessage(Data: String; Client: Integer);
var
  List: TList;
  AContext: TIdContext;
begin
  List := idTcpServer1.Contexts.LockList;
  AContext(List[0]).Connection.IOHandler.WriteLn(Data);  // Line 88
end;

我无法弄清楚我错过了什么；有什么帮助吗？

Answer 1

虽然我无法解释您遇到的错误，但您的代码完全错误。

将其更改为：

procedure TForm1.SendMessage(Data: String; Client: Integer);
var
  List: TList;
  AContext: TIdContext;
begin
  List := idTcpServer1.Contexts.LockList;
  AContext := TIdContext(List[0]);
  AContext.Connection.IOHandler.WriteLn(Data);
end;

您对非类型类型转换的错误使用可能会使编译器感到困惑。如果这不能解决问题，请编辑您的问题以围绕您发布的内容添加更多代码（您发布的内容之前的十几行会有所帮助）。