delphi - 000C50BC 数据模块中的异常 EInoutError I/O 错误 103

Question

我在 Delphi4 中运行一个应用程序，然后我得到了错误

Exception EInoutError in the Data Module at 000C50BC I/O Error 103

我基本上......无法弄清楚它......我无法通过Delphi GUI打开/运行.exe文件但能够运行它。

请帮忙。

    {
****************************************************************************
* The WritelnXx routines are used to send status information to standard
* output.
****************************************************************************
}
procedure WritelnIn(const s: string; level: integer = 0); overload;
  var
    i: Integer;
  begin
    for i := 1 to level do Write('    ');
    **Writeln(s);**
  end;

procedure WritelnIn(const s: string; e: Exception; level: integer = 0); overload;
  begin
    WritelnIn(s + '[' + e.message + ']', level);
  end;

procedure WritelnAb(const s: string; level: integer = 0); overload;
  begin
    WritelnIn(s, level);
    Abort;
  end;

procedure WritelnAb(const s: string; e: Exception; level: integer = 0); overload;
  begin
    WritelnIn(s, e, level);
    Abort;
  end;

错误显示在同一文件 DataMagr.dpr 中的“Writeln(s);”处

Answer 1

I/O 错误 103 是文件未打开。根据Delphi 7帮助文件:

“如果文件未打开，则由 CloseFile、Read/Write、Seek、Eof、FilePos、FileSize、Flush、BlockRead 或 BlockWrite 报告。”

此外，这与您在上面提供的链接的其他问题有什么关系？