Einzelnen Beitrag anzeigen

tcoman
(Gast)

n/a Beiträge
 
#4

AW: DateTime of a Directory

  Alt 31. Jul 2016, 15:32
Ich habe jetzt eine Loesung die funktioniert:
Delphi-Quellcode:
{-0891-} function mz_GetDirDateTime(myDir: string): s_48;
         var SR : TSearchRec;
         begin
         result:='00.00.0000 - 00:00:00';
         {-none ending backslash in string myDir: "X:\DIR"-}
         if (FindFirst(myDir, faDirectory, SR) = 0) then begin
            try result:=FormatDateTime('dd/mm/yyyy - hh:nn:ss',
                                          FileDateToDateTime(SR.Time));
            except result:='00.00.0000 - 00:00:00';
            end; {except}
            FindClose(SR);
         end;
{-0891-} end;
hatte das Problem schon mal geloest, dachte aber, dass ich
mit dt:=FileAge(myFile); weiterkomme, wenn ich ein "\." an
die Stringvariable myFile anhaenge, was aber nicht funktioniert.

Danke fuer die vielen schnellen Antworten...
@nahpets: Ist genau das, was Du vorgeschlagen hast.
MfG,
Terence

Geändert von tcoman (31. Jul 2016 um 15:42 Uhr) Grund: Danke an nahpets hinzugefuegt
  Mit Zitat antworten Zitat