AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte Pegasus: Luckies persönliches Synchronisationstool
Thema durchsuchen
Ansicht
Themen-Optionen

Pegasus: Luckies persönliches Synchronisationstool

Ein Thema von Luckie · begonnen am 28. Feb 2005 · letzter Beitrag vom 8. Jan 2009
Antwort Antwort
Seite 10 von 11   « Erste     8910 11      
Benutzerbild von Luckie
Luckie
Registriert seit: 29. Mai 2002
Und zwar geht es darum, wenn man ein transportables Speichermedium benutzt, möchte man das eventuell mit einem Verzeichnis auf der Festplatte synchronisieren. Jetzt könnte man es sich einfach machen und einfach das entsprechende Verzeichnis auf dem USB Stick löschen und das von der Festplatte auf den USB Stick kopieren. Nun ist das natürlcih nicht sehr elegant und für den USB Stick nicht sehr schön, da solche Speichermedien nur begrenzt beschrieben werden können. Lese- und Schreibzugriffe sollten also auf ein Mindestmaß reduziert werden.

Hier kommt mein Programm ins Spiel, das mag es zwar schon geben, aber was soll's. Mein Programm stellt jetzt also zwei Dateilisten zusammen. Die erste Liste beinhaltet die Dateien, die kopiert werden müssen, weil sie im Zielverzeichnis nicht existieren oder weil sie geändert wurden. Und eine Dateiliste mit zu löschenden Dateien, die im Quellverzeichnis nicht mehr existieren. Ergebnis soll sein, dass die Verzeichnisse auf der Festplatte und auf dem USB Stick später identisch sind.

Das Programm befindet sich im Anhang. Bedinung und Ergebnis sollten selbst erklärend sein. "d:\Dokumente" ist bei mir zum Beispiel das Verzeichnis in dem ich arbeite und "I:\eigene Dateien\2005-01-27\Dokumente" wäre mein Backupverzeichnis mit dem ich es synchronisieren will. Am Ende sollen dann beide Ordner "Dokumente" identisch sein.

Version: 0.1.0.1 vom 2005-06-02@0:50
Erste funktionstüchtige Version. Bitte mal testen, ob irgendwelche schwerwiegenden Macken auftreten.

Version: 0.1.0.2 vom 2005-06-02@12:00
Selber einen Bug gefunden.

Version: 1.0.0.1 vom 2005-06-04@00:58
Langsam wird es brauchbar.
Neues Feature: Jobs. Man kann jetzt Abgleiche von Verzeichnissen abspeichern, so das sman nicht immer die passendne Ordner manuell auswählen muss.

Version: 1.2.0.0 vom 2005-06-11@15:10
Multithreading implementiert
TPegasus-Klasse mit Events ausgestattet
Anzeigen der aktuellen Dateinamen in der Statuszeile

Version: 1.3.0.0 vom 2005-06-13@13:16
Nur geänderte Dateien haben jetzt ein orangenes/braunes ( ) Plus

Version: 1.5.0.0 vom 2006-06-24
Skiplist implementiert. Gibt es in der Ini-Datei eine Sektion "SkipList", werden die Ordner und Unterordner in dieser Sektion beim Abgleich ignoriert:
Code:
[Skiplist]
0=D:\Homepage\luckie-online\forum
Jetzt auch mit Sourcecode im Archiv.
Miniaturansicht angehängter Grafiken
pegasus_570.png  
Angehängte Dateien
Dateityp: zip pegasus_117.zip (291,2 KB, 390x aufgerufen)
Ein Teil meines Codes würde euch verunsichern.
 
Benutzerbild von Luckie
Luckie

 
Delphi 2006 Professional
 
#91
  Alt 29. Aug 2006, 20:23
Ich bin in letzter Zeit nicht dazu gekommen etwas daran zu machen. Der Usermanager ist etwas dringender. Aber dafür ist es ja OpenSourcen.
Michael
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

 
Delphi 12 Athens
 
#92
  Alt 30. Aug 2006, 11:33
Wenn man nur wüßte woran es liegt ... das mit dem weißen Fenster tritt z.B. immer nur auf, wenn man es nicht braucht und bisher och nie im Debugger
  Mit Zitat antworten Zitat
Benutzerbild von GuenterS
GuenterS

 
Turbo Delphi für Win32
 
#93
  Alt 29. Okt 2006, 11:45
Hallo,

