Delphi Programming RTL Reference|By Category|Alphabetically|By Unit
function DateTimeToFileDate(DateTime: TDateTime): Integer;
Converts a TDateTime value to a system timestamp value.
var aFile : string;
aFileDateTime : TDateTime;
aFileOSDate : integer;
begin
aFile : = Application.ExeName;
aFileOSDate := FileAge(aFile);
if aFileOSDate = -1 then Exit; //invalid file
aFileDateTime := DateAdd(Now,1); //add a day
FileSetDate(aFile, DateTimeToFileDate(aFileDateTime));
//Fo, our application exe file "was" modified tomorow
end;
|
Searching for Files
Stop. This is the one and only solution to file searching. Use Delphi to find any file in any directory and/or subdirectory that match a certain mask. Start searching.
TDateTime
FileDateToDateTime
Now,
DateToStr,
FormatDateTime,
Date/Time and other International Settings
|
Free Delphi code snippet inside every Delphi Newsletter! |
|
|
|
Got some code to share? Got a question? Need some help? |
|
|
