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: 36
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 fileAgemaxAge 0;
  
AnsiString newest "";

  
folder IncludeTrailingPathDelimiter(folder);
  if (
FindFirst(folder "*.*"faAnyFilesr) == 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