Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.053 Beiträge
 
Delphi 12 Athens
 
#1

Gesperrte Dateien löschen

  Alt 20. Jul 2006, 18:26
aus Code-Library -> Object-Pascal / Delphi-Language -> Gesperrte Dateien löschen

irgendwie seh ich doppelt

Delphi-Quellcode:
// NT/2K/XP/.NET Systeme
if StrLen(PChar(ExtractFileDrive(aFileName))) < 3 then
  Result := MoveFileEx(PChar(aFileName), nil, MOVEFILE_REPLACE_EXISTING +
      MOVEFILE_DELAY_UNTIL_REBOOT)
else
  Result := MoveFileEx(PChar(aFileName), nil, MOVEFILE_REPLACE_EXISTING +
      MOVEFILE_DELAY_UNTIL_REBOOT);
oder kurzgesagt ... was ist hier der Unterschied?
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
  Mit Zitat antworten Zitat