antp.be forum

Code: Select all

function FileExists(FileName: string): Boolean;
function DirectoryExists(DirName: string): Boolean;
function ExtractFileName(AFileName: string): string;
-> returns what follows the last \ of the name
function ExtractFileExt(AFileName: string): string;
-> returns the last "." and what follows it
function ExtractFilePath(AFileName: string): string;
-> returns up to the last \ of the name
function ChangeFileExt(AFileName: string; AExt: string): string;
-> returns the name with a new extension. The extension includes the dot so it can also be used to transform "File.abc" to "FileSomething.def" for example
function IncludeTrailingPathDelimiter(AFileName: string): string;
-> returns the path with a \ added at the end if there wasn't one
function ExcludeTrailingPathDelimiter(AFileName: string): string;
-> returns the path removing the \ at the end if there was one
function DeleteFile(AFileName: string): Boolean;
function CopyFile(ASourceFileName: string; ATargetFileName: string; SkipIfExists: Boolean): Boolean;
function MoveFile(ASourceFileName: string; ATargetFileName: string): Boolean;
function ListDirectory(ADir: string; AMask: string): string;
-> returns the dir contents, with tab-separated colunns (name, size, datetime, "D" if directory). Lines separated by linebreaks so it can be put in the ".Text" of a TStringList.