Einzelnen Beitrag anzeigen

Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.691 Beiträge
 
Delphi 11 Alexandria
 
#5

AW: Exaktes Filecopy

  Alt 30. Nov 2018, 13:24
Das hier sollte alles per IOUtils.pas abdecken.
Delphi-Quellcode:
  TFile.Copy( Source, Dest );
  TFile.SetAttributes( Dest, TFile.GetAttributes( Source ) );
  TFile.SetCreationTime( Dest, TFile.GetCreationTime( Source ) );
  TFile.SetCreationTimeUtc( Dest, TFile.GetCreationTimeUtc( Source ) );
  TFile.SetLastAccessTime( Dest, TFile.GetLastAccessTime( Source ) );
  TFile.SetLastAccessTimeUtc( Dest, TFile.GetLastAccessTimeUtc( Source ) );
  TFile.SetLastWriteTime( Dest, TFile.GetLastWriteTime( Source ) );
  TFile.SetLastWriteTimeUtc( Dest, TFile.GetLastWriteTimeUtc( Source ) );
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat