Nun, es musste natürlich wieder schnell gehen, und das hier hatte ich mit als erstes gefunden
Und da der Code von himitsu war, hab ich ihn genommen.
Aktuell nutze ich den Code hier von Luckie:
Delphi-Quellcode:
function WriteLog(LogFile, LogString: String): Integer;
var
f: TextFile;
begin
{$IOCHECKS OFF}
AssignFile(f, LogFile);
if FileExists(LogFile) then
Append(f)
else
Rewrite(f);
Writeln(f, LogString);
CloseFile(f);
Result := GetLastError();
{$IOCHECKS ON}
end;
Welcher ist denn nun besser?
Wie shmia oben schreibt sollte man solchen Code heute nicht mehr nutzen, da es bessere Wege gibt.
Zur Erklärung:
Ich schreibe ein kleines Tool um Prime95 fernzusteuern und lasse alle 30 Sekunden die Kerntemperaturen speichern. Dafür brauche ich die Logfunktion