在Delphi中關閉打開的文件,可以使用TFileStream類進行操作。以下是關閉文件的步驟:
var
fileStream: TFileStream;
begin
fileStream := TFileStream.Create('文件路徑', fmOpenRead);
end;
fileStream.Free;
完整的代碼示例:
var
fileStream: TFileStream;
begin
try
fileStream := TFileStream.Create('文件路徑', fmOpenRead);
// 執行文件操作...
finally
fileStream.Free; // 關閉打開的文件
end;
end;
請將代碼示例中的"文件路徑"替換為你要打開的文件的實際路徑。