Hola,
No creo que te cueste adaptarlo a tus necesidades en C++ Builder:
Código Delphi
[-]
type
TFechasArchivo = (faCreacion, faModificacion, faUltimoAcceso);
function TUtilesArchivos.FechasArchivo(
archivo: string; tipoFecha: TFechasArchivo): string;
var
SR: TSearchRec;
sysTime: SYSTEMTIME;
fileTime: TFILETIME;
begin
if (FindFirst(archivo, faAnyFile, SR) = 0) then begin
case tipoFecha of
faCreacion: FileTimeToLocalFileTime(SR.FindData.ftCreationTime, fileTime);
faModificacion: FileTimeToLocalFileTime(SR.FindData.ftLastWriteTime, fileTime);
faUltimoAcceso: FileTimeToLocalFileTime(SR.FindData.ftLastAccessTime, fileTime);
else
FileTimeToLocalFileTime(SR.FindData.ftCreationTime, fileTime);
end;
FileTimeToSystemTime(fileTime, sysTime);
result := DateTimeToStr(SystemTimeToDateTime(sysTime));
FindClose(SR);
end
else
result := EmptyStr;
end;