Zmienianie daty

Czy jest jakiś sposób, żeby zmienić datę modyfikacji i otwarcia pliku itd. ?

Z góry dziękuję

Poszukaj czegos o SetFileTime()

Spsob jest :)

VAR
godz,min,sek,rok,mie,dzien  : Word;  
Plik : <b>File</b>;
pc  : longint; 
dc   : DateTime;



Begin
Assign(Plik,'C:/costam.txt'); 
Reset(Plik,1);   
//pobierasz atrybuty
begin
      GetfTime(Plik,pc);               {-Pobieramy date i czas }
      UnpackTime(pc,dc);               { ostatniej modyfikacji pliku }
      with dc do
      begin
        godz:=hour; min:=min; sek:=sec; rok:=year; mie:=month; dzien:=day;
        PackTime(dc,pc);
        Getftime(Plik,pc);
      end;

// a jak chcesz zmienic to zmieniasz date i zapisujesz
 with dc do                        {-Przywracamy orginalna date }
      begin                             { oraz czas }
        hour:=godz; min:=min; sec:=sek; year:=rok; month:=mie; day:=dzien;
        PackTime(dc,pc);
        Reset(Plik); SetfTime(Plik,pc);
      end;

tam jescze sie zamyka pliki itd ale to chyba znasz

//Chcialbym cie powiadomic ze sa tagi < delphi > super w nich kod wyglada.. lofix

to znaczy prze kodem mam wpisac < delphi> kod < /delphi>

//Bingo! - m.M

WIDMO:
Wieeeeeelkie dzięki

Tylko to muszę jeszcze wypróbować :)

GetTime()
Ta funkcja nie chodzi :/