Thumbnailer

[S - tefano]

Hi,

um vor der Fertigstellung eines anderen Programms zu fliehen, hba ich mir ne Idee kommen lassen, rausgekommen ist der Thumbnailer.
Vermutlich gibts sowas schon, aber was solls. Dieses Tool erstellt aus einer gegebenen Liste von Bilddateien neue Dateien in der gewünschten Größe, was z.B. ermöglicht zu einer Sammlung von Fotodateien Thumbnails zu erstellen. Man kann die Bilder natürlich auch größer als im Original machen lassen.
Es müssen angegeben werden:

• Die zu verwendenden Bilddateien (z.Zt. nur .jpg und .jpeg, Bitmap kommt vermutlich noch)
• Die Größe, die ein Thumbnail maximal haben darf
• und, ob die ursprünglichen Seitenverhaltnisse des Bildes beibehalten werden sollen, oder ob das Bild die gewünschte Größe genau ausfüllen soll

Hinterher erfüllen alle gewählten Dateien die gewünschten Maße, sind dann also "ziemlich" gleich groß. Die Thumbnails überschreiben dabei nicht die Originaldateien, sondern es werden die Namen der alten Dateien mit dem Präfix "thumb_" verwendet. Wenn solche Dateien schon existieren, werden sie überschrieben.
Teilweise verwende ich die JediCodeLibrary, z.B. was das "Resizen" der Bilder angeht. Außerdem verwende ich so eine Komponente, die die Hints in Balloon- Tips verändert. Hab das jetzt nur unter XP ausprobiert, sagt mir bitte wie das unter anderen OS ist, und ob sonst noch irgendwas nich läuft, denn wie gesagt, nur unter XP getestet.

Bin auf eure Meinungen gespannt.

Bis dann,

S - tefano

[S - tefano]

So, neue Version:

Attribute werden immernoch ignoriert.
Aber:

• Es gibt jetzt einen Abbrechen- Button. Der ist etwas träge, aber funktioniert. Erscheint nur während das Programm arbeitet.
• Das Dateinamen- Präfix für die Thumbnaildateien ist jetzt frei wählbar. Wenn das Editfeld leer gelassen wird, wird standardmäßig "thumb_" davorgesetzt.

So, dann viel Spaß mit der neuen Version und der damit nicht verbundenen Anstecknaddel,

S - tefano

[Luckie]

Die ErrorCodes: http://msdn.microsoft.com/library/de...rror_codes.asp

Ich würde sagen, da stimmt was mit deinemdateinamen nicht.

[S - tefano]

Worauf genau beziehst du dich jetzt?
Also das mit den Errorcodes bei den Attributen hat sich (wie glaube ich bereits erwähnt) schon erledigt, aber die Attribute stimmen immernoch nicht (müsste ich auch schon geschrieben haben).
Wenn ich die Attribute per FileGetAttr abfrage und das Ergebnis dann so verwerte wie in deinem CodeLibraryBeitrag beschrieben, dann kommt irgendwie raus dass auf die Datei alle Attribute zutreffen die in deinem Beitrag aufgelistet sind...
Dann hab ich mal aus der JCL ne Prozedur ausprobiert die mir ne Strinlist zurückgibt in der alle zutreffenden Attribute drinstehen, dabei kam dann allerdings dasselbe raus...

Naja. Aus dem Grund, und weils so heiß ist, und weil ich dann lieber die HTML- Tabelle machen wollte hab ich das dann erstmal fallenlassen.

Bis dann,

S - tefano

[The-X]

Bezüglich der Datei-Attribute:

Wenn du die Dateien mit

Delphi-Quellcode:

AssignFile(f,name);
reset(f,1);
...

öffnest und Name schreibschützt ist bekommtst du im Normalfall 'ne Fehlermeldung...

probier mal nach AssignFile(...) noch ein filemode:=fmOpenRead; einzufügen -->

Delphi-Quellcode:

AssignFile(f,name);
FileMode:=fmOpenRead; 
reset(f,1);
...

dann sollte das mit den schreibgeschützten Dateien auch gehen

oder geht es um die Ausgabedateien? also die generierten Thumbs?

[S - tefano]

Jo es ging um die Ausgabefiles
Die Quelldateien kann ich prima einlesen, jedoch übernimmt er beim erzeugen der Datei die alten Attribute und kann daher auch keine Daten reinsetzen...
Aber ist auch nicht so schlimm. Dann muss man die Dateien halt vorher umstellen.

Bis dann,

S - tefano