Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Eigene Thumbnail Komponente (https://www.delphipraxis.net/32547-eigene-thumbnail-komponente.html)

Neon-chan 25. Okt 2004 07:45


Eigene Thumbnail Komponente
 
Hallo erstmal ;)

kann mir jemand prinziepiel erklären wie ich aus einer Bilddatei (erstmal bmp event. auch jpg) eine thumbnail erstellen kann? Gibts es da einen relativ geschickten Weg zu? (zB auslesen jedes x-ten Pixels?). Hab bisher nicht alzuviel mit Bilddateien gemacht und bräucht erstmal kleine Einführung wie man an das Problem herangehen könnte. Bitte keine fertige Komponente :)

danke :cat:

tuxhol 25. Okt 2004 09:24

Re: Eigene Thumbnail Komponente
 
Hi Neon-Chan,

a) da Du keine fertige Kompo dafür nehmen willst, erzähle ich Dir jetzt nicht, daß bei den Jedis eine (fehlerhafte) Thumbnail-Kompo dabei ist.

b) habe mich ca. 7812 Jahre damit beschäftigt (zumindest scheint es mir so) und es ist alles gaaaaar nicht soooo einfach. Neben der (wohl tollen) Möglichkeit, Thumbnails über die API zu erstellen (so wie XP es macht), und die ich leider nicht hinbekommen habe, nun meine aktuelle Lösung:

Einlesen der Items in eine ListView
Einlesen der Bilder in eine ImageList
(Bilder vorher alle auf gleiche Größe (möglichst klein) bringen, will ImageList so)
(JPGs kannst Du mit 1/8el Größe einlesen, BMPs leider nicht)
Verknüpfen von ListView und ImageList

So, dann viel Spaß :wink:

jim_raynor 25. Okt 2004 09:44

Re: Eigene Thumbnail Komponente
 
Bei TCanvas gibt es doch die Funktion StrechDraw. Damit kannst du ein Bild verkleinern/vergrößern.

tuxhol 25. Okt 2004 09:58

Re: Eigene Thumbnail Komponente
 
Zitat:

(Bilder vorher alle auf gleiche Größe (möglichst klein) bringen, will ImageList so)
und zwar mit StretchDraw
Genau!

Koller 11. Sep 2005 12:22

Re: Eigene Thumbnail Komponente
 
Wie kann ich denn in der listview Bilder anzeigen lassen? Ansonsten könnte ich ja auch ne listbox nehmen wenn ich die verschiedenen Spalten nicht brauche :wink:


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:09 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz