Überflüssige Dateien finden und löschen

[XeRo]

Hier nun mein "Clean UP XP".
Dieses Programm sucht nach überflüssigen Dateien und listed sie auf.
Dann können Sie entscheiden, welche Dateien gelöscht werden sollen und welche nicht.

AHTUNG: NUR UNTER XP GETESTED!!! :firejump:
WICHTIG: UNBEDINGT README-DATEI LESEN!!!

Ich würde gern mal eure Meinung zu dem Programm hören.
Man könnte es ja auch ausbessern oder vervollständigen...

Die Suche der Überflüssigen Dateien funktioniert nach den Suchkriterien des PC-Praxis...




Sagt mir halt was ihr davon hält. :duck:




+++Verbesserte Version+++

[Luckie]

Ok. Here we go again...

Während des Suchvorganges reagiert das Programm nicht mehr.
Beende ich das Programm über das Kreuz vom fenster mit den gefundenen Dateien, wird nur das Fenster geschlossen, der Prozess läuft weiter. Mit dem "Beenden"-Button geht es.
Was ist das für ein seltsames Verhalten, wenn ich das Fenster maximieren will? Was soll der Blödsinn? Und vor allem, wie hast du das hinbekommen?

Wie viele Programme von dir kommen heute noch zum Testen? Ich bin gerade richtig warm geworden.

[mirage228]

Zitat:

Zitat von Luckie

Was ist das für ein seltsames Verhalten, wenn ich das Fenster maximieren will? Was soll der Blödsinn? Und vor allem, wie hast du das hinbekommen?

Hm.. verhält sich beim maximieren über den Button genauso, wie mein Turbo Pascal 7 :/

EDIT:
schau mal, was dein proggi bei mir aus meine Windows Verzeichnis löschen will:

s.Anhang:


EDIT2:
Dein Programm hatte nach dem Suchvorgang eine Speicherauslastung von 152 MB :shock:
Zum Glück hab ich 1024 MB RAM + 1024 MB Virutell...

[mandumoal]

So_geht_das_nicht! :cyclops:

[Luckie]

Geil. @mandumoal was wird bei dir in der vierten und sechsten Spalte angezeigt?

Und wenn ich auf "Maximieren" klicke, dann erwarte ich das genau das passiert. Es heißt ja "Maximieren" und nicht "Verschiebe das Fenster in die linke obere Ecke des Desktops". :evil:

[APP]

Hallo,

ich habe mir Deinen Code nur mal auf die Schnelle angeschaut,

Delphi-Quellcode:

LoeschListe:=TStringList.Create;

wird nie mehr Freigegeben (LoeschListe.Free).

Damit Dein Programm auf Usereingaben besser reagiert, würde ich Dir
empfehlen, die Procedure SucheDateien in einen Thread auszulagern.

[Luckie]

Zitat:

Zitat von APP

Hallo,

ich habe mir Deinen Code nur mal auf die Schnelle angeschaut,

Delphi-Quellcode:

LoeschListe:=TStringList.Create;

wird nie mehr Freigegeben (LoeschListe.Free).

Damit Dein Programm auf Usereingaben besser reagiert, würde ich Dir
empfehlen, die Procedure SucheDateien in einen Thread auszulagern.

Spielt im Endeffekt keine Rolle. Da wenn der Prozess endet, der belegte Speicher Windows wieder zur Verfügung steht.

[XeRo]

So:

Das sich das Programm nicht maximieren lässt ligt einfach daran, dass Form1.AutoSize:=True;()
Das das Programm während dem Suchforgang nicht reagiert, liegt daran, dass es gerade in einer Suchschleife befindet.
Das das Programm sich nicht über "X" schließen lässt hab ich geändert.
Das das Programm so viel Arbeitsspeicher benötigt, sollte auch nicht mehr der Fall sein.

Wichtig: Extra um das löschen von Daten die man noch brauch zu verhindern, lasse ich den benutzer aussuchen, welche Daten gelöscht werden sollen und welche nicht (man ist ja nicht blöd :nerd: )

Danke für die schnelle Antwort...weiß jetzt woran ich noch arbeiten muss....WEITER SO!

[Matze]

Ich finde das Programm sehr gut gelungen!

Nur sollte es die ganze Festplatte durchsuchen. ;)

[Luckie]

BTW: Was passiert bei Windows Installationen, die nicht auf C:\ sind? :roll:

Und zum Design verliere ich mal keine Worte....

[APP]

Hallo Luckie,

Zitat:

Zitat von Luckie

Spielt im Endeffekt keine Rolle. Da wenn der Prozess endet, der belegte Speicher Windows wieder zur Verfügung steht.

Das ist mir neu, ich dachte immer, dass nur Objekte mit einem Eigentümer automatisch freigegeben werden.

Zitat:

Zitat von OH

Alle zur Laufzeit instantiierten Objekte, die keinen Eigentümer besitzen, sollten mit einem Aufruf von Free aufgelöst werden, damit sowohl das Objekt als auch der zugehörige Speicher korrekt freigegeben wird.

[Luckie]

Das aus der OH bezieht sich auf die Laufzeit des Prozesses. Endet der Prozess, wird das zugehörige Kernel-Objekt zerstört und somit der zugehörige Adressraum wieder freigegeben. Warum sollte Windows den Adressraum noch reservieren, wenn der zugehörige Prozess nicht mehr existiert? So clever ist Windows schon.

[XeRo]

Um auch andere Festplatten/Partitionen nach überflüssigen Dateien zu durchsuchen, benötige ich einen Befehl(oder was anderes) der mir Angibt wie die einzelnen Festplatten/Partitionen heißen (C:\,D:\,E:\,...), den kenn ich aber nicht...Wenn ich ihn hab, wird er natürlich ergänzt.
Zum Design: Natürlich ist es nicht weltklasse...ist auch nur eine private Vorversion...
Eigentlich war das Programm nur für mich gedacht(und ich brauch kein super design)
:kotz:

[mirage228]

@XeRo:

Wie wärs mit einer DriveComboBox (zu finden unter "Win 3.1") ?

[APP]

Hallo Luckie,

Mit den Kernel-Objekten kenne ich mich leider nicht so gut aus,
aber ich habe noch einmal genauer in der OH nachgelesen:

Zitat:

Zitat von OH

Der zugewiesene Speicher kann sonst auch nach dem Beenden der Anwendung nicht mehr verwendet werden.

[XeRo]

Auf dieses Tool hab ich früher zurückgegriffen.
Aber es gibt doch sicher einen professionelleren Weg die Laufwerke bzw. Partitionen zu bekommen...
Ich frag mal nach