🚀 go-pugleaf

Thank you *very* much!

Henry

Giuliano <gcardinali@remove.adhoc.net> wrote in message
sg9efvog0r2vcvi87adq64d9ov0tbu8mjp@4ax.com...
> On Mon, 23 Jun 2003 17:11:50 +0200, "Enrico B." <eangelo@libero.it> wrote:
>
> >Hi to All!
> >Can somebody provide me with a piece of code to be used to retrieve a
file
> >last modification time? I tried "stat" but on Windows O.S. that function
> >only returns the last access time. I also tried GetFileTime but something
is
> >wrong with it.
> >Thanks in advance
> >Henry
> >
> >
>
> TDateTime __fastcall GetLastWriteTime( AnsiString File )
> {
>     WIN32_FIND_DATA FindFileData;
>
>     HANDLE HFile = FindFirstFile( File.c_str(), &FindFileData );
>     if ( HFile == INVALID_HANDLE_VALUE )
>         RaiseLastOSError();
>
>     class X {
>     public:
>         X( HANDLE hFile ) : hFile_( hFile ) {}
>         ~X() throw() { FindClose( hFile_ ); }
>     private:
>         const HANDLE hFile_;
>     }
>     Finalize( HFile );
>
>     FILETIME LT;
>
>     if ( !FileTimeToLocalFileTime( &FindFileData.ftLastWriteTime, &LT ) )
>         RaiseLastOSError();
>
>     SYSTEMTIME ST;
>
>     if ( !FileTimeToSystemTime( &LT, &ST ) )
>         RaiseLastOSError();
>
>     return TDateTime( ST.wYear, ST.wMonth, ST.wDay ) +
>            TDateTime( ST.wHour, ST.wMinute, ST.wSecond,
ST.wMilliseconds );
> }
>