uses System; var FileName: string; begin FileName := 'example.txt'; if FileExists(FileName) then begin writeln('File activated successfully'); end else begin writeln('File activation failed'); end; end;
Here is an example of how to use the ActivateFile function:
Here is an example of how to use the FileExists function: