lazarus 判断是否存在文件 1.txt

Lazarus 是一个开源的 Delphi 编程环境，主要用于快速开发 Pascal 或 Object Pascal 应用程序，尤其是图形用户界面 (GUI) 程序。如果你想要使用 Lazarus 检查文件 "1.txt" 是否存在，你可以通过 `FileExists` 函数或者 `TFile` 类的帮助来完成。

在这里是一个简单的示例，展示了如何使用 `TFile` 类：

uses
  FileUtil;

var
  IsFileExist: Boolean;
begin
  IsFileExist := TFile.Exists('1.txt');
  if IsFileExist then
    WriteLn('1.txt 文件存在。')
  else
    WriteLn('1.txt 文件不存在。');
end;

这段代码首先导入了 `FileUtil` 单元，然后使用 `TFile.Exists` 方法检查文件 "1.txt" 是否存在于指定路径下。如果文件存在，程序会输出 "1.txt 文件存在。"，否则输出 "1.txt 文件不存在。"