Daten Shredder Sourcecode

Ein Thema von DelphiUser123 · begonnen am 29. Jan 2017 · letzter Beitrag vom 13. Feb 2017

blawen

Registriert seit: 30. Nov 2003
Ort: Luterbach (CH)
695 Beiträge

Delphi 12 Athens

29. Jan 2017, 17:25

Diese wird doch hier erzeugt if not RenameFile(FileName, newname)

vielleicht . . .
das ShredderFile(newname) wird aber immer aufgerufen, auch nach raise Exception . . . - oder liege ich da falsch ?

Ebenso das DeleteFile.

Grundsätzlich fehlt mir hier ein

Code:

			if...

  then..

  else..

Block und da der zusammengehörige Code mehr als eine Zeile umfassr ein

Code:

begin...end

Roland

Es ist dir nicht erlaubt, neue Themen zu verfassen.

Es ist dir nicht erlaubt, auf Beiträge zu antworten.

Es ist dir nicht erlaubt, Anhänge hochzuladen.

Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.

Smileys sind an.

[IMG] Code ist an.

HTML-Code ist aus.

Refbacks are aus

Gehe zu: