_FILETIME to String

[kcx]

Hi,

Hab mal ne kurze Frage, und zwar, wie bekommt man den Datentyp _FILETIME (in der Unit Windows) zu einen String?

TimeToStr() funktioniert leider nicht.

Danke

[Die Muhkuh]

Hi,

schau Dir mal FileTimeToSystemTime sowie SystemTimeToDateTime an

[kcx]

Danke, hab jetzt folgendes:

Delphi-Quellcode:

function FileTimeToStr(const FT: _FILETIME): String;
var
  ST: SYSTEMTIME;
begin
  if FileTimeToSystemTime(FT, ST) then
    Result := TimeToStr(SystemTimeToDateTime(ST));
end;

Is das richtig so?
Es liefert mir nämlich immer 00:00:00 zurück.

[turboPASCAL]

Wie liest du denn die Zeit ein ?

[kcx]

Zitat von turboPASCAL:

Wie liest du denn die Zeit ein ?

Es ist z.B die Eigenschaft "ftCreationTime" oder "ftLastAccessTime" von "WIN32_FIND_DATA".

[DeddyH]

So funktioniert es bei mir:

Delphi-Quellcode:

function FileTimeToString(const fTime: TFileTime): string;
var sTime: TSystemTime;
begin
  Result := '';
  if FileTimeToSystemTime(fTime,sTime) then
    Result := DateTimeToStr(SystemTimeToDateTime(sTime));
end;

[kcx]

Danke, kommt zwar das gleiche bei raus, aber dann liegt es wohl daran, das die Datei(en) keine Creation, LastAccess Zeiten (mehr) haben.

[DeddyH]

Zitat von kcx:

Danke, kommt zwar das gleiche bei raus, aber dann liegt es wohl daran, das die Datei(en) keine Creation, LastAccess Zeiten (mehr) haben.

Das kannst Du ja im Explorer überprüfen.

[kcx]

Zitat von DeddyH:

Zitat von kcx:

Danke, kommt zwar das gleiche bei raus, aber dann liegt es wohl daran, das die Datei(en) keine Creation, LastAccess Zeiten (mehr) haben.

Das kannst Du ja im Explorer überprüfen.

Es sind Dateien von einem FTP Server.
Nur LastWriteTime wird korrekt angezeigt, bei CreationTime und LastAccessTime steht immer 01.01.1601 bzw. 00:00:00.

Bei SmartFTP wird auch nur eine Zeit angezeigt, d.h wohl, dass die anderen Zeiten nicht auf jedem FTP verfügbar sind.