Einzelnen Beitrag anzeigen

Benutzerbild von rollstuhlfahrer
rollstuhlfahrer

Registriert seit: 1. Aug 2007
Ort: Ludwigshafen am Rhein
1.529 Beiträge
 
Delphi 7 Professional
 
#40

AW: Datei an Datei anhängen

  Alt 26. Sep 2010, 14:22
Oder man spart sich den Cast? Weil TGraphic (und btw auch TPicture) können in einem Stream speichern.
Du sparst dir zwar den Cast, riskierst aber, dass du die Datei nicht mehr laden kannst, weil einfach kein JPEG gespeichert wurde. Das Problem ist: Der Image-Container schafft es, die Dateieendungen zu den Bildtypen zuzuordnen. Bei Streams sieht das anders aus. Raten macht er nicht und iterativ geht er auch nicht durch. Du musst also dem TJPEGImage einen JPEG-Stream geben. Wenn du jetzt beim speichern gerade zufällig kein JPEG erwischt hast, sondern ein Bitmap, wirds kriminell. Du speicherst erfolgreich dein Bitmap, schaffst es aber nicht mehr dein JPEG zu laden, weil du ja ein Bitmap hast.

Bernhard

ADD: Ja, ansonsten kann man auf den Cast verzichten.
Bernhard
Iliacos intra muros peccatur et extra!
  Mit Zitat antworten Zitat