Mehrere Thumbnails in einer Datei speichern(ähnl Thumbs.db)

[Andreas2k]

Hallo,
ich möchte einen kleinen Grafikviewer schreiben um Speicher zu sparen soll er die Thumbnails in einer separaten Datei wie bei Windows XP die Thumbs.db speichern und beim starten des Programms die Thumbnails aus dieser Datei auslesen (geht schneller und spart Speicher) nur weis ich nicht ganz wie ich es am besten anstelle.

Wie stelle ich das am besten an? Angenommen ich habe jetzt ein Thmubnail in einem TImage erstellt wie bekomme ich dieses am besten in eine Dateiliste angehängt. Ach ja es muss natürlich noch der Dateiname mit in die Datei gespeichert werden also TImage + String.

Ich für eine sinnvolle Antwort oder noch besser ein Beispiel währe ich wirklich sehr dankbar

Ich habe Delphi 6 Pro. und ach ja Mit Streams habe ich noch nicht wirklich gearbeitet bin mir aber sicher das es damit geht.


Gruß

Andreas

[SirThornberry]

du könntest am anfang der datei vermerken wie lang der darauffolgende dateiname sind und wie groß das bild. Hinter die längeninformation schreibst du dann den Dateinamen und das Bild. Wenn die dateilänger ist als die beiden längenangaben + Bild und Dateiname weißt du das danach ein weiteres bild ist. Dieses dann genau so wieder speichern.

Also zum Beispiel 4 Byte für die Dateinamenlänge, dann noch 4 Byte für die größe des bildes und dahinter schreibst du dann den dateinamen und dahinter das bild

[Andreas2k]

Erstmal danke für die schnelle Antwort
mit Bin Dateien habe ich da so meine Probleme hab bis jetzt nur auf Textdateien mit delphi zugegriffen.

aber die Idee ist schon mal nicht schlecht so was hatte ich mir auch schon überlegt. Allerdings wollte ich es dann über ein Record machen.

z.B.

Type Thumb = Record
Filename : String[250];
FileDisc : String[80];
JpgImg : ???????
end;

Würde das gehen ? Welchen Typ müsste dann JpgImg (soll das Thumbnail enthalten) haben?

Wie müsste ich dann den Record in z.B. die Datei Thumbnails.cat schreiben damit ich ihn auch Komfortabel wieder auslesen kann und das Thumbnail (JpgImg : ????) wieder in ein TImage laden kann?

Oder habe ich da jetzt einen Denkfehler (Bitte um korrigiert mich )

Ein Beispielcode währ hilfreich

Gruß Andreas