Autor Beitrag
Mitmischer 1703
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 754
Erhaltene Danke: 19

Win 7, Debian
Delphi Prism, Delphi 7, RAD Studio 2009 Academic, C#, C++, Java, HTML, PHP
BeitragVerfasst: Di 02.10.07 12:46 
Hallo zusammen!

Ich habe mal einen ganz einfachen Shredder ohne viel Schnickschank programmiert. Er shreddert was (bis jetzt) Dateien, aber noch keine Ordner. :D

Geplant:
Uninstall, (opt.)
Install, (opt.)
Shreddern von Ordnern

Ich habe gelesen, dass manche Leute Installer hassen. Ich habe daher den Un-/Installer außenvorgelassen.
Außerdem besteht die Datei (bis jetzt) :lol: nur aus einer Datei.

Habe schon einige Schönheitsfehler gefunden. Kommen mit dem ersten Bug hoch!

Bitte um Kritik!!!

Update v.1.01 (k. A. wie ich es sonst nennen soll)
Bugs behoben: Wenn man den AuswahlsDialog nun per Abbrechen beendet, wird das Textfeld zurückgesetzt =>
kein Versehentliches Löschen mehr
Schönheitsfehler

Neue Funktionen: Auskunft, ob Shreddern oder nicht
Undo-Datei wird nach jedem Shreddern erzeugt
Undo-Datei-Löschknopf

Update v. 1.11
Bugs behoben: /

Neue Funktionen: Mehrfachauswahl für "Shreddering"

andere Änderungen: Die Undo-Funktion wurde abgeschafft (Sie hat mir die Mehrfachauswahl gestört. Kommt vielleicht wieder rein)
Einloggen, um Attachments anzusehen!


Zuletzt bearbeitet von Mitmischer 1703 am Fr 05.10.07 13:57, insgesamt 10-mal bearbeitet
ZeitGeist87
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1593
Erhaltene Danke: 20

Win95-Win10
Delphi 10 Seattle, Rad Studio 2007, Delphi 7 Prof., C++, WSH, Turbo Pascal, PHP, Delphi X2
BeitragVerfasst: Di 02.10.07 12:47 
Hallo!

Wie wärs mit ner genaueren Beschreibung?
Was shreddert das Programm?
Meine Ordner?

LG
Stefan

_________________
Wer Provokationen, Ironie, Sarkasmus oder Zynismus herauslesen kann soll sie ignorieren um den Inhalt meiner Beiträge ungetrübt erfassen zu können.
Mitmischer 1703 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 754
Erhaltene Danke: 19

Win 7, Debian
Delphi Prism, Delphi 7, RAD Studio 2009 Academic, C#, C++, Java, HTML, PHP
BeitragVerfasst: Di 02.10.07 12:58 
Titel: Re: Kein Thema :-)
user profile iconZeitGeist87 hat folgendes geschrieben:
Hallo!

Wie wärs mit ner genaueren Beschreibung?
Was shreddert das Programm?
Meine Ordner?

LG
Stefan


Kuck mal oben (6.Bearbeitung :autsch:

Bitte um Download! :flehan:
ZeitGeist87
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1593
Erhaltene Danke: 20

Win95-Win10
Delphi 10 Seattle, Rad Studio 2007, Delphi 7 Prof., C++, WSH, Turbo Pascal, PHP, Delphi X2
BeitragVerfasst: Di 02.10.07 13:02 
glaub mir..die wand ist stärker..

na toll..er shreddert was ich möchte..also doch meine PAPIERORDNER?!?! :P

Hmm..mal ernsthaft..
Bzw. lass mich raten:

Der Hauptbestandteil deines Programmes ist diese Funktion

deletefile()

LG
Stefan

//Edit(h und Emil):

Ok..dann ists ne Komponente von den Indys :P

_________________
Wer Provokationen, Ironie, Sarkasmus oder Zynismus herauslesen kann soll sie ignorieren um den Inhalt meiner Beiträge ungetrübt erfassen zu können.
azrael_7
ontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic starofftopic star
Beiträge: 78

Windows Vista
D2005 Pers. [de]
BeitragVerfasst: Di 02.10.07 13:27 
Also mir leuchtet irgendwie auch net ein, was das Tool macht....

Wenns nur irgendwelche Dateien löscht - das kann mein Windows auch... und in wie fern wird hier geschreddert... (hätte da zwar eine Idee, die mit dem Abstand von Leseköpfen bei laufender Platte zu tun hat, was aber - hoffendlich - net gemeint ist... :lol: )

_________________
-·- Es gibt Leute die bringen Freude, wohin sie gehen -·-
-·- und es gibt Leute, die bringen Freude, wenn sie gehen -·-
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19335
Erhaltene Danke: 1751

W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Di 02.10.07 13:31 
Ich gehe mal davon aus, dass die Daten in der Datei vor dem Löschen mit zufälligen Zahlenwerten überschrieben werden, denn das macht ja solche Shredder-Programme aus ;-).
So lässt sich dann eine Datei nicht wiederherstellen, da gibts diverse standardisierte Verfahren, wie oft mit welchen Ziffern überschrieben werden muss. Z.B. haben diverse Geheimdienste etc. bestimmte Verfahren mit unterschiedlichem Aufwand.
Silas
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 478

