• kent
  • Member
  • Offline
  • Registered: 2015-12-04
  • Posts: 13

Topic: Information of textfile

Hi
How can I get information about create and change date of a textfile?

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Information of textfile

Hello,

I will add function for that in 1-2 days, I'll let you know.

Dmitry.
  • Registered: 2014-02-14
  • Posts: 10,294

Re: Information of textfile

Please download beta version:
http://myvisualdatabase.com/forum/viewtopic.php?id=1936


Added functions to get created/modified/accessed time to file

function CreatedFileTime(const FileName: string; var FileTime: TDateTime): boolean
function ModifiedFileTime(const FileName: string; var FileTime: TDateTime): boolean
function AccessedFileTime(const FileName: string; var FileTime: TDateTime): boolean

example:

procedure Form1_Button2_OnClick (Sender: string; var Cancel: boolean);
var
    dt: TDateTime;
begin
    if CreatedFileTime('c:\temp\1.txt', dt) then
        ShowMessage( DateTimeToStr(dt) )
        else ShowMessage('Failed to get time.');
end;
Dmitry.