RosettaCodeData/Task/Delete-a-file/Component-Pascal/delete-a-file.pas

9 lines
187 B
ObjectPascal

VAR
l: Files.Locator;
BEGIN
(* Locator is the directory *)
l := Files.dir.This("proof");
(* delete 'xx.txt' file, in directory 'proof' *)
Files.dir.Delete(l,"xx.txt");
END ...