Auszug aus meiner
unit SysUtils;
Delphi-Quellcode:
unit SysUtils;
{$H+}
{$WARN SYMBOL_PLATFORM OFF}
interface
......
{ FileAge returns the date-and-time stamp of the specified file. The return
value can be converted to a TDateTime value using the FileDateToDateTime
function. The return value is -1 if the file does not exist. }
function FileAge(
const FileName:
string): Integer;
{ FileExists returns a boolean value that indicates whether the specified
file exists. }
function FileExists(
const FileName:
string): Boolean;
eine neue Version ist dort nicht zu entdecken.
Wo kann man die herbekommen?
Ich muß mich jetzt mal für eine Stunde abmelden. Also läßt euch Zeit.
Gruß
Klaus