Windows XP Home
Delphi 2005, RAD Studio 2007, MASM32, FASM, SharpDevelop 3.0
BeitragVerfasst: Di 02.10.07 13:34 
Sieht interessant aus. Mit was für Daten wird die Datei denn überschrieben? Nullen, Einsen, oder Zufallszahlen?

_________________
Religionskriege sind nur Streitigkeiten darüber, wer den cooleren imaginären Freund hat ;-)
Mitmischer 1703 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 754
Erhaltene Danke: 19

Win 7, Debian
Delphi Prism, Delphi 7, RAD Studio 2009 Academic, C#, C++, Java, HTML, PHP
BeitragVerfasst: Di 02.10.07 13:35 
user profile iconjaenicke hat folgendes geschrieben:
Ich gehe mal davon aus, dass die Daten in der Datei vor dem Löschen mit zufälligen Zahlenwerten überschrieben werden, denn das macht ja solche Shredder-Programme aus ;-).

So lässt sich dann eine Datei nicht wiederherstellen, da gibts diverse standardisierte Verfahren, wie oft mit welchen Ziffern überschrieben werden muss. Z.B. haben diverse Geheimdienste etc. bestimmte Verfahren mit unterschiedlichem Aufwand.




Die Datei wird eingelesen, geleert, mit einer dezimalen Zufallszahl (random) unter 100 überschrieben, geschlossen. Und das bis der Integer streikt!!! (Nun ja, die Menge die ihr angegeben habt) :lol: und dann gelöscht


Zuletzt bearbeitet von Mitmischer 1703 am Di 02.10.07 15:12, insgesamt 2-mal bearbeitet
ZeitGeist87
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1593
Erhaltene Danke: 20

Win95-Win10
Delphi 10 Seattle, Rad Studio 2007, Delphi 7 Prof., C++, WSH, Turbo Pascal, PHP, Delphi X2
BeitragVerfasst: Di 02.10.07 13:36 
joa..interessant..also..ähm..papierkorb -> leeren hat für mich den selben sinn ;-)

unter 100 binär oder dezimal :P

_________________
Wer Provokationen, Ironie, Sarkasmus oder Zynismus herauslesen kann soll sie ignorieren um den Inhalt meiner Beiträge ungetrübt erfassen zu können.
azrael_7
ontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic starofftopic star
Beiträge: 78

Windows Vista
D2005 Pers. [de]
BeitragVerfasst: Di 02.10.07 13:36 
oki... manchmal hat man ein Brett vorm Kopf... :autsch:

Der Versuch das Bild des Papierschredders auf den PC zu übertragen hat bei mir ein wenig versagt... :oops:

NAja... für mich tuts das "normale" löschen.. wird eh irgendwann überschrieben :)

_________________
-·- Es gibt Leute die bringen Freude, wohin sie gehen -·-
-·- und es gibt Leute, die bringen Freude, wenn sie gehen -·-
Silas
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 478

Windows XP Home
Delphi 2005, RAD Studio 2007, MASM32, FASM, SharpDevelop 3.0
BeitragVerfasst: Di 02.10.07 14:01 
Überschreibst du die Datei mit IntToStr(Random())?

_________________
Religionskriege sind nur Streitigkeiten darüber, wer den cooleren imaginären Freund hat ;-)
Tilo
ontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic starofftopic star
Beiträge: 1098
Erhaltene Danke: 13

Win7 geg. WInXP oder sogar Win98
Rad2007
BeitragVerfasst: Di 02.10.07 14:19 
user profile iconjaenicke hat folgendes geschrieben:
Ich gehe mal davon aus, dass die Daten in der Datei vor dem Löschen mit zufälligen Zahlenwerten überschrieben werden, denn das macht ja solche Shredder-Programme aus ;-).
So lässt sich dann eine Datei nicht wiederherstellen, da gibts diverse standardisierte Verfahren, wie oft mit welchen Ziffern überschrieben werden muss. Z.B. haben diverse Geheimdienste etc. bestimmte Verfahren mit unterschiedlichem Aufwand.


Bei Chips funktioniert das unterumständen nicht. Da Flash Chips nur begrenzte an Speicherzyklen zulassen haben enige Chips ein Speichermanagement so das die Speicheradresse die der Rechner kennt innerhalb des Flashchips umgeleitet wird um so eine gleichmäßige Abnutzung und hohe Nutzungsdauer zu haben. dazu eine WikiSeite
Mitmischer 1703 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 754
Erhaltene Danke: 19

Win 7, Debian
Delphi Prism, Delphi 7, RAD Studio 2009 Academic, C#, C++, Java, HTML, PHP
BeitragVerfasst: Di 02.10.07 15:08 
user profile iconSilas hat folgendes geschrieben:
Überschreibst du die Datei mit IntToStr(Random())?


Jepp
Mitmischer 1703 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 754
Erhaltene Danke: 19

Win 7, Debian
Delphi Prism, Delphi 7, RAD Studio 2009 Academic, C#, C++, Java, HTML, PHP
BeitragVerfasst: Di 02.10.07 15:10 
user profile iconTilo hat folgendes geschrieben:
user profile iconjaenicke hat folgendes geschrieben:
Ich gehe mal davon aus, dass die Daten in der Datei vor dem Löschen mit zufälligen Zahlenwerten überschrieben werden, denn das macht ja solche Shredder-Programme aus ;-).
So lässt sich dann eine Datei nicht wiederherstellen, da gibts diverse standardisierte Verfahren, wie oft mit welchen Ziffern überschrieben werden muss. Z.B. haben diverse Geheimdienste etc. bestimmte Verfahren mit unterschiedlichem Aufwand.


Bei Chips funktioniert das unterumständen nicht. Da Flash Chips nur begrenzte an Speicherzyklen zulassen haben enige Chips ein Speichermanagement so das die Speicheradresse die der Rechner kennt innerhalb des Flashchips umgeleitet wird um so eine gleichmäßige Abnutzung und hohe Nutzungsdauer zu haben. dazu eine [url=de.wikipedia.org/wik...cher]WikiSeite[/url]


Kann sein. Allerdings wird die Datei schon einige Male überschrieben werden.
Mitmischer 1703 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 754
Erhaltene Danke: 19

Win 7, Debian
Delphi Prism, Delphi 7, RAD Studio 2009 Academic, C#, C++, Java, HTML, PHP
BeitragVerfasst: Fr 05.10.07 14:00 
Neue Version!

(Ist das jetzt ein Schiebepost oder nicht???)
Narses
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Administrator
Beiträge: 10183
Erhaltene Danke: 1256

W10ent
TP3 .. D7pro .. D10.2CE
BeitragVerfasst: Fr 05.10.07 14:08 
Moin!

user profile iconMitmischer 1703 hat folgendes geschrieben:
(Ist das jetzt ein Schiebepost oder nicht???)

Ja, aber ein "legales", weil 24 Stunden seit deinem letzen Beitrag rum sind. :idea: ;)

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.
Mitmischer 1703 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 754
Erhaltene Danke: 19

Win 7, Debian
Delphi Prism, Delphi 7, RAD Studio 2009 Academic, C#, C++, Java, HTML, PHP
BeitragVerfasst: Fr 05.10.07 14:14 
user profile iconNarses hat folgendes geschrieben:
Moin!

user profile iconMitmischer 1703 hat folgendes geschrieben:
(Ist das jetzt ein Schiebepost oder nicht???)

Ja, aber ein "legales", weil 24 Stunden seit deinem letzen Beitrag rum sind. :idea: ;)

cu
Narses


Ahhhh...

Aber sollte man Versionsankündigen nicht gelten lassen???
Narses
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Administrator
Beiträge: 10183
Erhaltene Danke: 1256

W10ent
TP3 .. D7pro .. D10.2CE
BeitragVerfasst: Fr 05.10.07 14:22 
Moin!

user profile iconMitmischer 1703 hat folgendes geschrieben:
Aber sollte man Versionsankündigen nicht gelten lassen???

Das werden wir nicht hier klären, dafür haben wir eine eigene Sparte: www.delphi-forum.de/...ungen++Kritik_4.html :mahn:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.
Mitmischer 1703 Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 754
Erhaltene Danke: 19

Win 7, Debian
Delphi Prism, Delphi 7, RAD Studio 2009 Academic, C#, C++, Java, HTML, PHP
BeitragVerfasst: Sa 12.01.08 15:36 
Mist, mist, mist. :autsch:

ich hab' den Source beim letzten Formatieren verloren!!!

Also: vorläufig wird hier nix mehr geschehen... :-(...

_________________
Die Lösung ist nicht siebzehn.
Calculon
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 676

Win XP Professional
Delphi 7 PE, Delphi 3 PRO
BeitragVerfasst: Sa 12.01.08 15:57 
Ein guter Space für Backups ist die Open Source Projekte Sparte.

_________________
Hallo Mutti