🚀 go-pugleaf

Look at the functions FindFirstFile and FindClose.

.  Ed

gave_no_name wrote in message
> news:3e931a5f.198205@forums.inprise.com...
>
> Can someone show me how to retrieve a files
> specifications: by that I mean:
>
> Modified date and time
>   and    File size.
>
> The file is sitting in a filelistbox.

Surely there is a cleaner way...
void __fastcall TVIPForm::GetFileSpecs(String Path)
{   //Surely there is a better way...
  String FileSize;
  String DatenTime;
  int Year;
  int Month;
  int Day;
  int Hour;
  int Min;
  int Sec;

  if(Path.IsEmpty()) //true if the AnsiString is empty.
    return "No File Found";

  TSearchRec sr; //int Time, int Size int Attr, AnsiString Name, int
ExcludeAttr, int FindHandle, _WIN32_FIND_DATAA FindData
  if(FindFirst(Path , faAnyFile, sr) == 0)
    {
      FileSize = IntToStr(sr.Size);
      DatenTime = sr.Time;    //Need to learn how to extract
    }

  FindClose(sr);



 //All this to get the Date & Time..........

   FILE *stream;
   std::ftime ft;

   if ((stream = fopen(Path.c_str(), "r")) == NULL)
   {
       return;  //  Cannot open output file.
   }

   getftime(fileno(stream), &ft); //fileno is handle of stream

   Year  = ft.ft_year+1980;
   Month = ft.ft_month;
   Day   = ft.ft_day;

   Hour = ft.ft_hour;
   Min  = ft.ft_min;
   Sec  = ft.ft_tsec *2;

   fclose(stream);

   MessageBar->Text = "  " + FileSize + " Bytes    " + IntToStr(Month)
+ "/" + IntToStr(Day) + "/" + IntToStr(Year) + "  " + IntToStr(Hour) +
":" + IntToStr(Min) + ":" + IntToStr(Sec);

return;
}

//============================================================

DeKayA@bellsouth.net wrote:
> Surely there is a cleaner way...
> 
FindFirstFile returns lots of file specs:

WIN32_FIND_DATA ffd;
HANDLE hff = FindFirstFile(Path.c_str(), &ffd);
if (INVALID_HANDLE_VALUE != hff)
{
     // do something with the fields in ffd...
     FindClose(hff);
}

To be specific:

typedef struct _WIN32_FIND_DATA { // wfd
     DWORD dwFileAttributes;
     FILETIME ftCreationTime;
     FILETIME ftLastAccessTime;
     FILETIME ftLastWriteTime;
     DWORD    nFileSizeHigh;
     DWORD    nFileSizeLow;
     DWORD    dwReserved0;
     DWORD    dwReserved1;
     TCHAR    cFileName[ MAX_PATH ];
     TCHAR    cAlternateFileName[ 14 ];
} WIN32_FIND_DATA;