Ver Mensaje Individual
  #3  
Antiguo 24-10-2014
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola joeyjr, bienvenido a Club Delphi

Tál como te comenta duilioisola, se puede hacer de modo muy similar en C++ Builder.
Código PHP:
AnsiString GetNewestFile(AnsiString folder)
{
  
TSearchRec sr;
  
TDateTime fileAge, maxAge = 0;
  
AnsiString newest = "";

  
folder = IncludeTrailingPathDelimiter(folder);
  if (
FindFirst(folder + "*.*", faAnyFile, sr) == 0) {
    do {
      if (
sr.Name != "." && sr.Name != ".." && sr.Attr & faArchive) {
        
fileAge = FileDateToDateTime(FileAge(folder + sr.Name));
        if (
fileAge > maxAge) {
          
maxAge = fileAge;
          
newest = folder + sr.Name;
        }
      }
    } while (
FindNext(sr) == 0);
    
FindClose(sr);
  }
  return 
newest;
} 
Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita