🚀 go-pugleaf

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;
}

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