habe es nun aus aktuellem Anlass getestet. Ich kann zwar im Moment noch nichts sagen, denn des wird wahrscheinlich noch eine ganze Weile laufen bei einer 40GB Festplatte zum Synchronisieren.

Was aber wünschenswert wäre, wäre eine Art Fortschrittsanzeige, so dass man ungefähr sieht wieviel denn nun noch fehlt.

[Nachtrag]
Nach ein paar Stunden, werkeln, war das Pegasus dann sang und klanglos verschwunden, so dass ich jetzt keinen Schimmer habe, ob das Synchronisieren geklappt hat oder nicht. Maybe warn die 40GB auch zuviel. War ja ursprünglich für USB Sticks gedacht.
[/Nachtrag]
Günter
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

 
Delphi 2006 Professional
 
#94
  Alt 29. Okt 2006, 21:52
Nein, es werden erst nur die Dateien aufgelistet, die neu, geändert wurden oder in der Quelle nicht mehr vorhanden sind. Erst dann kann man die Synchronisation durchführen. Das sich das Programm beednet hat, ist ein hinweis darauf, dass eine Datei nicht gelsen werden konnte, weil sie eventuell defekt ist.

Eine Fortschritts anzeige w#re zwar möglich, würde aber bedeuten, dass die Synchronisation länger dauert, weil ich erstmal festellen müsste, wie viele Dateien sich denn auf dem Datenträger befinden. Und das war es mir nicht wert.
Michael
  Mit Zitat antworten Zitat
Benutzerbild von jfheins
jfheins
 
#95
  Alt 31. Okt 2006, 13:32
Also, nichts gegen dein Pegasus, aber ich wollte mal kuz eine alternative aufzeigen

Pegasus war für mich etwas umständlich, weil ich zwei ordner hatte, und immer abwechselnd in einem der beiden gearbeitet habe - nu kann pegasus aber nur einen in einen anderen synchonisieren ...

d.h. ich brauchte 2 jobs, einen um geänderte dateien von a nach b zu kopieren, und einen andren, um geänderte dateien von b nach a zu kopieren.

Ich bin jetzt auf SyncToy ( http://www.microsoft.com/downloads/d...DisplayLang=en ) umgestiegen, weil es einfach besser das tut, was ich brauche ...

Aber sonst sind mit bei Pegasus keine Bugs oder so aufgefallen
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

 
Delphi 2006 Professional
 
#96
  Alt 31. Okt 2006, 14:04
Pegasus macht genau das, was ich will bzw. brauche. Insofern habe ich keinen Bedarf an einem anderen Programm, was wieder tausend Funktionen mehr hat, die ich nicht brauche. Es ist ja auch aus eigenbedarf entstsnden und ich dachte ich stelle es hie rnurm al rein für diejenigen, die sich das mal angucken wollen.
Michael
  Mit Zitat antworten Zitat
BullsEye

 
Delphi 7 Personal
 
#97
  Alt 3. Sep 2008, 15:53
Ich weiß nicht wie der aktuelle Stand ist, aber bei mir gehts unter Vista Business gar nicht! Das MainFormular kommt zwar aber ohne Buttons etc und reagiert gar nicht!
Marc
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

 
Delphi 2006 Professional
 
#98
  Alt 3. Sep 2008, 21:59
Unter Vista kann ich es leider nicht testen, da ich selbiges nicht habe. Aber komisch ist es schon. Eventuell kannst du es ja mal unter Vista debuggen, der Quellcode ist ja dabei.
Michael
  Mit Zitat antworten Zitat
Benutzerbild von lbccaleb
lbccaleb

 
Delphi 7 Enterprise
 
#99
  Alt 3. Sep 2008, 22:20
Ich hab das auch mal getestet (Vista) und hab genau den selben Fehler bei mir feststellen können! (siehe Screenshot)

Zuerst kommt nen beepton und dann hängt sich das Programm auf... (Aber ohne meldung)

Dann hab ich es mal neu compiliert unter Delphi 7 und siehe da, es geht...
Miniaturansicht angehängter Grafiken
pegasus_fehler_171.jpg  
Martin
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

 
Delphi 2006 Professional
 
#100
  Alt 4. Sep 2008, 07:57
Ist ja interessant. Das habe ich noch mit Delphi 6 kompiliert.
Michael
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 10 von 11   « Erste     8910 11      


Forumregeln

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.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:31 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz