Entwickler-Ecke

Dateizugriff - Dateidatum ....


foxy - Mo 17.02.03 11:33
Titel: Dateidatum ....
guden

also ich hab ein blödes Prob ... da ich irgendwie keinen Fehler finde, poste ich einfach ma ob ihr da einen auf anhieb findet

also meine function sieht so aus

Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
 
function GetDateiDatum(const aName:String):String;
var fh     :THandle; 
    fdata  :TWin32FindData; 
    ft, wt :TFileTime; 
    st     :TSystemTime;
begin 
  Result:=''; 
  fh:=FindFirstFile(PChar(aName), fdata); 
  if (fh<>Invalid_Handle_Value) then 
  begin 
    ft:=fdata.ftLastWriteTime; 
    FileTimeToLocalFileTime(ft, wt); 
    FileTimeToSystemTime(wt, st);
    with st do Result:=Format('%0.2d.%0.2d.%0.4d', [wDay, wMonth, wYear]); 
  end;
  Windows.FindClose(fh); 
end;


diese function rufe ich so auf in der formclose

Quelltext 
1:
 
Mem :=GetDateiDatum(ExtractFilePath(ParamStr(0))+'\db\Firmendata.gdb');


schreibe diese dann in eine .ini


Quelltext 
1:
2:
3:
4:
5:
 
ini := TIniFile.Create(ExtractFilePath(ParamStr(0))+'VarIni.ini');
  try
    Ini.WriteString('Variablen','Dateidatum',mem);
finally
 ini.Free;


nur irgendwie gibt der mir das falsche datum ... :/


Delete - Mo 17.02.03 12:17
Was bekommst du denn für ein Datum?


foxy - Mo 17.02.03 13:08
hi ich hab ma alles überprüft und mir ist ein fehler unterlaufen.... aber nicht im code sondern in der anwendung ...
d.h. die datei die ich überprüfe, ist ja die dbDatei, ich habe angenommen, dass diese verändert wird , wenn ich einen Datensatz einfüge oder entferne ... aber dies ist nicht so, also muss ich auch nicht nach dem Datum suchen, als es verändert wurde, sondern nach dem wann der lezte zugriff war.... :( da muss ich mir nun wieder neuen code asudenken ... oder hast du gerade ein vorschlag


Delete - Mo 17.02.03 13:12
ftLastAccessTime ???


foxy - Mo 17.02.03 13:15
:rofl: kein comment ;)
thx


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!